濮阳杆衣贸易有限公司

主頁 > 知識庫 > asp中COM組件中如何連接數(shù)據(jù)庫的代碼

asp中COM組件中如何連接數(shù)據(jù)庫的代碼

熱門標(biāo)簽:外呼回?fù)芟到y(tǒng)圖片 常用地圖標(biāo)注范圍點 為什么外呼系統(tǒng)需要預(yù)存話費呢 咸陽銷售外呼系統(tǒng) 寧夏怎么申請400電話 企數(shù)外呼系統(tǒng)能用多久 蘭州智能語音電銷機器人功能 辦理400電話一年多少錢 離線電子地圖標(biāo)注軟件注冊
VB- 工程 -引用 - ADO 2.0 ,建一個類DB,工程名設(shè)為 SQLCONN
以下是偶程序中的部分代碼,大家有空可以試試
Option Explicit
Public strError As String
Public Conn As New ADODB.Connection
Public Rs As New ADODB.Recordset

Public Property Get ErrorString() As String
ErrorString = strError
End Property

Public Function Conn_Open(strSQLServerName, strSQLDBUserName, strSQLDBPassword, strSQLDBName)
Dim strCon As String
Set Conn = New ADODB.Connection
On Error GoTo errHandler:
strCon = "Provider=SQLOLEDB;Server="  strSQLServerName  ";User ID="  strSQLDBUserName  ";Password="  strSQLDBPassword  ";Database="  strSQLDBName  ";"
Conn.Open strCon
errHandler:
strError = "錯誤源:"  Err.Source  vbCrLf  "描述:"  Err.Description
Exit Function
End Function

Function GetRootID(ByVal ClassID)
Dim query
query = "select class_ID,RootID from tblCategory where class_id='"  ClassID  "'" 
Set Rs = Conn.Execute(query)
If Not (Rs.EOF And Rs.BOF) Then
GetRootID = Rs("RootID")
Else
GetRootID = ClassID
End If
Rs.Close
Set Rs = Nothing
End Function

編譯后,在ASP中這樣用

function GetRootID(byval id) ' 獲取根類ID號
set S_DB = server.CreateObject( "SQLCONN.DB")
S_DB.Conn_Open strSQLServerName,strSQLDBUserName,strSQLDBPassword,strSQLDBName
GetRootID = S_DB.GetRootID(id)
Set S_DB=nothing
end function
您可能感興趣的文章:
  • C++ COM編程之什么是組件?
  • PHP調(diào)用VC編寫的COM組件實例
  • c#創(chuàng)建vc可調(diào)用的com組件方法分享
  • C# 無需COM組件創(chuàng)建快捷方式的實現(xiàn)代碼
  • 用JavaScript編寫COM組件的步驟
  • 在jsp程序中使用com組件
  • C++中COM組件初始化方法實例分析

標(biāo)簽:泰州 家電維修 麗江 溫州 昆明 咸陽 鐵嶺 昌都

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《asp中COM組件中如何連接數(shù)據(jù)庫的代碼》,本文關(guān)鍵詞  asp,中,COM,組件,如何,連接,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《asp中COM組件中如何連接數(shù)據(jù)庫的代碼》相關(guān)的同類信息!
  • 本頁收集關(guān)于asp中COM組件中如何連接數(shù)據(jù)庫的代碼的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章
    深州市| 调兵山市| 余庆县| 博湖县| 灵璧县| 繁峙县| 阳西县| 九寨沟县| 城市| 静安区| 醴陵市| 临高县| 晋宁县| 昭苏县| 安新县| 乌拉特后旗| 北京市| 潍坊市| 澄迈县| 竹山县| 南昌市| 莒南县| 鱼台县| 邹平县| 沂南县| 蓬莱市| 化德县| 海伦市| 葵青区| 林西县| 长顺县| 阿鲁科尔沁旗| 凤台县| 伊宁市| 景德镇市| 当雄县| 平江县| 泾川县| 武乡县| 横山县| 万荣县|