webForumDet fria alternativet
Logga in / Bli medlem

Microsoft VBScript runtime error

ASP

4 svar · 234 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

263 ms totalt · 4 externa anrop · v20260731065814-full.51f67c91
122 ms — deklarationer (db)
0 ms — hämta statistik (cache)
133 ms — hämta tråd, inlägg och bilagor (db)
127 ms — ändringar (db)