DOC

SQL query

By Timothy Tucker,2014-08-05 06:48
28 views 0
Sub DataPull(SQLQuery, CellPaste) Dim Con As New ADODB.Connection Dim RST As New ADODB.Recordset Dim DBlocation As String, DBName As String Dim ContractingQuery As String If SQLQuery = "" Then Else DBName = Range("DBName") If Right(DBName, 4) <> ".mdb" Then DBName = DBName + ".mdb" DBlocation = ActiveWorkbook.Path ..
null
null
null
null
null
null

Report this document

For any questions or suggestions please email
cust-service@docsford.com