Tänkte bara sticka in med ett litet ord eller 17. http://www.webforum.nu/misc.php?action=bbcode#buttons
kolla den länken för att redigera dina inlägg ;)
Goddagens!
Körde fast med textfil.
Problematiken är: jag läser in textfil(orders.txt) och det går bra, efteråt skulle jag vilja visa utvalda rader typ namn, adress osv.
Mitt tapra försök ser ut så här:
</head>
<body>
<p><h1><font color="blue">Här är min ASP-sida</font></h1></p>
<%
path = Server.MapPath("\bonab")
fil = path & "\orders.txt"
Set MittTxtObj = Server.CreateObject("Scripting.FileSystemObject")
Set MinFil = MittTxtObj.OpenTextFile(fil)
Dim datumgodkand, datumskickad, datumtillbaks, ib, idnum Dim bestallnum, namn, adress, zip, stad, land, mail, telnum
Dim betalsatt,totalpris, varavfrakt, varavmoms, dator, innehall
While Not MinFil.AtEndOfStream
datumgodkand = MinFil.ReadLine
datumskickad = MinFil.ReadLine
datumtillbaks = MinFil.ReadLine
ib = MinFil.ReadLine
namn = MinFil.ReadLine
adress = MinFil.ReadLine
zip = MinFil.ReadLine
stad = MinFil.ReadLine
land = MinFil.ReadLine
mail = MinFil.ReadLine
telnum = MinFil.ReadLine
betalsatt = MinFil.ReadLine
totalpris = MinFil.ReadLine
varavfrakt = MinFil.ReadLine
varavmoms = MinFil.ReadLine
dator = MinFil.ReadLine
innehall = MinFil.ReadLine
Wend
MinFil.Close
%>
<font size = "3" color = "green" style = "Verdana">
Den <% Response.Write datumgodkant %>gjorde du beställning:
<% Response.Write namn %>
</font>
</body>
</html>
Och det funkar inte alls. Får följande meddellande:
Microsoft VBScript runtime error '800a003e'
Input past end of file
/bonab/go.asp, line 23
Var ligger det förbaskade felet?
Tack på förhand
Katis
