Mais uma coleção de Strings de Conexão para vários bancos de dados usando o ADO

==================== ODBC DNS Connections ===================== DNS  Conn.Open "DSN=SampleDB;Uid=Admin;Pwd=;"   File DNS  Conn.Open "FILEDSN=\\path\\mydb.dsn;Uid=Admin;Pwd=;"   ODBC DNS-Less Connections ODBC Driver for AS/400  Conn.Open "Driver={Client Access ODBC Driver (32-bit)}; System=myAS400;Uid=myUsername;Pwd=myPassword;"   ODBC Driver for dBASE  Conn.Open "Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=\\somepath;" rs.Open "SELECT * FROM USER.DBF", Conn   ODBC Driver for MS Access  Conn.Open "Driver={Microsoft Access Driver (*.mdb)};" & _                  "Dbq=\\path\\mydb.mdb;Uid=Admin;Pwd=;" Using a Workgroup (System database) Conn.Open "Driver={Microsoft Access Driver (*.mdb)};" & _                 "Dbq=\\path\\mydb.mdb;SystemDB=\\somepath\\mydb.mdw;", "admin",""   ODBC Driver for MS Excel  Conn.Open "Driver={Microsoft Excel Driver (*.xls)};DriverId=790;" & _                  "Dbq=\\somepath\\Sheet1.xls;DefaultDir=\\somepath;" ODBC Driver for MySQL (MyODBC)  Conn.Open "Driver={mySQL};Server=MyServerName;Option=16834;Database=mydb;"   ODBC Driver for Oracle  Conn.Open "Driver={Microsoft ODBC for Oracle};Server=OracleServer.world;" & _                  "Uid=myUsername;Pwd=myPassword;"   ODBC Driver for Paradox  Conn.Open "Driver={Microsoft Paradox Driver (*.db)};DriverID=538;Fil=Paradox 5.X;" & _                  "DefaultDir=c:\\dbpath\\;Dbq=c:\\dbpath\\;CollatingSequence=ASCII;"   ODBC Driver for SQL Server  Conn.Open "Driver={SQL Server};Server=MyServerName;Database=myDatabaseName;" & _                  "Uid=myUsername;Pwd=myPassword For trusted connection Conn.Open "Driver={SQL Server};Server=MyServerName;Database=myDatabaseName;" & _                  "Trusted_Connection=yes;" To Prompt user for username and password Conn.Properties("Prompt") = adPromptAlways Conn.Open "Driver={SQL Server}; Server=ServerName; DataBase=DatabaseName;"   ODBC Driver for Sybase  Sybase System 11 ODBC Driver Conn.Open "Driver={SYBASE SYSTEM 11}; Srvr=myServerName;" & _                  "Uid=myUsername; Pwd=myPassword;" Intersolv 3.10 Sybase ODBC Driver Conn.Open "Driver={INTERSOLV 3.10 32-BIT Sybase}; Srvr=myServerName;" & _                  "Uid=myUsername; Pwd=myPassword;"   ODBC Driver for Sybase SQL Anywhere  Conn.Open "ODBC; Driver=Sybase SQL Anywhere 5.0;" & _                  "DefaultDir=c:\\dbpath\\; Dbf=c:\\sqlany50\\mydb.db;" & _                  "Uid=myUsername; Pwd=myPassword; Dsn="""";"   ODBC Driver for Text  Conn.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};" & _                  "Dbq=\\somepath\\; Extensions=asc,csv,tab,txt; Persist Security Info=False" rs.Open "SELECT * FROM CUSTOMER.CSV", Conn   ODBC Driver for Visual FoxPro  With a database container Conn.Open "Driver={Microsoft Visual FoxPro Driver}; SourceType=DBC;" & _                  "SourceDB=\\somepath\\mySourceDb.dbc; Exclusive=No;" Without a database container (Free Table Directory) Conn.Open "Driver={Microsoft Visual FoxPro Driver}; SourceType=DBF;" & _                  "SourceDB=\\somepath\\mySourceDbFolder; Exclusive=No;" ============================ OLE DB Provider Connections ============================ OLE DB Provider for AS/400  Conn.Open "Provider=IBMDA400; Data source=myAS400;" & _                  "User Id=myUsername; Password=myPassword;"    OLE DB Provider for Active Directory Service  Conn.Open "Provider=ADSDSOObject; User Id=myUsername; Password=myPassword;"    OLE DB Provider for DB2  Conn.Open = "Provider=DB2OLEDB;" & _                     "Network Transport Library=TCPIP; Network Address=MyServer;" & _                     "Package Collection=MyPackage; Host CCSID=1142; Initial Catalog=MyDB;" & _                     "User ID=MyUsername; Password=MyPassword;"    OLE DB Provider for Index Server  Conn.Open "Provider=msidxs; Data source=MyCatalog;"    OLE DB Provider for Internet Publishing  Conn.Open "Provider=MSDAIPP.DSO; Data Source=http://mywebsite/myDir;" & _                  "User Id=myUsername; Password=myPassword;"    OLE DB Provider for Microsoft Jet  Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\somepath\\myDb.mdb;" & _                  "User Id=admin; Password=;" Using a Workgroup (System database) Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\somepath\\mydb.mdb;" & _                  "Jet OLEDB:System Database=MySystem.mdw;", "admin", "" MDB has a database password Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\somepath\\mydb.mdb;" & _                  "Jet OLEDB:Database Password=MyDbPassword;", "admin", "" Open Excel Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\somepath\\Sheet1.xls;" & _                  "Extended Properties=""Excel 8.0;HDR=Yes;"";"    OLE DB Provider for ODBC Databases  MS Access (Jet) Conn.Open "Provider=MSDASQL; Driver={Microsoft Access Driver (*.mdb)};" & _                  "Dbq=\\somepath\\mydb.mdb; Uid=myUsername; Pwd=myPassword;" SQL Server Conn.Open "Provider=MSDASQL; Driver={SQL Server};" & _                  "Server=myServerName; Database=myDatabaseName;" & _                  "Uid=myUsername; Pwd=myPassword;"   OLE DB Provider for Oracle  from Microsoft Conn.Open "Provider=msdaora; Data Source=MyOracleDB;" & _                  "User Id=myUsername; Password=myPassword;" from Oracle Conn.Open "Provider=OraOLEDB.Oracle; Data Source=MyOracleDB;" & _                  "User Id=myUsername; Password=myPassword;" For a Trusted Connection Conn.Open "Provider=OraOLEDB.Oracle; Data Source=MyOracleDB; User Id=/; Password=;" Conn.Open "Provider=OraOLEDB.Oracle; Data Source=MyOracleDB; OSAuthent=1;"    OLE DB Provider for Simple Provider  Conn.Open "Provider=MSDAOSP; Data Source=MSXML2.DSOControl.2.6;" rs.Open "http://WebServer/VirtualRoot/MyXMLFile.xml", Conn    OLE DB Provider for SQL Server  Conn.Open "Provider=sqloledb; Data Source=ServerName; Initial Catalog=DatabaseName;" & _                  "User Id=myUsername; Password=myPassword;" For a Trusted Connection Conn.Open "Provider=sqloledb; Data Source=ServerName; Initial Catalog=DatabaseName;" & _                  "Integrated Security=SSPI;" Connect to a "Named Instance" (SQL Server 2000) Conn.Open "Provider=sqloledb; Data Source=ServerName\\Inst2; Initial Catalog=DatabaseName;" & _                  "User Id=myUsername; Password=myPassword;" Prompt for username and password Conn.Provider = "sqloledb" Conn.Properties("Prompt") = adPromptAlways Conn.Open "Data Source=ServerName; Initial Catalog=DatabaseName;" To connect via an IP address Conn.Open "Provider=sqloledb; Network Library=DBMSSOCN;" & _                  "Data Source=xxx.xxx.xxx.xxx,1433; Initial Catalog=DatabaseName;" & _                  "User ID=myUsername; Password=myPassword;"   ================================== Remote OLE DB Provider Connections ==================================  MS Remote - Access (Jet)  ODBC DSN Conn.Open "Provider=MS Remote; Remote Server=http://ServerName; Remote Provider=MSDASQL; DSN=AdvWorks; Uid=myUsername; Pwd=myPassword;" OLE DB Provider Conn.Open "Provider=MS Remote; Remote Server=http://ServerName; Remote Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\path\\mydb.mdb;", "admin", ""    MS Remote - SQL Server  ODBC DSN Conn.Open "Provider=MS Remote; Remote Server=http://server; Remote Provider=MSDASQL; DSN=DatabaseName; Uid=Username; Pwd=Password;" OLE DB Provider Conn.Open "Provider=MS Remote; Remote Server=http://ServerName; Remote Provider=SQLOLEDB; Data Source=ServerName; Initial Catalog=DatabaseName; User ID=Username; Password=Password;"   ================================= .NET Managed Provider Connections =================================  SQL Client .NET Managed Provider (System.Data.SqlClient)  Dim Conn As SqlClient.SqlConnection Dim ConnStr As String ConnStr = "Data Source=(local); Initial Catalog=NorthWind; Integrated Security=SSPI; Pooling=True; Min Pool Size=10; Max Pool Size=50; Connection Lifetime=30; Connection Reset=True; Enlist=True;" Conn = New SqlClient.SqlConnection(ConnStr) Conn.Open()    OLE DB .NET Managed Provider (System.Data.OleDb)  Dim Conn As OleDb.OleDbConnection Dim ConnStr As String ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=nwind.mdb; User ID=Admin; Password=;" Conn = New OleDb.OleDbConnection(ConnStr) Conn.Open()  

Quebra-Linha

Colaborador..: Adenilton Rodrigues
Categoria(s).: Delphi; ASP;
Data.........: 11/09/2002 23:07:18
Visualizado..: 43408 vezes
Fonte........: AdeN Knowledge DB