meget SQL-kode der køres fra ekstern txt-fil virker ikke med specialtegn
Hej I kloge hoveder..Jeg har lige et spørgsmål vedr. noget jeg roder med p.t.
Jeg har denne kode, der indlæser en ekstern txt-fil for at køre en del SQL-kode på én gang.
Det har skam virket fint, når det har har været almindelig "plain" dansk tekst, men er jeg stødt ind i noget pudsigt. Det er som om at den læser specialtegn ind på et andet sprog, end dansk (eksempelvis : " & " " ; " " # " " / "
kode :
Dim vSql As Variant
Dim vSqls As Variant
Dim strSql As String
Dim intF As Integer
intF = FreeFile()
Open "c:\sql.txt" For Input As #intF
strSql = input(LOF(intF), #intF)
Close intF
vSql = Split(strSql, ";")
On Error Resume Next
For Each vSqls In vSql
CurrentDb.Execute vSqls
Next
------------------
eksempel på SQL, der ikke ikke bliver eksekveret korrekt :
UPDATE tbl_sent_items SET tbl_sent_items.[plaintext] = Replace([plaintext]," ","");
UPDATE tbl_sent_items SET tbl_sent_items.[plaintext] = Replace([plaintext],"<div><font size=5 color="#FFC20E" style="BACKGROUND-COLOR:#000000"><strong> B l o c k b o o k e t </strong></font></div>","");
- er der et kvikt hoved, der kan gennemskue, hvad pokker, der går galt ?
Køres det som almindelig SQL i en query virker det som det skal...
Men jeg synes det er langt mere overskueligt at have al SQL-koden til at ligge i den eksterne txt-fil.
på forhånd tak !
mvh martens