1 svar · 191 visningar · startad av katis
Hej igen!
När jag kör följande slingan:
for k = 0 to 5
varor = MinFil.ReadLine
myArray = Split(varor,",")
produkt = myArray(0)
antal = myArray(1)
levdatum = myArray(2)
Response.Write antal & " "
Response.Write produkt & "<br>"
next
Slingan fungerar och antal och produkter skrivs ut men
jag får följande meddelande:
Microsoft VBScript runtime error '800a0009'
Subscript out of range: '[number: 1]'
Detta hänvisas till raden: antal = myArray(1)
Resten av programmet(finns inte med) stoppas.
Vad gör jag för fel?
Katja
jag skulle gissa att det beror på hur det ser ut i din fil.
T.ex att det finns en rad som inte innehåller några ,
I så fall så returnerar split en array med ett element
myArray = Split(varor,",")
if ubound(myArray) >= 2 then
produkt = myArray(0)
antal = myArray(1)
levdatum = myArray(2)
else
response.write "Fel i indata:" & varor & "<br>"
end if