2007年
-
编辑 删除
VB连ORACLE执行存储过程
Public Dcnn As ADODB.Connection '数据中心数据库连接 Public Function ConnectToDB(ByVal DCCnn As String) As Boolean '****************************** '函数名： ' ConnectToDB '函数说明： ' 建立与本地数据库的连接 '参数： '****************************** On Error GoTo ex: Set Rcnn = New ADODB.Connection Set Dcnn = New ADODB.Connection &
