Skip to content
  • Categories
  • Recent
  • Tags
  • Popular
  • World
  • Users
  • Groups
Skins
  • Light
  • Cerulean
  • Cosmo
  • Flatly
  • Journal
  • Litera
  • Lumen
  • Lux
  • Materia
  • Minty
  • Morph
  • Pulse
  • Sandstone
  • Simplex
  • Sketchy
  • Spacelab
  • United
  • Yeti
  • Zephyr
  • Dark
  • Cyborg
  • Darkly
  • Quartz
  • Slate
  • Solar
  • Superhero
  • Vapor

  • Default (No Skin)
  • No Skin
Collapse
Code Project
  1. Home
  2. General Programming
  3. Visual Basic
  4. ConnectinG REMOTE sql server FROM VB6

ConnectinG REMOTE sql server FROM VB6

Scheduled Pinned Locked Moved Visual Basic
databasesql-servercomsysadmin
2 Posts 2 Posters 0 Views 1 Watching
  • Oldest to Newest
  • Newest to Oldest
  • Most Votes
Reply
  • Reply as topic
Log in to reply
This topic has been deleted. Only users with topic management privileges can see it.
  • Z Offline
    Z Offline
    Zapss
    wrote on last edited by
    #1

    Hello All how can i connect to remote sql server FROM VB6 This is my sample connections strings Dim rs As New ADODB.Recordset Dim cn As New ADODB.Connection Dim str As String On Error GoTo HAND cn.ConnectionTimeout = 30 Dim ConnString As String Method 1 -------- cn.Open "Trusted_Connection=yes;driver=SQL Server;server=20.19.69.13;database=XXXX;User Id=YYYYY;Password=ZZZZ" str = "Provider=SQLOLEDB.1;Server=23.19.69.13;Database=xxxx;Uid=yyyy;Pwd=zzzz" cn.Open str Method 2 -------- cn.Open "Provider=MS Remote;Data Source=XXXX;Remote Server=http://www.mysite.com;USER ID=XXX;PASSWORD=YYYY"

    L 1 Reply Last reply
    0
    • Z Zapss

      Hello All how can i connect to remote sql server FROM VB6 This is my sample connections strings Dim rs As New ADODB.Recordset Dim cn As New ADODB.Connection Dim str As String On Error GoTo HAND cn.ConnectionTimeout = 30 Dim ConnString As String Method 1 -------- cn.Open "Trusted_Connection=yes;driver=SQL Server;server=20.19.69.13;database=XXXX;User Id=YYYYY;Password=ZZZZ" str = "Provider=SQLOLEDB.1;Server=23.19.69.13;Database=xxxx;Uid=yyyy;Pwd=zzzz" cn.Open str Method 2 -------- cn.Open "Provider=MS Remote;Data Source=XXXX;Remote Server=http://www.mysite.com;USER ID=XXX;PASSWORD=YYYY"

      L Offline
      L Offline
      Lost User
      wrote on last edited by
      #2

      Try to check the connection from here[^] and let me know whether it is working not.


      A thousand mile of journey, begin with the first step. APO-CEDC Save Children Norway-Cambodia Office

      1 Reply Last reply
      0
      Reply
      • Reply as topic
      Log in to reply
      • Oldest to Newest
      • Newest to Oldest
      • Most Votes


      • Login

      • Don't have an account? Register

      • Login or register to search.
      • First post
        Last post
      0
      • Categories
      • Recent
      • Tags
      • Popular
      • World
      • Users
      • Groups