Avatar billede buha Nybegynder
05. marts 2002 - 14:21 Der er 2 kommentarer og
1 løsning

hmm. hvad betyder dette:

fejlen:

Der opstod en Microsoft VBScript-kørselsfejl fejl '800a003e'

Input efter filens slutning

/on/test_v.asp, linje 13

min kode er:
<%
Dato_ral = FormatdateTime(Now, vbshortdate)
dato = FormatdateTime(Now, vbshortdate)
var = InStr(dato, "-")
nt = Left(dato, var)
set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.MapPath("tid.txt")
set f = fso.OpentextFile(filespec,1)
dtmDate = f.readline
var = InStr(dtmDato, "-")
nt3 = Left(dtmDato, var)
if Dato_ral => f.readline Then
nt2 = dtmTime - nt3
dtmDate = Left(dtmDate, var)
Response.write nt2
Else
End if
f.close
f = Nothing
%>
Avatar billede coltau Juniormester
05. marts 2002 - 14:25 #1
Noget tyder på at tid.txt kun indeholder en linie - men du læser to linier fra den.
Avatar billede coltau Juniormester
05. marts 2002 - 14:27 #2
Denne linie skal ændres:

if Dato_ral => f.readline Then

måske til:

if Dato_ral => dtmDate Then ' dtmDate har du jo hentet.
Avatar billede buha Nybegynder
05. marts 2002 - 16:25 #3
jo tak..
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester