Tak skal du have ...nu virker det!!.
Dog skal:
> escapeText = "'" & Replace(mytext, "'", "''") & "'"
blot være:
escapeText = Replace(mytext, "'", "''")
Mvh. Thomas
"Jens Gyldenkærne Clausen" <jens@gyros.invalid> wrote in message
news:Xns9341964AD2F75jcdmfdk@gyrosmod.dtext.news.tele.dk...
> Thomas skrev:
>
> > Jeg skal indsætte en masse data i min database hvoraf der er
> > navne som indeholder '. Jeg fandt nedenstående på nettet, men
> > problemet er at den ikke spiser mine variabler, men i stedet
> > ser ud til at sende en string afsted???. Hvis jeg fjerner
> > "lastname" og i stedet skriver min variabel lastname får jeg
> > en fejl besked som hedder Invalid use of Null: 'Replace' :
>
> Der er to ting der kan være galt. Først og fremmest tager den
> funktion du har fundet ikke højde for at input kan være null. Det
> bør den gøre. Hvis du vil have null-værdier til at stå som null-
> værdier i databasen skal du lave indkapslingen med anførselstegn i
> din funktion. Det kan fx se sådan ud:
>
> Function escapeText( mytext )
> If IsNull( mytext ) Then
> escapeText = "null"
> Else
> escapeText = "'" & Replace(mytext, "'", "''") & "'"
> End If
> End Function
>
> Det kan du så bruge i en forespørgsel:
>
> SQL = "INSERT INTO navne (Lastname) VALUES (" &
> escapeText(Lastname) & ")"
>
>
> > Conn.Execute "INSERT (LastName) VALUES ('" & LastName & "')"
>
> Udover at man risikerer fejl med anførselstegn er ovenstående også
> forkert sql-syntaks. Der er ikke specificeret nogen tabel som mål.
>
>
> Hvis du ved at dit navnefelt ikke er tomt er der nok også noget
> galt med den måde du håndterer variablen på. Hvor og hvordan
> tildeler du en værdi til Lastname? Bruger du Option Explicit (se
> <
http://asp-faq.dk/article/?id=9>)
> --
> Jens Gyldenkærne Clausen
> Svar venligst under det du citerer, og citer kun det der er
> nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
> hvordan på
http://usenet.dk/netikette/citatteknik.html