Contextual Guidance at the moment of need helps your employees adopt to new software or processes instantly. Boost knowledge retention and employee engagement step-by-step with one easy solution.
Course Of The Month
4 days, 5 hours left to enrollBecome a Premium Member and unlock a new, free course in leading technologies each month.
Solved
Using an ADODB connection to query 2 different servers
Posted on 2014-11-10
I am currently using ADODB connections to make my queries from VB6 to SQL servers. My question is how do you make a statement that will reference 2 different SQL servers? I want to eventually query one SQL server, take data from a particular table and then INSERT that into a different SQL server.
Below I have sample code that I use currently to transfer data from one table to another on the SAME SQL server.
Set MyRec = CreateObject("adodb.record
MyConn.Open = "provider=SQLOLEDB;Server=
sSQL = "INSERT INTO [Data1].DBO.Table2_t "
sSQL = sSQL & "SELECT [Data1].DBO.Table1_t.* "
sSQL = sSQL & "FROM [Data1].DBO.Table1_t; "
MyConn.commandtimeout = 0
MyRec.Open sSQL, MyConn
MyConn.Close
Thanks
Below I have sample code that I use currently to transfer data from one table to another on the SAME SQL server.
Set MyRec = CreateObject("adodb.record
MyConn.Open = "provider=SQLOLEDB;Server=
sSQL = "INSERT INTO [Data1].DBO.Table2_t "
sSQL = sSQL & "SELECT [Data1].DBO.Table1_t.* "
sSQL = sSQL & "FROM [Data1].DBO.Table1_t; "
MyConn.commandtimeout = 0
MyRec.Open sSQL, MyConn
MyConn.Close
Thanks
[X]
Welcome to Experts Exchange
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
- Help others & share knowledge
- Earn cash & points
- Learn & ask questions
4-
4
9 Comments
Active 4 days ago
It sounds like the best option is to create a linked server. This would allow you to access data on the second server by using table names like [SRVR002].database.dbo.tab
Please see this Microsoft article for detailed information.
Please see this Microsoft article for detailed information.
I thought of that as well. And I believe it works well when you create the LINKS and then use that within the SQL Management's Query area.
However, I want to do this directly from VB6.
Is there a way to reference the LINKS within VB6?
Thanks
However, I want to do this directly from VB6.
Is there a way to reference the LINKS within VB6?
Thanks
Active today
You can set up a Linked Server on one of both MSSQLs. That allows the server the link is defined in to connect to the other one with something like
insert into [MySecondServer\instanceNa
insert into [MySecondServer\instanceNa
Active today
As soon as you have defined the Linked Server entry, you can use it in any SQL tool or programming language, including VB6.
Qlemo,
I first created the LINKED server and then tried the reference in my code and got INVALID OBJECT NAME.
So just to make sure that I got the LINK correct. I went into the SQL Server Management and then created a simple SELECT on the "linked" tables and got the following:
OLE DB provider "SQLNCLI10" for linked server "SRV-NEWANA" returned message "Unspecified error".
OLE DB provider "SQLNCLI10" for linked server "SRV-NEWANA" returned message "The stored procedure required to complete this operation could not be found on the server. Please contact your system administrator.".
Msg 7311, Level 16, State 2, Line 1
Cannot obtain the schema rowset "DBSCHEMA_TABLES_INFO" for OLE DB provider "SQLNCLI10" for linked server "SERVER1". The provider supports the interface, but returns a failure code when it is used.
Any ideas?
I first created the LINKED server and then tried the reference in my code and got INVALID OBJECT NAME.
So just to make sure that I got the LINK correct. I went into the SQL Server Management and then created a simple SELECT on the "linked" tables and got the following:
OLE DB provider "SQLNCLI10" for linked server "SRV-NEWANA" returned message "Unspecified error".
OLE DB provider "SQLNCLI10" for linked server "SRV-NEWANA" returned message "The stored procedure required to complete this operation could not be found on the server. Please contact your system administrator.".
Msg 7311, Level 16, State 2, Line 1
Cannot obtain the schema rowset "DBSCHEMA_TABLES_INFO" for OLE DB provider "SQLNCLI10" for linked server "SERVER1". The provider supports the interface, but returns a failure code when it is used.
Any ideas?
Featured Post
MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.
Question has a verified solution.
If you are experiencing a similar issue, please ask a related question
Most everyone who has done any programming in VB6 knows that you can do something in code like Debug.Print MyVar and that when the program runs from the IDE, the value of MyVar will be displayed in the Immediate Window. Less well known is Debug.Asse…
With User Account Control (UAC) enabled in Windows 7, one needs to open an elevated Command Prompt in order to run scripts under administrative privileges. Although the elevated Command Prompt accomplishes the task, the question How to run as script…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…
Suggested Courses
Course of the Month4 days, 5 hours left to enroll
Earn Certification
CompTIA IT Fundamentals
$49.00$44.10
690 members asked questions and received personalized solutions in the past 7 days.
Join the community of 500,000 technology professionals and ask your questions.