posto il codice che interessa:
funziona tutto, il "Titolo" e l' "IMG" me lo scrive nel db, ma il "Testo" nocodice:if instr(Intestazione,"Titolo") > 0 then w_codice = ContenutoFile end if if instr(Intestazione,"Testo") > 0 then w_Testo = ContenutoFile end if if instr(Intestazione,"IMG") > 0 then w_PFoto = ContenutoFile end if On Error Resume Next If w_Codice = "" Then Errore = Errore & "Codice prodotto " Else QSTitolo = Replace(w_Codice, "'", "''") End If If w_Testo = "" Then Errore = Errore & "Nome prodotto " Else QSTesto = Replace(w_Testo, "'", "''") End If if w_PFoto<>"" then QSIMG = "public/"&Replace(w_PFoto, "'", "''") else QSIMG="" end if If QSID <> "" Then SQL = "UPDATE News Set Titolo = '" & QSTitolo & "', IMG = '" & QSIMG & "', Testo = '" & QSTesto & "', Testolink = '" & QSTestolink & "', Link = '" & QSLink & "' WHERE ID = " & QSID Else SQL = "INSERT INTO News (Titolo, IMG, Testo, Testolink, Link) VALUES ('" & QSTitolo & "','" & QSIMG & "','" & QSTesto & "','" & QSTestolink & "','" & QSLink & "')" End If![]()
il tipo dati nel db è uguale sia per Titolo che Testo!!

Rispondi quotando