2 svar · 315 visningar · startad av qwerty
Exakt vad menas med detta felmeddelande?
Driver's SQLSetConnectAttr failed
Jag försöker läsa från en kommaseparerad textfil och lägga över datan i en accessdatabas.
Detta brukar funka, så jag tror inte att det är något fel på koden.
Felet blir på den rödmarkerade raden.
<%
Set Con = Server.CreateObject("ADODB.Connection")
path = "DBQ=" & ("c:\wwwplats\data\matsedel.mdb")
Con.Open "Driver={Microsoft Access Driver (*.mdb)};" & path," ",""
Set fso = createObject("Scripting.FileSystemObject")
filename ="c:\wwwplats\matsedlar\matsedel04.txt"
[red]Set theFile = fso.OpenTextFile(filename)[/red]
Do While theFile.AtEndOfStream <> True
text = theFile.Readline
data = Split(text, ",")
StrSql = "INSERT INTO tabell1 (veckonummer, veckodag, dagensdatum, mat) VALUES ('"& data(0)&"', '"& data(1)&"', '"& data(2)&"', '"& data(3)&"')"
con.execute(strSQL)
Loop
%>
Åsså god jul och sånt med... 
Jag förstår inte hur felmeddelandet skulle kunna peka på den rödmarkerade raden, men, två tips:
Set fso = [b]Server.[/b]createObject("Scripting.FileSystemObject")
mvh
Ursäkta att jag har tagit upp er dyrbara tid...
I bland är man så dum så man kan undra vad man ska ha hjärnan till.
Det var inte så konstigt att det blev fel när jag hade glömt att skicka upp textfilen på webservern...
Koden funkade alltså från början.
sorry