[RISOLTO] Database e stringhe speciali

[Gianluigi]

Volevo chiedere un parere su questa mia soluzione per inserire stringhe speciali in campi di database SQLite3.
Per funzionare funziona, almeno nelle mie prove, però non mi pare molto professionale.

Qualche suggerimento?

Codice: gambas [Seleziona]

Public Sub PopoloTabella()
  
  Dim hTabella As Result
  Dim sMioSql As String 
  Dim sIndirizzo As String
  Dim sFrase As String
  
  ' Scusate per distrazione avevo lasciato il riferimento ad altro modulo
  'sIndirizzo = mFunzioni.PerSql("Immagini/Dollaro 3.png")
  'sFrase = mFunzioni.PerSql("Pippo\nPluto\nPaperino")
  ' E' (più) corretto così 
  sIndirizzo = PerSql("Immagini/Dollaro 3.png")
  sFrase = PerSql("Pippo\nPluto\nPaperino")
  
  ' questo si spiega da solo no?
  AproDB
  
  $Conn.Begin
  
  sMioSql = "INSERT INTO miaTabella ("
  sMioSql &= " ID_Tab,"      
  sMioSql &= " Tab_Ind,"
  sMioSql &= " Tab_Fra"
  sMioSql &= " )"
  sMioSql &= " VALUES ("
  sMioSql &= " 1,"                                    
  sMioSql &= " \"" & sIndirizzo & "\","                    ' " '" & sIndirizzo & "',"
  sMioSql &= " \"" & sFrase & "\""  
  sMioSql &= " );"  
   
  hTabella = $Conn.EXEC(sMioSql)
  $Conn.Commit
  $Conn.Close
 
End

Public Sub PerSql(s As String) As String
  
  Dim s1 As String
  
  s1 = Replace$(s, "\n", "akkapo")
  s1 = Replace$(s1, "/", "SLASSS")
  Return s1
    
End


Public Sub PerDraw(s As String) As String
  
  Dim s1 As String
  
  s1 = Replace$(s, "akkapo", "\n")
  s1 = Replace$(s1, "SLASSS", "/")
  
  Return s1
  
End

Vi piace il mio nuovo (primo) avatar non so perché ma mi è venuto in mente il primo Aprile.

 

[Berserker79]

Ciao, la sub PerDraw quando viene utilizzata?
Ma hai usato questo sistema per quale motivo?
Che problematiche hai riscontrato?

[Gianluigi]

Ciao, la sub PerDraw quando viene utilizzata?
Ma hai usato questo sistema per quale motivo?
Che problematiche hai riscontrato?

Ciao Berserker79, ti ringrazio dell'interessamento.

La sub perDraw() la uso per poi “disegnare” il testo, quello memorizzato nel campo, in una DrawingArea.
Ho usato questo sistema per poter registrare nei campi piccole frasi (max 100 caratteri a esagerare, normalmente nemmeno la metà) che possono andare a capo anche 3 o 4 volte oppure nessuna, e poter registrare anche delle path come ho esemplificato.
Perchè malgrado le varie notizie apparse sul bolg io ho trovato solo questo sistema per evitarmi errori quando inserisco le slash e gli a capo.
Problemi con SQLite3 nessuno così funziona solo chiedevo se poteva esserci un modo “migliore”, più professionale o più corretto se così si può dire.
Ti ripeto ho visto molte cose sul blog ma nessuna sembra funzionare almeno a me.
 

[Berserker79]

In un mio programma gambas, in una TextLabel, per andare a capo uso il tag html "<br>".
Potresti provare quindi a sostituire \n con <br> e provare a disegnarla nella draw senza rifare la conversione.

[fsurfing]

premesso che non ho provato , ma credo che teoricamente se per inserire nuovi record nel db utilizzi:

Codice: [Seleziona]

hTabella = $Conn.create("miatabella") 
htabella!id_tab="pippo"
....
....
htabella!indirizzo="questo\nèilmio\nindirizzo"
htabella.update

non dovresti avere problemi, l' unico problema è dato solitamente dal carattere " ' " che io sostituisco sempre in " ` " (almeo su mysql)


per modificare un record invece usa:

Codice: [Seleziona]

hTabella = $Conn.edit("miatabella", "id_tab=" & pippo) 
htabella!id_tab="pippo"
....
....
htabella!indirizzo="questo\nèilmio\nindirizzo"
htabella.update

[Golia]

non dovresti avere problemi, l' unico problema è dato solitamente dal carattere " ' " che io sostituisco sempre in " ` " (almeo su mysql)

io faccio così:

Codice: gambas [Seleziona]

Replace(mystring, "'", "''")

[Gianluigi]

Perbacco quante risposte!   

Intanto vi chiedo scusa per il ritardo ma purtroppo anche i pensionati se sposati devono lavorare per un principale molto esigente. 

Quindi solo ora leggo i vostri post, adesso me li studio e poi vi dico. 

Intanto grazie a tutti.

 

[Golia]

ma purtroppo anche i pensionati se sposati devono lavorare per un principale molto esigente

Hi hi... ma non solo i pensionati!

[Gianluigi]

ma purtroppo anche i pensionati se sposati devono lavorare per un principale molto esigente

Hi hi... ma non solo i pensionati!

eh si mi sa che hai proprio ragione!

A proposito mi sta chiamendo alla pappa poi inserisco la risposta, ho fatto un paciugo e per risponderti ho perso tutto! 

 

[Gianluigi]

In effetti prima di scomodare gli altri occorrerebbe fare prove più approfondite.
Io ho popolato delle tabelle con INSERT TO e ho iniziato ad ottenere degli errori quando tentavo di passare stringhe che andavano a capo.
Dopo varie prove con l'aiuto di precedenti discussioni nel blog e in particolare di una della mailing list ufficiale riportata da vuott, ho ottenuto l'inserimento delle variabili senza errori con l'ausilio di questo " \"" messo davanti e dietro la variabile.
Però malgrado non avessi errori vedevo nella tabella, attraverso SQLite Database Browser, solo la frase prima del tag \n.

Anche interrogando con SELECT vedevo la frase troncata al primo tag.
Da qui ho anche dato per scontato (e si, cosa volete, può essere l'età? ) che ogni tipo di slash troncasse  le parole.
Stupidamente non ho pensato di interrogare il database attraverso Gambas.
Se lo avessi fatto avrei ricevuto indietro esattamente quanto inserito anche se non visibile dal browser.
Di questo devo ringraziare fsurfing.
Ora comprendo la perplessità di Berserker79 nel cercare di capire cosa volevo.
Vi ringrazio molto tutti quanti che mi avete aiutato a capire un altro pezzo di Gambas e di SQL.

Vorrei approfondire un attimo con voi la questione del carattere apostrofo ( ' ) che, se ho capito bene, dà  dei problemi (solo in MySQL?). La cosa detta sia da fsurfing che da Golia non mi ha del tutto convinto, la sostituzione del carattere apostrofo, senza offesa   però non mi appare corretta forse occorrerebbe trovare un'altra soluzione oppure lo ripristinate? Ma allora c'è il rischio di ripristinare cose che non andavano ripristinate.
Avete già provato a usare ( " \"" & variabile & "\""  ) per l'inserimento di caratteri speciali in MySQL?

Lo so che siete tutti e tre esperti di database e avete anche scritto di questo (ho scaricato i vostri esempi almeno di fsurfing e Golia   ), perchè se ho capito bene da quanto ho letto dovrebbe funzionare, ma potrebbe benissimo essere che non ho capito (oltre a tutto era in inglese!).

Un'ultima cosa: ma voi francamente inserireste in un campo di database delle frasi che vanno a capo? Frasi corte però.

 

[Berserker79]

Ciao, per il carattere ', quando deve essere inserito in un db, va raddoppiato in quanto il primo viene interpretato dal linguaggio sql come carattere speciale che segna l'inizio o la fine di una stringa.
Credo valga per ogni db, io l'ho testato con sqlite e sqlserver.
Per quanto riguarda la tua domanda di inserire o meno le stringhe che vanno a capo nel db, dipende da cosa devi farci. Dovresti spiegare meglio il funzionamento del programma.
Ciao.

[Gianluigi]

Ciao, per il carattere ', quando deve essere inserito in un db, va raddoppiato in quanto il primo viene interpretato dal linguaggio sql come carattere speciale che segna l'inizio o la fine di una stringa.
Credo valga per ogni db, io l'ho testato con sqlite e sqlserver.
Per quanto riguarda la tua domanda di inserire o meno le stringhe che vanno a capo nel db, dipende da cosa devi farci. Dovresti spiegare meglio il funzionamento del programma.
Ciao.

Ciao Berserker79,
intanto grazie della spiegazione riguardo a ' 

Per quanto concerne le “stringhe a capo” per ora il “programma” non è un programma è, come dire, una specie di tesi di studio che mi sono prefissato per migliorare (imparare!) la mia capacità di “programmatore” (tieni conto che io non sono mai uscito prima d'ora da Office e tutta la mia esperienza era Automation, Word, Excel, poco Access non ho mai interagito con il sistema e usato le Api! E' vietato ridere  ) , per fare questo, cioè imparare, sto progettando un'applicazione di stampa su etichette che prevede l'utilizzo di un database che memorizzi i vari aspetti sia grafici che di contenuto.
Lo so (fsurfing dixit) che esistono già programmi di questo genere che sono senz'altro migliori di quanto, anche spremendomi, mai riuscirei a fare, ma senza un obiettivo un po ambizioso io non sarei capace di procedere nello studio.
Poi naturalmente sulla scorta di quanto riuscirò ad apprendere (!?), un'ulteriore idea, magari un po più originale, l'avrei ma per ora è fuori della mia portata... un passo alla volta, diciamo.
Comunque alla fin fine le frasi memorizzate nei campi le devo stampare su un'etichetta tipo indirizzi per capirci, però non divisa per campi perché come ti ho detto in precedenza in partenza non si sa se sarà su una, due, tre, quattro... righe. Non molte comunque essendo un'etichetta.
L'idea generale è questa, siccome non so in quante parti l'etichetta verrà suddivisa per inserire testo e grafica, utilizzo delle tabelle separate che memorizzano ogni singolo aspetto sul genere:
“ID_AreaVerticale – AreaVerticale” ecc. e volevo evitarmi di doverlo fare anche per ogni singola riga delle aree. Lo so che il bello dei database relazionali alla fine è quello di mettere insieme con le query quello che abbiamo diviso con le relazioni ma il mio cervello più di tanto non riesce a dare.
Sono ancora in fase di progettazione e sono aperto ad ogni suggerimento (tuo e anche degli altri) mi volessi dare.

Ora se non mi dai del rompi vorrei tornare un attimo ancora sul carattere '.
Tu hai mai usato " \"" ? perché se funzionasse ti eviterebbe di cercare nella stringa il carattere da raddoppiare o no? 

Ciao e ancora grazie

 

[vuott]

Avete già provato a usare ( " \"" & variabile & "\""  ) per l'inserimento di caratteri speciali

Per far mostrare le virgolette "   hai provato la funzione Quote() ?

Esempio:

Codice: gambas [Seleziona]

Public Sub Form_Open()

  Dim num As String = "40"

   Label1.Text = "Alibaba e i " & Quote(num) & " latrones !"

End

[Gianluigi]

Per far mostrare le virgolette "   hai provato la funzione Quote() ?

Esempio:

Codice: gambas [Seleziona]

Public Sub Form_Open()

  Dim num As String = "40"

   Label1.Text = "Alibaba e i " & Quote(num) & " latrones !"

End

vuott no entiendo!

ma qui si sta parlando di nascondere l'apostrofo a SQL. E non di mostrarlo  

!hola

[vuott]

ma qui si sta parlando di nascondere l'apostrofo a SQL. E non di mostrarlo

Ah, scusa. 

vuott no entiendo!

!hola

Porque te vas hablando español ?