Database Search
If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.
TechHome
ADO DAO
 | |
|
- !!! Simple ADO Example !!!
- !ADO Object Model
- 1255 OLE Member Not Found
- ADO - ADOX requirements
- ADO - DAO Constants
- ADO AD Sort Problem
- ADO and GetObject
- ADO and Large Numbers
- ADO Convert Access data to Tab Delimited Text File
- ADO CreateParameter
- ADO Data Control Constants
- ADO Data Shaping
- ADO Error Issue
- ADO Error Object
- ADO Find vs DAO Seek Access Example
- ADO Jet Order By Clause
- ADO links
- ADO Sample for Stored Procedure
- ADO SaveAs and Excel or Convert Before Closing
- ADO Schemas
- ADO softseek
- ADO SQLOLEDB Example
- ADO Stream Binary File Download
- ADO Stream to Binary Buffer
- ADO with mySQL
- ADOX Append Table Columns
- ADOX Grant Permissions
- ado_seek
- Auto Form For ADO Database Tables
- Auto Generate GUIDs
- Basic Database Dialog Sample
- Beginner ADO Question
- Check Who is Using an MDB
- Close an Active Connection
- Connect to SQL Server 2000 MSDE
- Converting Text String to 4-char Soundex String
- Create Address Book XML File
- Create ADO Get and Put UDFs for Selected Database Table
- Create an AutoIncrement Column in Access
- csv2acc - ADO - CSV-delimited to MDB conversion
- csv2acc2 - ADO - CSV-delimited to MDB conversion2
- DAO CreateTableDef
- Delete All Records from Access Table
- Error 1261 using SetInfo Method
- Extract Column Data Using ADO
- Generic Recordset to Text file UDF
- Get Create_date From SQL Server Table Properties
- Get Extended ADO Connection-Version Info
- Get Result Data of Select Statement
- Get Users Email Address in Active Directory
- GetRows Array Results Explained
- How to Filter Records
- Import Data into My SQL
- Insert Rows From One Database to Another
- Inserting Rows that Contain Apostrophe
- Large Database Query Example
- Learning ADO Conversion to Winbatch
- Lock Database in ADO
- Long Discussion on ADO and Creating a Table
- Microsoft Access Database Engine 2010 Redistributable
- MySQL UDFs
- OLE and DAO Example
- OLE DB Data Link Properties Dialog
- Ole Exception ADODB Recordset
- OLE Exception Connecting to Oracle ODBC Driver
- Ole Exception ParentCatalog ADOX
- Parent-Child Fabricated Recordsets
- Playing around with ADO Schemas
- Problem Getting Record Count via ADO
- Retrieve all user objects in a domain via ADO
- Return a Value from an ADO array
- Samples for creating ADO connections
- Simulate Alter Structure for Persisted XML Recordset
- SQL Server 2005 XML with Winbatch
- SQL Server Blank Password
- SQL Server Update Using ADO
- SQLOLEDB Provider Error
- Stored Procedure with Return Value
- Streaming Recordset To Browser
- Tip - Avoid Duplicate Errors in Bulk INSERTS
- Use ADO to Insert Data From CSV Into Excel
- Use the Datalinks Dialog to insert ADO Connection info into a script
- Very Basic Database - Dialog ADO Sample
- Visual ADO Connection
- Wildcard for SQL LIKE Using ADO
- Write BLOB to MySQL
Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Get Result Data of Select Statement
Question:
My question is how do I get the results back from the code below?
SRC = "SQLSERVER"
UID = ""
PWD = ""
Catalog = "DBNAME"
Table = "InvAssetTags"
Table = "[%catalog%].[dbo].[%table%]"
Col = "ComputerName"
cConn = 'DRIVER={SQL Server};SERVER=%src%;UID=%uid%;PWD=%pwd%;Catalog=%catalog%'
DB = ObjectOpen("ADODB.Connection")
DBOpen1 = DB.Open(cConn)
SQLCOMMAND1="SELECT charUserName "
SQLCOMMAND2=StrCat("FROM ",TABLE," ")
SQLCOMMAND3=StrCat("WHERE AssetTagNum = '", Comp,"'")
SQLCOMMAND=StrCat(SQLCOMMAND1,SQLCOMMAND2,SQLCOMMAND3);
User = DB.Execute(SQLCOMMAND)
DB.Close()
ObjectClose(DB)
Message(User,SQLCOMMAND)
Answer:
User = DB.Execute(SQLCOMMAND) is the results, however it is a Recordset not a text string. You have to retrieve the data with ADO Recordset methods, and there are just too many examples in the tech database to add another one here.Check out: http://techsupt.winbatch.com/webcgi/webbatch.exe?techsupt/nftechsupt.web+WinBatch/OLE~COM~ADO~CDO~ADSI~LDAP+Insert~Data~into~an~SQL~Server~2000.txt Here is an example that should help:
SRC = "SQLSERVER"
UID = ""
PWD = ""
Catalog = "DBNAME"
Table = "InvAssetTags"
Table = "[%catalog%].[dbo].[%table%]"
Col = "ComputerName"
cConn = 'DRIVER={SQL Server};SERVER=%src%;UID=%uid%;PWD=%pwd%;Catalog=%catalog%'
DB = ObjectOpen("ADODB.Connection")
DB.Open(cConn)
SQLCOMMAND1="SELECT charUserName "
SQLCOMMAND2=StrCat("FROM ",TABLE," ")
SQLCOMMAND3=StrCat("WHERE AssetTagNum = '", Comp,"'")
SQLCOMMAND=StrCat(SQLCOMMAND1,SQLCOMMAND2,SQLCOMMAND3);
RS = DB.Execute(SQLCOMMAND)
cVar = RS.GetString()
cVar = StrClean(cVar,@CR,"|",@FALSE,1)
cVar = StrClean( cVar,@TAB,"|",@FALSE,1)
cVar = StrSub( cVar, 1, StrLen(cVar)-1 )
aVar = Arrayize(cVar,"|")
n = ArrInfo(aVar,1)
ObjectClose(RS)
DB.Close()
ObjectClose(DB)
For i = 0 To ( n-1 )
j = i+1
Message("%j% of %n%",aVar[i])
Next
Exit
Maybe check out the ADO tutorial:
http://www.w3schools.com/ado/
Article ID: W16568
File Created: 2014:07:18:09:51:38
Last Updated: 2014:07:18:09:51:38