Wrox Programmer Forums

Need to download code?

View our list of code downloads.

Go Back   Wrox Programmer Forums > ASP.NET and ASP > ASP 3 Classic ASP Active Server Pages 3.0 > BOOK: Beginning ASP 3.0
Password Reminder
Register
Register | FAQ | Members List | Calendar | Search | Today's Posts | Mark Forums Read
Welcome to the p2p.wrox.com Forums.

You are currently viewing the BOOK: Beginning ASP 3.0 section of the Wrox Programmer to Programmer discussions. This is a community of tens of thousands of software programmers and website developers including Wrox book authors and readers. As a guest, you can read any forum posting. By joining today you can post your own programming questions, respond to other developers’ questions, and eliminate the ads that are displayed to guests. Registration is fast, simple and absolutely free .
DRM-free e-books 300x50
 
 
Thread Tools Search this Thread Display Modes
  #1 (permalink)  
Old June 1st, 2004, 08:32 PM
Authorized User
 
Join Date: Mar 2004
Location: , , .
Posts: 84
Thanks: 0
Thanked 0 Times in 0 Posts
Send a message via AIM to gmoney060 Send a message via MSN to gmoney060
Default ADODB.Recordset error '800a0bb9' - PLEASE HELP!

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&nbsp;&nbsp;
                              <input type="checkbox" name="GamingMailing" value="Yes">
                              Gaming&nbsp;
                              &nbsp;&nbsp;&nbsp; <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>&nbsp;</p>
                        </div></td>
                    </tr>
                  </table></td>
              </tr>
            </table></td>
        </tr>
      </table></td>
    <td width="2%">&nbsp;</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:Webmaster@link2mtg.com">Grant
    McElroy</a><br>
    Webmaster: <a href="mailto:info@topdeckcards.com">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
%>

  #2 (permalink)  
Old June 2nd, 2004, 02:05 AM
Imar's Avatar
Wrox Author
Points: 72,045, Level: 100
Points: 72,045, Level: 100 Points: 72,045, Level: 100 Points: 72,045, Level: 100
Activity: 100%
Activity: 100% Activity: 100% Activity: 100%
 
Join Date: Jun 2003
Location: Utrecht, Netherlands.
Posts: 17,083
Thanks: 80
Thanked 1,587 Times in 1,563 Posts
Default

Hi there,

It looks like you're using a reserved keyword date in your SQL. Do you have a column in your table called date, or do you want to dynamically select today's date? In the first scenario, you should rename the date column to something like PublicationDate to avoid name clashes with the Date() method in some databases like Microsoft Access.

Secondly, I don't see objConn defined. This means you're not passing a valid connection object or string to the ActiveConnection property of the recordset. I also can't see an include file that may define this variable.

I suggest to *always* put this:

<% Option Explicit %>

at the top of every page, right below the <%@LANGUAGE directive. This forces you to declare your variables, so you'll catch errors like this much easier.

Cheers,

Imar
---------------------------------------
Imar Spaanjaars
Everyone is unique, except for me.
  #3 (permalink)  
Old April 25th, 2007, 09:15 PM
Registered User
 
Join Date: Apr 2007
Location: Airdrie, alberta, Canada.
Posts: 2
Thanks: 0
Thanked 0 Times in 0 Posts
Default

Quote:
quote:Originally posted by gmoney060
 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.v alue,"You must enter your e-mail address")==false){anError=true}else{
         if(validateEMailCheck(document.MailingList.Email .value,"You must enter a valid e-mail address for yourself")==false){anError=true}else{
         if(document.MailingList.SportsMailing.checked==f alse && 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&nbsp;&nbsp;
                             <input type="checkbox" name="GamingMailing" value="Yes">
                             Gaming&nbsp;
                             &nbsp;&nbsp;&nbsp; <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>&nbsp;</p>
                        </div></td>
                    </tr>
                 </table></td>
             </tr>
            </table></td>
        </tr>
     </table></td>
    <td width="2%">&nbsp;</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"). Value)%></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:Webmaster@link2mtg.com">Grant
    McElroy</a><br>
    Webmaster: <a href="mailto:info@topdeckcards.com">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
%>

  #4 (permalink)  
Old April 25th, 2007, 09:21 PM
Registered User
 
Join Date: Apr 2007
Location: Airdrie, alberta, Canada.
Posts: 2
Thanks: 0
Thanked 0 Times in 0 Posts
Default

Quote:
quote:Originally posted by gmoney060
 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.v alue,"You must enter your e-mail address")==false){anError=true}else{
         if(validateEMailCheck(document.MailingList.Email .value,"You must enter a valid e-mail address for yourself")==false){anError=true}else{
         if(document.MailingList.SportsMailing.checked==f alse && 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&nbsp;&nbsp;
                             <input type="checkbox" name="GamingMailing" value="Yes">
                             Gaming&nbsp;
                             &nbsp;&nbsp;&nbsp; <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>&nbsp;</p>
                        </div></td>
                    </tr>
                 </table></td>
             </tr>
            </table></td>
        </tr>
     </table></td>
    <td width="2%">&nbsp;</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"). Value)%></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:Webmaster@link2mtg.com">Grant
    McElroy</a><br>
    Webmaster: <a href="mailto:info@topdeckcards.com">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
%>

This is the way I always use the ADODB recordset method, and I never have any errors while running the code.


Private Sub Command0_Click()

Dim conn As ADODB.Connection
Set conn = CurrentProject.Connection
Dim rcst As ADODB.Recordset
Set rcst = New ADODB.Recordset
rcst.ActiveConnection = conn
rcst.Open "INFOLINK2", , adOpenStatic, adLockOptimistic 'Infolink is
                   'the name of a table
Dim a As Integer
a = rcst.RecordCount
Dim b As Integer
b = 0
rcst.MoveFirst

Dim CRIT As String
Dim look As String
While b <> a
If rcst!Field7 <> "" Then ' this is how you refrence a Field in a Table.

CRIT = rcst!Field7

        If Not IsNull(DLookup("[Field4]", "PLC", "[Field1] =" & """" & CRIT & """")) Then
       look = DLookup("[Field4]", "PLC", "[Field1] =" & """" & CRIT & """")
       rcst!Field9 = look
       End If




   End If

    b = b + 1
rcst.MoveNext

Wend
rcst = Nothing
conn = Nothing

rcst.Close
conn.Close
MsgBox "end"
End Sub

 


Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Trackbacks are Off
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
ADODB.RecordSet -- Error nabeeljohn Classic ASP Professional 10 November 9th, 2006 05:23 AM
ADODB.Recordset error '800a0bb9' Thamil Classic ASP Basics 3 October 5th, 2006 04:01 AM
ADODB.Recordset error '800a0bb9' Line 24 rossdunbar Dreamweaver (all versions) 3 August 2nd, 2004 10:53 PM



All times are GMT -4. The time now is 02:09 AM.


Powered by vBulletin®
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
© 2013 John Wiley & Sons, Inc.