Der skal skrives til en databse og fortælle hits + 1
Jeg har prøvet med følgende men uden succes!
<% Response.Buffer = True
Set myConn = Server.CreateObject("ADODB.Connection") myConn.open "DBQ=xxx;Driver={Microsoft Access Driver (*.mdb)};" If Request.QueryString("id") <> "" Then Set rs = Server.CreateObject("ADODB.RecordSet") strSQL = "SELECT * FROM products WHERE (code_no = " & Request.QueryString("id") & ")" rs.Open strSQL, myConn, 1, 3 If Not (rs.BOF Or rs.EOF) Then rs("hits") = rs("hits") + 1 strURL = Trim(Request.Form("www")) rs.Update rs.Close myConn.Close Set rs = Nothing Set myConn = Nothing Response.Clear Response.Redirect(strURL) End If End If %>
Hvis du bruger method=post på din form og id er et form felt så skal du i ASP koden bruge Request.Form("id") Request.QueryString bruges ved method=get smat når det står i linket xx.asp?id=348
If Request.Form("id") <> "" Then
og i SQLen strSQL = "SELECT * FROM products WHERE (code_no = " & Request.form("id") & ")"
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.