在VB中怎么连接Oracle?是那种通过IP和端口直接连数据库的那种,因为需要打包安装在不同的机器上连接一个Server..
有例子吗

解决方案 »

  1.   

    看看这几篇贴子就行了
    http://expert.csdn.net/Expert/topic/2547/2547080.xml?temp=.6199762http://expert.csdn.net/Expert/topic/2523/2523739.xml?temp=.6168939http://expert.csdn.net/Expert/topic/2413/2413618.xml?temp=.9340021
    简单总结
    一、用ORADC连:
        oradata1.connect="username/password"
        oradata1.recordsource="select * from tablename"
        oradata1.refresh
        ...二、用OO连:
        dim OraSession as Object
        dim OraDatabase as Object
        dim OraDynaset as Object
        set OraSession = CreateObject("OracleInProcServer.XOraSession")
        set OraDatabase=Orasession.DbOpenDatabase("databasename","username/password",0&)
        set OraDynaset=OraDatabase.DbCreateDynaset("select * from tablename",0&)
        OraSession.DbBeginTrans
        ....  '操作数据
        OraSesion.DbcommitTrans
    Oracle 
     ODBC 
     New version:
    "Driver={Microsoft ODBC for Oracle};Server=OracleServer.world;Uid=Username;Pwd=asdasd;" 
     Old version:
    "Driver={Microsoft ODBC Driver for Oracle};ConnectString=OracleServer.world;Uid=myUsername;Pwd=myPassword;" 
     OLEDB, OleDbConnection (.NET) 
     Standard security:
    "Provider=msdaora;Data Source=MyOracleDB;User Id=UserName;Password=asdasd;" 
    This one's from Microsoft, the following are from Oracle
     Standard Security:
    "Provider=OraOLEDB.Oracle;Data Source=MyOracleDB;User Id=Username;Password=asdasd;" 
     Trusted Connection:
    "Provider=OraOLEDB.Oracle;Data Source=MyOracleDB;OSAuthent=1;"
      

  2.   

    to SoHo_Andy(冰) ( ) 信誉:100 
    在没有安装客户端的机器上    set OraDatabase=Orasession.DbOpenDatabase("databasename","username/password",0&)
    的"databasename"能取到吗?因为程序需要做安装文件安装在很多机器上,所以不能每台都安装客户端或建数据源,该怎么连呢?
      

  3.   

    各种数据库连接大全 SQL Server 
     ODBC 
     Standard Security:
    "Driver={SQL Server};Server=Aron1;Database=pubs;Uid=sa;Pwd=asdasd;" 
     Trusted connection:
    "Driver={SQL Server};Server=Aron1;Database=pubs;Trusted_Connection=yes;" 
     Prompt for username and password:
    oConn.Properties("Prompt") = adPromptAlways
    oConn.Open "Driver={SQL Server};Server=Aron1;DataBase=pubs;" 
     OLEDB, OleDbConnection (.NET) 
     Standard Security:
    "Provider=sqloledb;Data Source=Aron1;Initial Catalog=pubs;User Id=sa;Password=asdasd;" 
     Trusted Connection:
    "Provider=sqloledb;Data Source=Aron1;Initial Catalog=pubs;Integrated Security=SSPI;" 
    (use serverName\instanceName as Data Source to use an specifik SQLServer instance, only SQLServer2000)
     Prompt for username and password:
    oConn.Provider = "sqloledb"
    oConn.Properties("Prompt") = adPromptAlways
    oConn.Open "Data Source=Aron1;Initial Catalog=pubs;" 
     Connect via an IP address:
    "Provider=sqloledb;Data Source=190.190.200.100,1433;Network Library=DBMSSOCN;Initial Catalog=pubs;User ID=sa;Password=asdasd;" 
    (DBMSSOCN=TCP/IP instead of Named Pipes, at the end of the Data Source is the port to use (1433 is the default))
     SqlConnection (.NET) 
     Standard Security:
    "Data Source=Aron1;Initial Catalog=pubs;User Id=sa;Password=asdasd;" 
     Trusted Connection:
    "Data Source=Aron1;Initial Catalog=pubs;Integrated Security=SSPI;" 
    (use serverName\instanceName as Data Source to use an specifik SQLServer instance, only SQLServer2000)
     Connect via an IP address:
    "Data Source=190.190.200.100,1433;Network Library=DBMSSOCN;Initial Catalog=pubs;User ID=sa;Password=asdasd;" 
    (DBMSSOCN=TCP/IP instead of Named Pipes, at the end of the Data Source is the port to use (1433 is the default))
     Declare the SqlConnection:C#:
    using System.Data.SqlClient;
    SqlConnection oSQLConn = new SqlConnection();
    oSQLConn.ConnectionString="my connectionstring";
    oSQLConn.Open(); VB.NET:
    Imports System.Data.SqlClient
    Dim oSQLConn As SqlConnection = New SqlConnection()
    oSQLConn.ConnectionString="my connectionstring"
    oSQLConn.Open() 
    Oracle 
     ODBC 
     New version:
    "Driver={Microsoft ODBC for Oracle};Server=OracleServer.world;Uid=Username;Pwd=asdasd;" 
     Old version:
    "Driver={Microsoft ODBC Driver for Oracle};ConnectString=OracleServer.world;Uid=myUsername;Pwd=myPassword;" 
     OLEDB, OleDbConnection (.NET) 
     Standard security:
    "Provider=msdaora;Data Source=MyOracleDB;User Id=UserName;Password=asdasd;" 
    This one's from Microsoft, the following are from Oracle
     Standard Security:
    "Provider=OraOLEDB.Oracle;Data Source=MyOracleDB;User Id=Username;Password=asdasd;" 
     Trusted Connection:
    "Provider=OraOLEDB.Oracle;Data Source=MyOracleDB;OSAuthent=1;" 
     OracleConnection (.NET) 
     Standard:
    "Data Source=Oracle8i;Integrated Security=yes"; 
    This one works only with Oracle 8i release 3 or later
     Declare the OracleConnection:C#:
    using System.Data.OracleClient;
    OracleConnection oOracleConn = new OracleConnection();
    oOracleConn.ConnectionString = "my connectionstring";
    oOracleConn.Open(); VB.NET:
    Imports System.Data.OracleClient
    Dim oOracleConn As OracleConnection = New OracleConnection()
    oOracleConn.ConnectionString = "my connectionstring"
    oOracleConn.Open() 
     Data Shape 
     MS Data Shape:
    "Provider=MSDataShape.1;Persist Security Info=False;Data Provider=MSDAORA;Data Source=orac;user id=username;password=mypw" 
     MySQL 
     ODBC 
     Local database:
    "Driver={mySQL};Server=mySrvName;Option=16834;Database=mydatabase;" 
     Remote database:
    "Driver={mySQL};Server=data.domain.com;Port=3306;Option=131072;Stmt=;Database=my-database;Uid=username;Pwd=password;" 
     OLEDB, OleDbConnection (.NET) 
     Standard:
    "Provider=MySQLProv;Data Source=mydb;User Id=UserName;Password=asdasd;" 
     MySqlConnection (.NET) 
     EID:
    "Data Source=server;Database=mydb;User ID=username;Password=pwd;Command Logging=false" 
    This one is used with eInfoDesigns dbProvider, an add-on to .NET
     Declare the MySqlConnection:C#:
    using EID.MySqlClient;
    MySqlConnection oMySqlConn = new MySqlConnection();
    oMySqlConn.ConnectionString = "my connectionstring";
    oMySqlConn.Open(); VB.NET:
    Imports EID.MySqlClient
    Dim oMySqlConn As MySqlConnection = New MySqlConnection()
    oMySqlConn.ConnectionString = "my connectionstring"
    oMySqlConn.Open() 
      

  4.   


    Visual Basic Accessing an Oracle Database Using ADOhttp://support.microsoft.com/default.aspx?scid=kb;EN-US;176936