Jag vill att medlemmarnas ip registreras i databasen.

register.asp
---------------

Insert into.....
..." " userIP, " & vbCrLf & _

"I values"
..." & Request.ServerVariables("REMOTE_ADDR") & "



Fel
-----
Syntax error in number in query expression '213.68.17.219'

Du måste spara den som sträng:

<code>
strSQL = "INSERT INTO TabellNamn (Fält1, userIP, Fält3)" & vbCrLf & _
"VALUES ('Adam', '" & Request.ServerVariables("REMOTE_ADDR") & "', 'Adam@hotmail.com')"
</code>

Databasen kan även returnera fel om du inte valt korrekt fälttyp...

personligen lagrar jag dem som 'varchar' i mySQL
i access brukar 'text' fungera...

// eric

andreas, det e så jag har gjort, har bara inte visat hela koden.

jag har testat både med nummer och text i databasen, men funkar ändå inte

Ta med hela SQL satsen.

Vad är "I values"?

<code>
strSQL = "INSERT INTO tblUsers (userLoginName, " & vbCrLf & _
" userPassword, " & vbCrLf & _
" userEmail, " & vbCrLf & _
" userFullName, " & vbCrLf & _
" userPresentation, " & vbCrLf & _
" userIP, " & vbCrLf & _
" userRegistred)" & vbCrLf & _
"VALUES (" & SQLText(strLoginName) & ", " & vbCrLf & _
" " & SQLText(strPassword) & ", " & vbCrLf & _
" " & SQLText(strEmail) & ", " & vbCrLf & _
" " & SQLText(strFullName) & ", " & vbCrLf & _
" " & SQLText(strPresentation) & ", " & vbCrLf & _
" " & Request.ServerVariables("REMOTE_ADDR") & ", " & vbCrLf & _
" " & SQLText(Now()) & ")"
</code>

:)

Tror nog att du har missat några '-fjuttar..

Du har glömt att formatera värdet med SQLText:
<code>
strSQL = "INSERT INTO tblUsers (userLoginName, " & vbCrLf & _
" userPassword, " & vbCrLf & _
" userEmail, " & vbCrLf & _
" userFullName, " & vbCrLf & _
" userPresentation, " & vbCrLf & _
" userIP, " & vbCrLf & _
" userRegistred)" & vbCrLf & _
"VALUES (" & SQLText(strLoginName) & ", " & vbCrLf & _
" " & SQLText(strPassword) & ", " & vbCrLf & _
" " & SQLText(strEmail) & ", " & vbCrLf & _
" " & SQLText(strFullName) & ", " & vbCrLf & _
" " & SQLText(strPresentation) & ", " & vbCrLf & _
" " & SQLText(Request.ServerVariables("REMOTE_ADDR")) & ", " & vbCrLf & _
" " & SQLText(Now()) & ")"
</code>
Roligt att se att min funktion kommer till användning. ;o)

Annars så skall PM funka bra

tack, lite klantigt av mig att inte se d... (;

jo, tror att d var du som hjälpte mig innan att fixa d så =P

Nu blir jag intresserad av min okunskap, vad är SQLText för funktion?

<code>
Function SQLText(Value)
If Len(Value) Then
SQLText = "'" & Replace(Value, "'", "''") & "'"
Else
SQLText = "Null"
End If
End Function
</code>