24. april 2006 - 22:55
Der er
1 kommentar og 1 løsning
Iplogger til database
hejsa, jeg vil gerne have Folks ip-adresse skrevet ind i databasen, men jeg kan ikke huske hvordan jeg skal skrive sætningen. jeg har lavet kolonnen i databasen. strSQL4 = "INSERT INTO Data (ip, Navn, Email, Emne, Kommentar, ForumID, ForumSvar) VALUES('"ip = Request.ServerVariables("REMOTE_ADDR")"','" & Trim(Replace(Request.Form("Navn"), "'", "’")) & "', '" & Trim(Replace(Replace(Request.Form("Email"), "’", ""), "'", "")) & "', '" & Trim(Replace(Request.Form("Emne"), "'", "’")) & "', '" & Trim(Replace(Request.Form("Kommentar"), "'", "’")) & "', '" & Request("ForumID") & "', True)"
Annonceindlæg tema
Offentlig digitalisering
Fra effektivisering til digital suverænitet. Hvordan skaber det offentlige en digital fremtid med AI, sikkerhed og kontrol i centrum?
24. april 2006 - 23:03
#1
Prøv sådan her: strSQL4 = "INSERT INTO Data (ip, Navn, Email, Emne, Kommentar, ForumID, ForumSvar) VALUES('" & Request.ServerVariables("REMOTE_ADDR") & "','" & Trim(Replace(Request.Form("Navn"), "'", "’")) & "', '" & Trim(Replace(Replace(Request.Form("Email"), "’", ""), "'", "")) & "', '" & Trim(Replace(Request.Form("Emne"), "'", "’")) & "', '" & Trim(Replace(Request.Form("Kommentar"), "'", "’")) & "', '" & Request("ForumID") & "', True)"
26. april 2006 - 16:41
#2
du kan ikke regne med at Request.ServerVariables("REMOTE_ADDR") er den rigtige ip-adresse. brig i stedet for denne Dim proxyIP, normalIP proxyIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR") normalIP = Request.ServerVariables("REMOTE_ADDR") If proxyIP = doublequote Then 'If the user is not behind a proxy ip_adresse = normalIP Else 'If the user is behind a proxy ip_adresse = proxyIP End If strSQL4 = "INSERT INTO Data (ip, Navn, Email, Emne, Kommentar, ForumID, ForumSvar) VALUES('" & ip_adresse & "','" & Trim(Replace(Request.Form("Navn"), "'", "’")) & "', '" & Trim(Replace(Replace(Request.Form("Email"), "’", ""), "'", "")) & "', '" & Trim(Replace(Request.Form("Emne"), "'", "’")) & "', '" & Trim(Replace(Request.Form("Kommentar"), "'", "’")) & "', '" & Request("ForumID") & "', True)"
Kurser inden for grundlæggende programmering