2 svar · 267 visningar · startad av andreas_lindh
Jag försöker läsa in information från en textfil till en databas. Använder den här koden som jag hittade här på wf
<%
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
Set InStream = FileObject.OpenTextFile (Server.Mappath ("linkar.txt"),ForReading, False)
set connect = server.createobject("adodb.connection")
connect.open "nitti"
do while not instream.atEndOfStream
row = instream.readline
items = split(row,";")
sql = "insert into linkar(namn,link) values ('" & items(0) & "','" & items(1) & "')"
connect.execute sql,,128
loop
instream.close
connect.close
%>
Men jag får ett felmeddelande
Körningsfel i Microsoft VBScript (0x800A0005)
Ogiltigt proceduranrop eller argument.
/nitti1/read.asp, line 3
Någon som vet vad som är fel
Hallå!
Prova med att ändra den här raden:
Set InStream = FileObject.OpenTextFile (Server.Mappath ("linkar.txt"),ForReading, False)
mot det här:
Set InStream = FileObject.OpenTextFile(Server.Mappath("linkar.txt"), 1, False)
Om du vill ha kvar så att det står ForReading istället för 1 så kan du ju bara lägga till denna rad längst upp:
Const ForReading = 1
Jag hoppas att det ska funka nu.
Nu får jag ett nytt fel
Körningsfel i Microsoft VBScript (0x800A0009)
Felaktigt matrisindex: '[number: 0]'
/nitti1/read.asp, line 9