Microsoft VBScript runtime error

ASP

4 svar · 246 visningar · startad av pillan

Medlem sedan juli 20028 inlägg
Trådstart#1

Jag har ett problem med ett community script...ibland funkar alllt jätte bra...men ibland dyker detta meddelande upp

Microsoft VBScript runtime error '800a000d' Type mismatch: '[string: "23.05.2003 12:51:48"]' /community2/check.asp, line 23

filen check.asp ser ut så här på line 23
If RecSet("online") = "Ja" AND DateDiff("n", RecSet("update"), Now) > 30 Then

Adressen till sidan är http://pernilla.pernillaj.com/community2/default.asp

logga in med användarnamn test och lösen testa

Om någon vänlig persson skulle vilja hjälpa mej ,med detta vore jag evigt tacksam..är det scriptet det är fel på eller ligger felet hos mitt webbhotell ?? // från pernilla

Medlem sedan dec. 19998 577 inlägg
#2

RecSet("update") innehåller en sträng medans DateDiff kräver ett datum. Testa att köra CDate på RecSet("update"):

DateDiff("n", CDate( RecSet("update") ), Now)

Om inte det fungerar bör du fundera över datatypen i fältet och värdet som du lägger där. Eftersom du har lagrar ett datum bör också datatypen vara "datetime". :)

Medlem sedan dec. 20003 887 inlägg
#3

Mja, DateDiff klarar strängar så länge formatet är riktigt.

Det är inte så att det är punkterna som strular till det hela?

CDate("23-05-2003 13:14:15") fungerar fint, men inte CDate("23.05.2003 13:14:15"). Det kanske är en lokal inställning iofs med att visa datumet med punktavgränsare?

Detta kanske löser saken:

If RecSet("online") = "Ja" And DateDiff("n", CDate(Replace(RecSet("update", ".", "-"))), Now) > 30 Then
Medlem sedan jan. 20032 285 inlägg
#4

Engine^ skrev:

Mja, DateDiff klarar strängar så länge formatet är riktigt.

Det är inte så att det är punkterna som strular till det hela?

CDate("23-05-2003 13:14:15") fungerar fint, men inte CDate("23.05.2003 13:14:15"). Det kanske är en lokal inställning iofs med att visa datumet med punktavgränsare?

Detta kanske löser saken:

If RecSet("online") = "Ja" And DateDiff("n", CDate(Replace(RecSet("update", ".", "-"))), Now) > 30 Then

*Harkel* :stud

If RecSet("online") = "Ja" And DateDiff("n", CDate(Replace(RecSet("update"[b])[/b], ".", "-")), Now) > 30 Then
Medlem sedan dec. 20003 887 inlägg
#5

Oooops! :r

283 ms totalt · 4 externa anrop · v20260731065814-full.d34c6d5a
143 ms — deklarationer (db)
0 ms — hämta statistik (cache)
135 ms — hämta tråd, inlägg och bilagor (db)
132 ms — ändringar (db)