Insert to db when clicking a link.

[Tralesh]

Hi, first post so be gentle!

I am doing a site for a friend that is basically a linking site.

What he wants is for registered individuals to be able to click through image links, when signed in, but be able to track which links they visited.

I, so far, have the login via the home page creating a session called username (original I know!) and was looking at turning each image link into an image submit button. Clicking the image causes an insert statement to run putting the session name into the database.

My question (at last) is; on a response.redirect is it possible to declare the target="_blank" as well? if not any other way to open the link in a new window and do the insert?

[Smokie]

Nope, thats not possible. One option is not to use Resonse.Redirect, but instead Response.Write some javascript which opens a new window which contains a page which does the insert.

[Tralesh]

hmm didn't think it would be. Thanks.

Now I have the problem of convincing Dreamweaver that that is the case. It writes it's own strange code for an insert that looks like this:

Code: Select all

' *** Insert Record: set variables

If (CStr(Request("MM_insert")) = "link") Then

  MM_editConnection = MM_database_sql_STRING
  MM_editTable = "tralesh.bpc_links"
  MM_editRedirectUrl = "property.asp"
  MM_fieldsStr  = "email|value|link_clicked|value|date|value"
  MM_columnsStr = "email|',none,''|link_clicked|',none,''|date|',none,NULL"

  ' create the MM_fields and MM_columns arrays
  MM_fields = Split(MM_fieldsStr, "|")
  MM_columns = Split(MM_columnsStr, "|")
  
  ' set the form values
  For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
    MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_i)))
  Next

  ' append the query string to the redirect URL
  If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then
    If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then
      MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
    Else
      MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
    End If
  End If

End If

So I am guessing something needs to be altered in there to turn that redirect url variable into the Javascript function, which I have no clue as yet on how to do it.

[Trebz]

lol, don't use DW to write ASP and expect to then modify it yourself, doesn't work that way i'm afraid.

I'd write the ASP yourself.

All you want it the for the link to pass something back to the page, either in the session or maybe the querystring so an image link might go to /page.asp?img=1&clicked=true

Code: Select all

If img <> "" and CBool(clicked) = true then
  Call insert function
  display javascript popup to pop img1
  redirect back to /page.asp
else
  display page.asp
end if

[Trebz]

Or even better, have a page called redirect.asp which all these images link to and pass a url variable.

Like redirect.asp?url=http://www.google.com

then log the link and session("username") when it's clicked.

Then for your image links just link them to the redirect and have your target="_blank"