When you think ASP, think...
Recent Articles
All Articles
ASP.NET Articles
Related Web Technologies
User Tips!
Coding Tips

Sample Chapters
JavaScript Tutorials
MSDN Communities Hub
Official Docs
Stump the SQL Guru!
XML Info
Author an Article

The 4 Guys Present: ASPFAQs.com

Jump to a FAQ
Enter FAQ #:
..or see our 10 Most Viewed FAQs.

4GuysFromRolla.com : ASP FAQS : Databases, General


Is there a way I can automate the retrieval of a recordset from a database (so I don't have to type the same code over and over)?

[Print this FAQ]

Answer: Certainly! A function like the one below encapsulates the process of getting a read-only recordset out the database. If you pass it a valid connection string or connection object in the varConnection parameter and a valid record-returning SQL query in the strSQL parameter, it will pass back a disconnected recordset. You can modify the function to return editable recordsets (recordsets that don't have a lock type of adLockReadOnly as below for example).

Function GetRecordset(varConnection, strSQL)
    Const adOpenStatic = 3
    Const adLockReadOnly = 1
    Const adUseClient = 3
    Dim objRS

    Set objRS = Server.CreateObject("ADODB.Recordset")
    ' Set cursor location:
    objRS.CursorLocation = adUseClient
    objRS.Open strSQL, varConnection, adOpenStatic, adLockReadOnly

    ' Disconnect, close and return:
    Set objRS.ActiveConnection = Nothing
    Set GetRecordset = objRS
End Function

Examples of usage:

Response.Write _
    GetRecordset(objConn _
                        , "SELECT * FROM tblScripts").GetString(2, -1)
'         --- OR ---
Response.Write _
    GetRecordset("Provider=Microsoft.Jet.OLEDB.4.0;" & _
                        "Data Source=C:\InetPub\CodeLibrary\data\CodeLibrary2000.mdb" _
                        , "SELECT * FROM tblScripts").GetString(2, -1)

FAQ posted by Richard Lowe at 11/21/2000 10:50:02 PM to the Databases, General category. This FAQ has been viewed 52,238 times.

Do you have a FAQ you'd like to suggest? Suggestions? Comments? If so, send it in! Also, if you'd like to be a FAQ Admin (creating/editing FAQs), let me know! If you are looking for other FAQs, be sure to check out the 4Guys FAQ and Commonly Asked Messageboard Questions!

Most Viewed FAQs:

1.) How can I format numbers and date/times using ASP.NET? For example, I want to format a number as a currency. (761643 views)
2.) I am using Access and getting a 80004005 error (or a [Microsoft][ODBC Microsoft Access Driver] The Microsoft Jet database engine cannot open the file '(unknown)' error) when trying to open a connection! How can I fix this problem? (207777 views)
3.) How can I convert a Recordset into an array? Also, how can I convert an array into a Recordset? (202549 views)
4.) How can I quickly sort a VBScript array? (196039 views)
5.) How can I find out if a record already exists in a database? If it doesn't, I want to add it. (156019 views)
6.) How do I display data on a web page using arrays instead of Do...While...MoveNext...???... (152331 views)
7.) When I get a list of all files in a directory via the FileSystemObject, they aren't ordered in any reasonable way. How can I sort the files by name? Or by size? Or by date created? Or... (140381 views)
8.) For session variables to work, must the Web visitor have cookies enabled? (110162 views)
9.) Can I send emails without using CDONTS? (107083 views)
10.) How can I take the result of a SELECT...MULTIPLE or a group of same-named checkboxes and turn it into a query? That is, if the user selects 3 answers, how can I construct a query that looks for all 3? (106308 views)
Last computed at 9/17/2007 3:22:00 AM

ASP.NET [1.x] [2.0] | ASPFAQs.com | Advertise | Feedback | Author an Article