I keep on getting the error:
ADODB.Recordset error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
/testing/index.asp, line 8
What needs to be changed, and if you could explain y also, that would be great.
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim news_recordset
Dim news_recordset_numRows
Set news_recordset = Server.CreateObject("ADODB.Recordset")
news_recordset.Source = "SELECT date, message FROM news_messages ORDER BY date DESC"
news_recordset.ActiveConnection = objConn
news_recordset.CursorLocation = 2
news_recordset.CursorType = 0
news_recordset.LockType = 1
news_recordset.Open()
news_recordset_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = 3
Repeat1__index = 0
news_recordset_numRows = news_recordset_numRows + Repeat1__numRows
%>
<html>
<head>
<title>Top Deck Cards - Home</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
</head>
<body text="#000000" link="#FFFFFF" vlink="#FFFFFF" alink="#FFFFFF" onLoad="MM_preloadImages('baseball.gif','baseball_ guy.gif')">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="246" rowspan="3"><a href="#" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image10','','/images/images/baseball_guy.gif',1)"><img src="/images/images/wizard_guy.gif" name="Image10" width="246" height="123" border="0"></a></td>
<td width="60" height="66"><img src="/images/images/last_name.gif" width="60" height="66"></td>
<td valign="top"> <div align="right"><strong>6238 Main
Street<br>
Downers Grove, IL 60516<br>
</strong> <strong>(630) 435-9900</strong></div></td>
</tr>
<tr>
<td height="26" colspan="2"><a href="http://www.topdeckcards.com/#"><img src="/images/images/welcome.gif" width="59" height="26" border="0" onMouseOver="showit(0)"></a><img src="/images/images/sports.gif" onMouseOver="showit(1)" width="48" height="26"><img src="/images/images/card_games.gif" onMouseOver="showit(2)" width="76" height="26"><img src="/images/images/other_games.gif" onMouseOver="showit(3)" width="81" height="26"><img src="/images/images/supplies.gif" onMouseOver="showit(4)" width="57" height="26"><a href="http://www.topdeckcards.com/events.asp"><img src="/images/images/events.gif" width="50" height="26" border="0" onMouseOver="showit(5)"></a><a href="http://www.topdeckcard.scom/cunstruct.htm"><img src="/images/images/about_us.gif" width="62" height="26" border="0" onMouseOver="showit(6)"></a><a href="http://www.topdeckcards.com/cunstruct.htm"><img src="/images/images/links.gif" width="43" height="26" border="0" onMouseOver="showit(7)"></a></td>
</tr>
<tr>
<td height="31" colspan="2" background="/images/images/bar_background.gif"><div align="left" id="describe"onMouseover="clear_delayhide()" onMouseout="resetit(event)">
<div align="left">
<script language="JavaScript1.2">
/*
Tabs Menu (mouseover)- By Dynamic Drive
For full source code and more DHTML scripts, visit
http://www.dynamicdrive.com
This credit MUST stay intact for use
*/
var submenu=new Array()
//Set submenu contents. Expand as needed. For each content, make sure everything exists on ONE LINE. Otherwise, there will be
JS errors.
submenu[0]=''
submenu[1]='<b><a href="http://www.topdeckcards.com/construct.htm ">Baseball Boxes</a> | <a href="http://www.topdeckcards.com/construct.htm ">Baseball Singles</a> | <a href="http://www.topdeckcards.com/construct.htm ">Basketball Boxes</a> | <a href="http://www.topdeckcards.com/construct.htm ">Basketball Singles</a> | <a href="http://www.topdeckcards.com/construct.htm ">Hockey Boxes</a> | <a href="http://www.topdeckcards.com/construct.htm ">Hockey Singles</a> | <a href="http://www.topdeckcards.com/construct.htm ">Football Boxes</a> | <a href="http://www.topdeckcards.com/construct.htm ">Football Singles</a> | <a href="http://www.topdeckcards.com/construct.htm ">Other Collectibles</a></b>'
submenu[2]='<b><a href="http://www.topdeckcards.com/construct.htm">Magic Boxes</a> | <a href="http://www.topdeckcards.com/construct.htm">Magic Singles</a> | <a href="http://www.topdeckcards.com/construct.htm">Warlord Boxes</a> | <a href="http://www.topdeckcards.com/construct.htm">Warlord Singles</a> | <a href="http://www.topdeckcards.com/construct.htm">MLB Showdown Boxes</a> | <a href="http://www.topdeckcards.com/construct.htm">Magi Nation Boxes</a> | <a href="http://www.topdeckcards.com/construct.htm">YuGiOh Singles</a> | <a href="http://www.topdeckcards.com/construct.htm">Yu-Gi-Oh Boxes</a> | <a href="http://www.topdeckcards.com/construct.htm">Yu-Gi-Oh Singles</a> | <a href="http://www.topdeckcards.com/construct.htm ">Pokemon Boxes</a></b>'
submenu[3]='<b><a href="http://www.topdeckcards.com/construct.htm">Dungeons & Dragons</a> | <a href="http://www.topdeckcards.com/construct.htm">MechWarrior</a> | <a href="http://www.topdeckcards.com/construct.htm">Hero Clix</a> | <a href="http://www.topdeckcards.com/construct.htm">Mage Knight</a></b>'
submenu[4]='<b><a href="http://www.topdeckcards.com/construct.htm">All Supplies</a> | <a href="http://www.topdeckcards.com/construct.htm">Sleeves & Protectors</a> | <a href="http://www.topdeckcards.com/construct.htm">Card Board Boxes</a> | <a href="http://www.topdeckcards.com/construct.htm">Carrying Cases</a></b>'
submenu[5]=''
submenu[6]=''
submenu[7]=''
var delay_hide=1
/////No need to edit beyond here
var menuobj=document.getElementById? document.getElementById("describe") : document.all? document.all.describe : document.layers? document.dep1.document.dep2 : ""
function showit(which){
clear_delayhide()
thecontent=(which==-1)? "" : submenu[which]
if (document.getElementById||document.all)
menuobj.innerHTML=thecontent
else if (document.layers){
menuobj.document.write(thecontent)
menuobj.document.close()
}
}
function resetit(e){
if (document.all&&!menuobj.contains(e.toElement))
delayhide=setTimeout("showit(-1)",delay_hide)
else if (document.getElementById&&e.currentTarget!= e.relatedTarget&& !contains_ns6(e.currentTarget, e.relatedTarget))
delayhide=setTimeout("showit(-1)",delay_hide)
}
function clear_delayhide(){
if (window.delayhide)
clearTimeout(delayhide)
}
function contains_ns6(a, b) {
while (b.parentNode)
if ((b = b.parentNode) == a)
return true;
return false;
}
</script>
</div></td>
</tr>
</table>
<br>
<table width="100%" height="309" border="0" cellpadding="0" cellspacing="0">
<tr valign="top">
<td width="23%" height="309">
<table width="100%" height="309" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="309" valign="top">
<table width="100%" cellpadding="0" cellspacing="0">
<tr>
<td width="9" height="27"><img src="/images/images/left_header.gif" width="9" height="27"></td>
<td width="100%" height="26" background="/images/images/back_header.gif"><div align="center">Mailing
List </div></td>
<td width="9"><img src="/images/images/right_header.gif" width="9" height="27"></td>
</tr>
</table>
<script language="JavaScript" src="/includes/validation.
js"></script>
<script language="JavaScript">
function validate(returnvalue)
{
//Validation Control Center
//Use validateNotEmpty(fieldname,errormessage) to check if the field is empty
//Use validateEMailCheck(fieldname,errormessage) to check if the email address is valid
//These must go inside if statement
var anError
if(validateNotEmpty(document.MailingList.Email.val ue,"You must enter your e-mail address")==false){anError=true}else{
if(validateEMailCheck(document.MailingList.Email.v alue,"You must enter a valid e-mail address for yourself")==false){anError=true}else{
if(document.MailingList.SportsMailing.checked==fal se && document.MailingList.GamingMailing.checked==false) {alert("You must choose at least one topic");anError=true;}}}
if(anError==true)
{return false;}else{NewWindow('','Mailing',452,325,'no');r eturn true}
}
</script> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#333333"><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td width="100%" height="50" bgcolor="#FFFF66"><div align="center"><b>
<form name="MailingList" method="POST" action="/addmailing.asp" target="Mailing" onSubmit="return validate('yes');">
<div align="center"><img border="0" src="/images/images/spacer.gif" height="5" width="5"><br>
E-Mail:
<input type="text" name="Email" size="20">
<b> <br>
<img border="0" src="/images/images/spacer.gif" height="5" width="5"><br>
</b><strong>Topics:</strong>
<input type="checkbox" name="SportsMailing" value="Yes">
Sports
<input type="checkbox" name="GamingMailing" value="Yes">
Gaming
<br>
<img border="0" src="/images/images/spacer.gif" height="5" width="5"><br>
<input type="submit" value="Join" name="B1">
</div>
</form>
</b></div></td>
</table></td>
</tr>
</table>
<br> <table width="100%" cellpadding="0" cellspacing="0">
<tr>
<td width="9" height="27"><img src="/images/images/left_header.gif" width="9" height="27"></td>
<td width="100%" height="26" background="/images/images/back_header.gif"><div align="center">Upcoming
Products</div></td>
<td width="9"><img src="/images/images/right_header.gif" width="9" height="27"></td>
</tr>
</table>
<table width="100%" height="61" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="61" bgcolor="#333333"> <table width="100%" height="100%" border="0" cellpadding="1" cellspacing="1">
<tr>
<td bgcolor="#FFFFFF"> <div align="center"><br>
Coming Soon</div>
<div align="center">
<p> </p>
</div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="2%"> </td>
<td width="75%">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="top">
<table width="100%" cellpadding="0" cellspacing="0">
<tr>
<td width="9" height="27"><img src="/images/images/left_header.gif" width="9" height="27"></td>
<td width="100%" height="26" background="/images/images/back_header.gif"><div align="center">News</div></td>
<td width="9"><img src="/images/images/right_header.gif" width="9" height="27"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#333333"><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td width="100%" height="59" bgcolor="#FFFFFF">
<div align="left">
<table width="95%" border="0" align="center" cellpadding="2" cellspacing="2">
<tr>
<td width="87"><strong>Date:</strong></td>
<td width="718"><strong>Message:</strong></td>
</tr>
<% While ((Repeat1__numRows <> 0) AND (NOT news_recordset.EOF)) %>
<tr>
<td width="87"><%=(news_recordset.Fields.Item("date"). Value)%></td>
<td><%=(news_recordset.Fields.Item("message").Valu e)%></td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
news_recordset.MoveNext()
Wend
%>
</table>
</div></td>
</tr>
</table></td>
</tr>
</table>
<br>
<table width="100%" cellpadding="0" cellspacing="0">
<tr>
<td width="9" height="27"><img src="/images/images/left_header.gif" width="9" height="27"></td>
<td width="100%" height="26" background="/images/images/back_header.gif"><div align="center">Weekly
Specials</div></td>
<td width="9"><img src="/images/images/right_header.gif" width="9" height="27"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#333333"><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td width="100%" bgcolor="#FFFFFF"><div align="center"><br>
Coming Soon<br>
<br>
</div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
</table>
<div align="center">
<p><em>Site Designed by: <a href="mailto:
[email protected]">Grant
McElroy</a><br>
Webmaster: <a href="mailto:
[email protected]">info@topdeckca rds.com</a><br>
<br>
Copyright 2003 Top Deck Cards, Inc. All Rights
Reserveds</em></p>
</div>
</body>
</html>
<%
news_recordset.Close()
Set news_recordset = Nothing
%>
ADODB.Recordset error '800a0bb9' - PLEASE HELP!
