[thelist] asp recordset loop

Mark Rees mrees at itsagoodprice.com
Fri Aug 19 03:08:08 CDT 2005


----- Original Message -----
From: "Brian Cummiskey" <Brian at hondaswap.com>
To: <thelist at lists.evolt.org>
Sent: Thursday, August 18, 2005 9:08 PM
Subject: Re: [thelist] asp recordset loop


> wow- 2 days later...
>
> anyway, ignore this.  this has been solved for a while now.

How? Did you discover the nextrecordset method of the recordset?


> Brian Cummiskey wrote:
> > I sent a post last night about a cursor loop problem.  I never got it,
> > so i don't even know if it made it to the list or not.  If you saw it,
> > great.  if not--  disregard.
> >
> > Turns out, it was working fine all along.  it was my web-based asp
> > interface that doesn't seem to work.  Here goes...
> >
> >
> > The SP when triggered manually in query analyzer, works fine.  I get my
> > multiple result sets via the cursor selecting from multiple specific
> > tables.
> >
> > sp_MULTI_DNC 'ALL', 'company', 'ACME', NULL, NULL, NULL
> > procedure - thejob - flow_type - company - first_name - last_name -
> > phone_number
> >
> >
> > when i call it in an asp loop, i don't get the desired results--  it
> > stops after the first job, which is why yesterday it had me thinking
> > that the cursor wasn't working properly.
> >
> >
> > here's my asp:
> >
> >
> > if theserver = "MBC2" OR theserver = "ALL" then
> >
> >     server.ScriptTimeout = 3600
> >     set cnn = server.CreateObject("ADODB.connection")
> >     set comm = Server.CreateObject ("ADODB.Command")
> >     with comm
> >         .CommandTimeout = 0
> >         .ActiveConnection = connstr2
> >         .CommandText = "sp_MULTI_DNC"
> >         .CommandType = adcmdstoredproc
> >         .parameters("@thejob").value = thejob
> >         .parameters("@flow_type").value = flow_type
> >         .parameters("@company").value = company
> >         .parameters("@first_name").value = first_name
> >         .parameters("@last_name").value = last_name
> >         .parameters("@phone_number").value = phone_number
> >
> >
> >         set rst = Server.CreateObject("ADODB.Recordset")
> >         set rst = .execute
> >     END WITH
> >
> >
> >         if not rst.eof then
> >
> >             dim tableheaders
> >             tableheaders = ""
> >
> >             dim tablebody
> >             tablebody = ""
> >
> >                 tableheaders = tableheaders & "<table
> > style=""border-collapse: collapse;"" border=""1"" cellspacing=""0""
> > cellpadding=""2"">" & vbcrlf
> >                     for x = 0 to rst.Fields.count - 1
> >                         tableheaders = tableheaders & "<th>" &
> > trim(rst.Fields(x).Name) & "</th>" & vbcrlf
> >                     next
> >
> >                 do until rst.eof
> >
> >                     tablebody = tablebody & "<tr>" & vbcrlf
> >
> >                     for x = 0 to rst.Fields.count - 1
> >                         tablebody = tablebody & "<td>" &
> > trim(rst.Fields(x).Value) & "</td>" & vbcrlf
> >                     next
> >
> >                     tablebody = tablebody & "</tr>" & vbcrlf
> >                     rst.MoveNext
> >                 loop
> >
> >                 tablebody = tablebody & "</table>" & VbCrLf
> >
> >         else
> >                 tablebody = tablebody & "<h3>no results</h3>"
> >         end if
> > end if
> >
> >
> >
> > ------------------------
> > and later in the body part-
> >
> > <div id="main">
> >     <form id="frmdefault">
> >         <%= tableheaders %>
> >         <%= tablebody %>
> >         <input type="hidden" name="ref" id="ref" value="do_lookup.asp"
/>
> >     </form>
> > </div>
> >
> >
> > the end result, will have a check box next to the record to select and
> > modify/etc on the next page.
> >
> > anyone know why my loop stops?
> >
> > does the record set end after the first job is complete?
> >
>
>
> --
>
> * * Please support the community that supports you.  * *
> http://evolt.org/help_support_evolt/
>
> For unsubscribe and other options, including the Tip Harvester
> and archives of thelist go to: http://lists.evolt.org
> Workers of the Web, evolt !
>




More information about the thelist mailing list