This function
function getMemberNumber(fUser_Name)
'## This function should always be the same as the one in inc_functions.asp !
'## Forum_SQL
strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.MEMBER_ID "
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS "
strSql = strSql & " WHERE " & strDBNTSQLName & " = '" & fUser_Name & "'"
Set rsGetMemberNumber = Server.CreateObject("ADODB.Recordset")
rsGetMemberNumber.open strSql, my_Conn
if rsGetMemberNumber.EOF or rsGetMemberNumber.BOF then
getMemberNumber = -1
rsGetMemberNumber.close
set rsGetMemberNumber = nothing
exit function
end if
getMemberNumber = rsGetMemberNumber("MEMBER_ID")
rsGetMemberNumber.close
set rsGetMemberNumber = nothing
end function
Does not work with the new bugfix in register.asp
Replacing it with the following
function getMemberNumber(fUser_Name)
'## Forum_SQL
strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.MEMBER_ID "
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS "
strSql = strSql & " WHERE " & strDBNTSQLName & " = '" & chkString(fUser_Name,"SQLString") & "'"
Set rsGetMemberNumber = Server.CreateObject("ADODB.Recordset")
rsGetMemberNumber.open strSql, my_Conn
if rsGetMemberNumber.EOF or rsGetMemberNumber.BOF then
getMemberNumber = -1
rsGetMemberNumber.close
set rsGetMemberNumber = nothing
exit function
end if
getMemberNumber = rsGetMemberNumber("MEMBER_ID")
rsGetMemberNumber.close
set rsGetMemberNumber = nothing
end function
Fixed for 3.4
---------------
-Da_Stimulator
Stims Snitz Test area - Running 3.3.03, 4 beta, and Huw's modified code
Need a Mod? Check out the Mod Resource
Forum Locked
Topic Locked
Posted - 07 November 2001 : 23:31:59
