webForumDet fria alternativet

Microsoft VBScript runtime error

ASPur ASP

4 svar · 232 visningar · startad av pillan

pillanMedlem sedan juli 20028 inlägg
#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

VideMedlem 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". :)

Engine^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
SebbeMedlem 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
Engine^Medlem sedan dec. 20003 887 inlägg
#5

Oooops! :r

279 ms totalt · 3 externa anrop · v20260731065814-full.29ac60f6
122 ms — hämta forumlista (db)
0 ms — hämta statistik (cache)
276 ms — hämta tråd, inlägg och bilagor (db)