Snitz Forums 2000 - Getting forum cookie variables for further uses

Snitz Forums 2000

Username:	Password:
Save Password
Forgot your Password?

All Forums

Help Groups for Snitz Forums 2000 Users

Help: General / Current Version (Old)

Getting forum cookie variables for further uses

New Topic

Topic Locked

Printer Friendly

Author

Topic

LilPeck
Starting Member

3 Posts

Posted - 28 June 2008 : 08:10:10

I want to carry the forum login over to new pages I'm writing; I'm using the forum and it's db as a starting point for a site with articles and comments.

I searched here and couldn't find the info I needed but this script got it for me:

<%
Dim x,y

For Each x in Request.Cookies
Response.Write("")
If Request.Cookies(x).HasKeys Then
For Each y in Request.Cookies(x)
Response.Write(x & ":" & y & "=" & Request.Cookies(x)(y))
Response.Write(" ")
Next
Else
Response.Write(x & "=" & Request.Cookies(x) & " ")
End If
Response.Write ""
Next
%>

Having gotten the cookie name and the key
(request.cookies("Snitz00User")("Name")) with the script above then I saw that I can put the User ID primary key into a new table field as needed with something like this:

<%
strUserName = (request.cookies("Snitz00User")("Name"))
response.write strUserName
%>

<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open server.mappath("/snitz_forums_2000.mdb")

set rs = Server.CreateObject("ADODB.recordset")
rs.Open "SELECT MEMBER_ID FROM FORUM_MEMBERS WHERE M_NAME='" & strUserName & "'", conn

do until rs.EOF
for each x in rs.Fields
Response.Write(x.name)
Response.Write(" = ")
Response.Write(x.value & " ")
next
Response.Write(" ")
rs.MoveNext
loop

rs.close
conn.close
%>

Here's how to get a unix timestamp as used in the forum:

<%
Udate = DateDiff("s", "01/01/1970 00:00:00", Now())
response.write" Udate: " & Udate
%><

HuwR
Forum Admin