| Author |
 Topic  |
|
|
jensvoll
Starting Member
16 Posts |
 Posted - 27 March 2001 : 20:21:19
|
I've just downloaded userfields v 1.1 and got it installed after some trouble with updating the database (had to input everything in the database, myself), but when trying to access "register", I got an error msg:
Error Type:
Microsoft VBScript compilation (0x800A0401)
Expected end of statement
/forum/inc_profile.asp, line 169, column 70
"<td align=center bgcolor=""" & strCategoryCellColor & """
colspan="""2"""><b>" &_
I then took a look in the readme file that came with Userfields v1.1 and the code it tells me to input to several pages:
<%
'Rem User Field Code #######################################
if (intUserFields > 0) then
Response.write "<tr>" &_
"<td align=center bgcolor=""" & strCategoryCellColor & """ colspan="""2"""><b>" &_
"<font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strHeadFontColor & """>Extra Info..</font></b></td>" &_
"</tr><tr><td></td></tr>"
set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open strConnString
set rs2 = Conn.Execute("SELECT * FROM " & strMemberTablePrefix & "USERFIELDS ORDER BY USR_FIELD_ID")
do until rs2.EOF
fieldValue = getUserFieldValue(rs2("USR_FIELD_ID"),RS("MEMBER_ID"))
Response.Write ("<tr><td valign=""top"" align=""right"" bgColor=" &strPopUpTableColor & " > <b><font face=""" & strDefaultFontFace & """ size=" & strDefaultFontSize & ">" & rs2("USR_LABEL") & ":</font></b></td>")
if rs2("USR_FIELDTYPE") = "T" then
Response.Write "<td valign=""top"" bgColor=""" & strPopUpTableColor & """><textarea maxLength=""255"" name=" & rs2("USR_SHORTNAME") &_
" cols=""20"" rows=3>" & getUserFieldValue(rs2("USR_FIELD_ID"),RS("MEMBER_ID")) & "</textarea></td>"
Else
if rs2("USR_FIELDTYPE") = "S" then
Response.write "<td valign=""top"" bgColor=""" & strPopUpTableColor & """><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>" &_
"<INPUT name=""" & rs2("USR_SHORTNAME") & """ size=""20"" value=""" & getUserFieldValue(rs2("USR_FIELD_ID"),RS("MEMBER_ID")) & """></font></td>"
Else
"<td valign=""top"" bgColor=""" & strPopUpTableColor & """><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>" &_
"<INPUT name=""" & rs2("USR_SHORTNAME") & """ type=""checkbox"" value=""1"" "
If fieldValue = "1" then Response.write "checked"
Response.write "></font></td>"
End If
End If
response.write "</tr>"
rs2.MoveNext
loop
rs2.Close
Conn.close
set Conn = Nothing
end if
'Rem User Field Code #######################################
%>
What is up with all the """"""""""""'s in the code.. I'm totally confused now.. These aren't supposed to be there are they??
|
|
|
HuwR
Forum Admin
United Kingdom
20584 Posts |
Posted - 27 March 2001 : 20:59:20
|
if you mean is this """2""" correct, the answer is yes, just copy the section of code as it is and place it in inc_profile where instructed.
Why did you have to create the db stuff by hand ?
|
 |
|
|
jensvoll
Starting Member
16 Posts |
Posted - 27 March 2001 : 21:20:37
|
Well I get this error msg when I try to access the "Register" page.
Microsoft VBScript compilation (0x800A0401)
Expected end of statement
/forum/inc_profile.asp, line 169, column 70
"<td align=center bgcolor=""" & strCategoryCellColor & """ colspan="""2"""><b>" &_
---------------------------------------------------------------------^
Browser Type:
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)
Page:
POST 56 bytes to /forum/register.asp
POST Data:
Refer=http%3A%2F%2Frj%2Fforum%2Fdefault.asp&submit=Agree
This is the msg I get when I run "User Field Mod" update from "admin_mod_dbsetup.asp" (My database is connected with DSN. Have tried with my current DB (access2000) and a fresh one (access97)):
Creating table(s)...
CREATE TABLE FORUM_MODS( M_NAME varchar(50) NOT NULL , M_CODE varchar(50) NOT NULL , M_VALUE memo NULL )
Table created succesfully
--------------------------------------------------------------------------------
Creating table(s)...
CREATE TABLE FORUM_USERFIELDS( USR_FIELD_ID int IDENTITY (1, 1) NOT NULL , USR_LABEL text (40) NULL , USR_FIELDTYPE text (1) NULL , USR_SHORTNAME text (10) NOT NULL )
-2147217900 | [Microsoft][ODBC Microsoft Access Driver] Syntax error in CREATE TABLE statement.
--------------------------------------------------------------------------------
Creating table(s)...
CREATE TABLE FORUM_MEMBERFIELDS( MEMBER_ID int NOT NULL , USR_FIELD_ID int NOT NULL , USR_VALUE text (50) NULL )
Table created succesfully
--------------------------------------------------------------------------------
Updating Forum Values..
DELETE FROM FORUM_MODS WHERE (M_NAME = 'HModEnable' AND M_CODE = 'UserFields')
13 | Type mismatch
--------------------------------------------------------------------------------
Adding new records..
INSERT INTO FORUM_MODS (M_NAME,M_CODE,M_VALUE) VALUES ('HModEnable','UserFields','1')
Value(s) updated succesfully
|
|
|
|
Martha2Mary
Junior Member
New Zealand
250 Posts |
Posted - 28 March 2001 : 17:12:07
|
quote:
This is the msg I get when I run "User Field Mod" update from "admin_mod_dbsetup.aspUpdating Forum Values..
DELETE FROM FORUM_MODS WHERE (M_NAME = 'HModEnable' AND M_CODE = 'UserFields')
13 | Type mismatch
I am also getting the above error message when running admin_mod_dbsetup.asp, and now wonder if that is why I cannot enable User Fields - every time I do, and I return to the page where you do enable it after enabling it, it is showing as not being enabled. Have had this prob for a while now, and don't know how to fix it :(
*If the world didn't suck, we'd all fall off!  * |
|
|
|
HuwR
Forum Admin
United Kingdom
20584 Posts |
Posted - 28 March 2001 : 17:42:48
|
quote:
Well I get this error msg when I try to access the "Register" page.
Microsoft VBScript compilation (0x800A0401)
Expected end of statement
/forum/inc_profile.asp, line 169, column 70
"<td align=center bgcolor=""" & strCategoryCellColor & """ colspan="""2"""><b>" &_
---------------------------------------------------------------------^
Browser Type:
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)
Page:
POST 56 bytes to /forum/register.asp
POST Data:
Refer=http%3A%2F%2Frj%2Fforum%2Fdefault.asp&submit=Agree
This is the msg I get when I run "User Field Mod" update from "admin_mod_dbsetup.asp" (My database is connected with DSN. Have tried with my current DB (access2000) and a fresh one (access97)):
Creating table(s)...
CREATE TABLE FORUM_MODS( M_NAME varchar(50) NOT NULL , M_CODE varchar(50) NOT NULL , M_VALUE memo NULL )
Table created succesfully
--------------------------------------------------------------------------------
Creating table(s)...
CREATE TABLE FORUM_USERFIELDS( USR_FIELD_ID int IDENTITY (1, 1) NOT NULL , USR_LABEL text (40) NULL , USR_FIELDTYPE text (1) NULL , USR_SHORTNAME text (10) NOT NULL )
-2147217900 | [Microsoft][ODBC Microsoft Access Driver] Syntax error in CREATE TABLE statement.
--------------------------------------------------------------------------------
Creating table(s)...
CREATE TABLE FORUM_MEMBERFIELDS( MEMBER_ID int NOT NULL , USR_FIELD_ID int NOT NULL , USR_VALUE text (50) NULL )
Table created succesfully
--------------------------------------------------------------------------------
Updating Forum Values..
DELETE FROM FORUM_MODS WHERE (M_NAME = 'HModEnable' AND M_CODE = 'UserFields')
13 | Type mismatch
--------------------------------------------------------------------------------
Adding new records..
INSERT INTO FORUM_MODS (M_NAME,M_CODE,M_VALUE) VALUES ('HModEnable','UserFields','1')
Value(s) updated succesfully
What DB and connsction string are you using ?
|
|
|
|
HuwR
Forum Admin
United Kingdom
20584 Posts |
Posted - 28 March 2001 : 17:44:23
|
quote:
quote:
This is the msg I get when I run "User Field Mod" update from "admin_mod_dbsetup.aspUpdating Forum Values..
DELETE FROM FORUM_MODS WHERE (M_NAME = 'HModEnable' AND M_CODE = 'UserFields')
13 | Type mismatch
I am also getting the above error message when running admin_mod_dbsetup.asp, and now wonder if that is why I cannot enable User Fields - every time I do, and I return to the page where you do enable it after enabling it, it is showing as not being enabled. Have had this prob for a while now, and don't know how to fix it :(
*If the world didn't suck, we'd all fall off! *
This should not cause a problem, could you send me your config.asp and if you have one , mod_config.asp, I will check them.
Could you please mention your Snitz user name in the email
|
|
|
|
Martha2Mary
Junior Member
New Zealand
250 Posts |
Posted - 28 March 2001 : 18:02:19
|
quote:
This should not cause a problem, could you send me your config.asp and if you have one , mod_config.asp, I will check them.
Could you please mention your Snitz user name in the email
Hi Huw,
Was just about to send you the email when I thought I'd take a nosey at mod_config.asp, and.......ta-da! I managed to fix it myself - just needed to uncomment the lines referring to userfields, so all is working
But, (yeah, there had to be one, eh!), when using Userfields set to Multi Line, I got the error message about too much data, try inserting less, even though I hadn't typed much in. Is there a 'memo' thing that may need editing somewhere?
TIA!
*If the world didn't suck, we'd all fall off! * |
|
|
|
HuwR
Forum Admin
United Kingdom
20584 Posts |
Posted - 28 March 2001 : 18:19:05
|
quote:
quote:
This should not cause a problem, could you send me your config.asp and if you have one , mod_config.asp, I will check them.
Could you please mention your Snitz user name in the email
Hi Huw,
Was just about to send you the email when I thought I'd take a nosey at mod_config.asp, and.......ta-da! I managed to fix it myself - just needed to uncomment the lines referring to userfields, so all is working
But, (yeah, there had to be one, eh!), when using Userfields set to Multi Line, I got the error message about too much data, try inserting less, even though I hadn't typed much in. Is there a 'memo' thing that may need editing somewhere?
TIA!
*If the world didn't suck, we'd all fall off! *
If you open the table FORUM_MEMBERFIELDS, you need to increase the size of USR_VALUE it is only set to 50 by default.
|
|
|
|
Martha2Mary
Junior Member
New Zealand
250 Posts |
Posted - 28 March 2001 : 20:55:16
|
Thanks, Huw - all working perfectly now 
*If the world didn't suck, we'd all fall off! * |
|
|
|
dkerns
Starting Member
14 Posts |
Posted - 06 May 2001 : 11:25:38
|
There are a number of *typos* errors in the code provided in the readme file. I didn't keep track of them as I worked to get the code to work but there are at least two in the code below (highlighted in red). Most of the errors are missing ampersands. I am using Configurable User Fields v2.0.
Add:
'Rem User Field Code #######################################
if (intUserFields = 1 ) then
Response.write "<tr>" &_
"<td align=center bgcolor=""" & strCategoryCellColor & """ colspan=""2"">" &_
"<b><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize """ color=""" & strHeadFontColor & """>"
"More About Me</font></b></td>"
Response.write "</tr>" &_
"<tr><td></td></tr>"
set rs2 = My_Conn.Execute("SELECT * FROM " & strMemberTablePrefix & "USERFIELDS ORDER BY USR_FIELD_ID")
do until rs2.EOF
Response.Write ("<tr><td valign=""top"" width=150 align=""right"" bgColor=" &strPopUpTableColor & "> <b><font face=""" & strDefaultFontFace & """ size=" & strDefaultFontSize & ">" & rs2("USR_LABEL") & ":</font></b></td>")
if rs2("USR_FIELDTYPE") = "C" then
Response.write "<td valign=""top"" bgColor=""" & strPopUpTableColor & """>" &_
"<font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize """ >"
if getUserFieldValue(rs2("USR_FIELD_ID"),RS("MEMBER_ID")) = "1" then
response.write "Yes"
Else
response.write "No"
End If
response.write "</font></td>"
Else
response.write "<td valign=""top"" bgColor=""" & strPopUpTableColor & """>" &_
"<font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ >" & getUserFieldValue(rs2("USR_FIELD_ID"),RS("MEMBER_ID")) & "</font></td>"
End If
Response.write "</tr>"
rs2.MoveNext
loop
rs2.Close
end if
'Rem User Field Code #######################################
|
|
|
| |
Topic |
|
|
|
Topic Locked
