Hjælp med denne fejl?

det er koden for fejlen

set tr = server.CreateObject("ADODB.Recordset")
    tr.Open "select * from hot_visiter where visit_ip='" & ip & "'", conn, 2, 2
 
if not tr.EOF then
                     
tr("visit_ip") = now()
tr.Update

else
tr.AddNew
tr("visit_ip") = ip
tr("visit_date") = now()
tr("visit_times") =  1
tr.update
end if

Skal:

tr("visit_ip") = now()

- ikke være:

tr("visit_date") = now()

?

jo men det er ikke det der er fejlen, jeg har prøvet ???? da jeg prøvede denne kode første gang, der kørte den fint, men pludselig fejlmeldte den????

Fejlmeddelelsen stemmer ellers fint overens med at det er det der skulle være galt. Du prøver at putte et tidspunkt ind i et felt som er beregnet til at modtage en tekst.

Det kan også forklare at det har virket en gang, men så holder op med at virke; Første omgang at koden køres med et bestemt IP, er det else-delen der bliver kørt. Hvis man forsøger at køre koden endnu en gang mens at man har det *samme* IP-nummer, vil det imidlertid være if-delen der køres.

det er ellers rigtigt hvad du siger, den virker første gang, med anden gang virker den ikke mere....jeg har også fået at vide at det måske er en fejl i min db?

Jeg har følgende:
visitip = varchar(30)
visit_date = datetime
visittimes = text

Har du prøvet den rettelse som jeg angiver? Ud over at den (sandsynligvis) retter fejlen, synes jeg at den virker mere rigtig i forhold til hvad skriptet skal gøre.

Ja jeg har prøvet den, jeg har prøvet meget... men ved helt ærlig ikke hvad fejlen er, kan det være noget med db?

Det er jo i hvert fald en database-fejl.

Prøv at slette rækken i databasen og se om skriptet køre igennem første gang, og fejler anden gang.

Altså jeg kan indsætte så man gange jeg vil, men hvis jeg skal overskrive får jeg dette problem ? håber du kan hjælpe mig

??? har prøvet samme kode med en anden domæne og anden server. virker fint ???

hvad mon problemet i db så er ???

Tja, men så må deet vel nø'dvendigvis være et problem med databasen. Der synes ikke at være nogen anden forklaring end at den er syg på en eller anden måde.

Men koden skal - uanset fejl eller ej - være dette:

Set tr = Server.CreateObject("ADODB.Recordset")
tr.Open "SELECT * FROM hot_visiter WHERE visit_ip = '" & ip & "'", conn, 2, 2

If Not tr.EOF Then
    tr("visit_date") = Now()
    tr("visit_times") = tr("visit_times") + 1
    tr.Update
Else
    tr.AddNew
    tr("visit_ip") = ip
    tr("visit_date") = Now()
    tr("visit_times") = 1
    tr.Update
End If

yes , det er den

men hvad kan problemet være i db ? ... for jeg har sat præsic de samme opysninger i min anden db, og den virker fint

lukker