Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
Password:
Save Password
Forgot your Password?

 All Forums
 Community Forums
 Code Support: ASP (Non-Forum Related)
 SQL String Error
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

psalesses
New Member

50 Posts

Posted - 27 August 2001 :  09:37:10  Show Profile
Hey guys,

This is my error:

ADODB.Recordset error '800a0bb9'

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/scripts/register/modify2.asp, line 28


This is my code:
[code]
strConnString = "driver={SQL Server};server=alllacrosseamerica.com;uid=*;pwd=*;database=alaforums" '## MS SQL Server 7

set my_Conn = Server.CreateObject("ADODB.Connection")
set ors = server.createobject("adodb.recordset")
my_Conn.Open strConnString
LINE 28: ors.Open "Select M_FIRSTNAME, M_LASTNAME, M_NAME, M_PASSWORD, M_EMAIL, M_CITY, M_AIM, M_SEX, M_AGE, M_BIO, M_COUNTRY, M_PHOTO_URL, M_QUOTE, M_STATE, PROFESSIONAL, MENSCOLLEGE, WOMENSCOLLEGE, MENSHIGHSCHOOL, WOMENSHIGHSCHOOL, INTERNATIONAL, YOUTH, THEBACKPAGE, M_DATE, M_LAST_IP, M_IP, M_STATUS, M_POSTS, M_LASTHEREDATE, M_SIG FROM FORUM_MEMBERS WHERE M_NAME = '" & request.cookies("ALA01User")("Name") & "'", MyConn, 1, 3
ors.Fields("M_firstname") = request.form("firstname")
ors.Fields("M_LastName") = request.form("lastname")
ors.Fields("M_Name") = request.form("username")
ors.Fields("M_Password") = request.form("password")
ors.Fields("M_Email") = request.form("email")
ors.Fields("M_CITY") = request.form("city")
ors.Fields("M_AIM") = request.form("aim")
ors.Fields("M_SEX") = request.form("sex")
ors.Fields("M_AGE") = request.form("age")
ors.Fields("M_BIO") = request.form("bio")
ors.Fields("M_COUNTRY") = request.form("country")
ors.Fields("M_PHOTO_URL") = request.form("picurl")
ors.Fields("M_QUOTE") = request.form("favquote")
ors.Fields("M_STATE") = request.form("state")
'CUSTOM NEWS
if request.form("professional") = "1" then
ors.Fields("professional") = "1"
else
ors.Fields("professional") = "0"
end if
if request.form("menscollege") = "1" then
ors.Fields("menscollege") = "1"
else
ors.Fields("menscollege") = "0"
end if
if request.form("womenscollege") = "1" then
ors.Fields("womenscollege") = "1"
else
ors.Fields("womenscollege") = "0"
end if
if request.form("menshighschool") = "1" then
ors.Fields("menshighschool") = "1"
else
ors.Fields("menshighschool") = "0"
end if
if request.form("womenshighschool") = "1" then
ors.Fields("womenshighschool") = "1"
else
ors.Fields("womenshighschool") = "0"
end if
if request.form("international") = "1" then
ors.Fields("international") = "1"
else
ors.Fields("international") = "0"
end if
if request.form("youth") = "1" then
ors.Fields("youth") = "1"
else
ors.Fields("youth") = "0"
end if
if request.form("thebackpage") = "1" then
ors.Fields("thebackpage") = "1"
else
ors.Fields("thebackpage") = "0"
end if
ors.Fields("M_DATE") = DateToStr(strForumTimeAdjust)
ors.Fields("M_LAST_IP") = Request.ServerVariables("REMOTE_ADDR")
ors.Fields("M_IP") = Request.ServerVariables("REMOTE_ADDR")
ors.Fields("M_STATUS") = 1
ors.Fields("M_POSTS") = 0
ors.Fields("M_LASTHEREDATE") = DateToStr(strForumTimeAdjust)
ors.Fields("M_SIG") = request.form("signature")

ors.update
'-------------------------SET COOKIE-------------------------------
ors.close
set ors = nothing
my_Conn.close
set my_Conn=nothing
%>



Edited by - psalesses on 28 August 2001 11:06:35

MorningZ
Junior Member

USA
169 Posts

Posted - 27 August 2001 :  22:40:23  Show Profile  Visit MorningZ's Homepage  Send MorningZ an AOL message
what line is 28 ?
Go to Top of Page

psalesses
New Member

50 Posts

Posted - 28 August 2001 :  11:06:59  Show Profile
Check it now...i updated the line 29 error

Go to Top of Page

davemaxwell
Access 2000 Support Moderator

USA
3020 Posts

Posted - 28 August 2001 :  13:15:35  Show Profile  Visit davemaxwell's Homepage  Send davemaxwell an AOL message  Send davemaxwell an ICQ Message  Send davemaxwell a Yahoo! Message
Check what is in request.cookies("ALA01User")("Name"). That is probably what is causing you grief...

Dave Maxwell
--------------
Proud to be a "World Class" Knucklehead
Go to Top of Page

Craig from Alberta
Starting Member

Canada
7 Posts

Posted - 28 August 2001 :  16:33:18  Show Profile  Visit Craig from Alberta's Homepage
In the SQL statement you define the Connection as being MyConn wheras the object is created as my_conn

Go to Top of Page

davemaxwell
Access 2000 Support Moderator

USA
3020 Posts

Posted - 29 August 2001 :  08:56:20  Show Profile  Visit davemaxwell's Homepage  Send davemaxwell an AOL message  Send davemaxwell an ICQ Message  Send davemaxwell a Yahoo! Message
Well that was just too obvious. Good catch Craig....

Dave Maxwell
--------------
Proud to be a "World Class" Knucklehead
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Topic Locked
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.24 seconds. Powered By: Snitz Forums 2000 Version 3.4.07