首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > VB Dotnet >

vb.net怎么 连接 oracle

2012-03-23 
vb.net如何 连接 oracle貌似需要装驱动?我这样写的。发现报错。VB.NET codePublic Sub Conn()Dim ss As Stri

vb.net如何 连接 oracle
貌似需要装驱动?
我这样写的。发现报错。

VB.NET code
  Public Sub Conn()        Dim ss As String        ' 指定连接字符串==〉0k         ss = "(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=192.168.1.121)(PORT=1521)))(CONNECT_DATA=(SERVICE_NAME=GPRSSEV)))"        ' 指定已经通过oracle client创建的 服务命名 ==> Ok        ss = "ORA_128"        ' 使用odbc创建的数据源        ss = "orcl"        Dim myConnection As Data.OleDb.OleDbConnection        Dim myOracleDataAdapter As Data.OleDb.OleDbDataAdapter        'myConnection = New Data.OleDb.OleDbConnection("Provider=OraOLEDB.Oracle;Data Source=" + ss + ";user id=sa;password=sa")        myConnection = New Data.OleDb.OleDbConnection("Driver={Microsoft   ODBC   for   Oracle};Server=" + ss + ";user id=sa;password=sa")        myOracleDataAdapter = New Data.OleDb.OleDbDataAdapter("select 'aa' from dual", myConnection)        Dim myDataSet As Data.DataSet = New Data.DataSet()        myOracleDataAdapter.Fill(myDataSet, "dual")        'Response.Write(txtName.Text + myDataSet.Tables("dual").Rows(0)(0))    End Sub


到底怎么连接呢?给个地址吧,本来以为很简单很简单,弄一下午也没弄明白呢。

[解决办法]
引用 system.data.oracleclient
VB.NET code
    ' ExecuteSQL 对象    Private cnnExecuteSQL As OracleClient.OracleConnection                                    ' ExecuteSQL 数据库连接    Private cmdExecuteSQL As OracleClient.OracleCommand    ' ExecuteSP 对象    Private cnnExecuteSP As OracleClient.OracleConnection                                    ' ExecuteSP 数据库连接    Private cmdExecuteSP As OracleClient.OracleCommand    ' RequerySQL 对象    Private cnnRequerySQL As OracleClient.OracleConnection                                    ' RequerySQL 数据库连接    Private cmdRequerySQL As OracleClient.OracleCommand    Private dtaRequerySQL As OracleClient.OracleDataAdapter ' 创建 ExecuteSQL 对象        cnnExecuteSQL = New OracleClient.OracleConnection()        With cnnExecuteSQL            .ConnectionString = "DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=192.168.1.121)(PORT=1521)))(CONNECT_DATA=(SERVICE_NAME=GPRSSEV)))"            '.Open()            '.Close()        End With.....
[解决办法]
引用 system.data.oracleclient

菜单里点引用,然后在net里面找到system.data.oracleclient
[解决办法]
OracleClient需要安装oracle客户端才会有。

热点排行