国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

幾例在ASP存儲過程的使用方法

2020-07-27 13:31:07
字體:
來源:轉載
供稿:網友
一、使用Command對象和Parameter對象傳遞參數 本講將主要使用Microsoft SQL Server7.0數據庫,先建立一個連接文件AdoSQL7.asp備用,以后用到時不再特別說明。

% ''AdoSQL7.asp

Option Explicit

Response.Expires = 0


''第一部分: 建立連接

Dim Cnn, StrCnn

Set Cnn = Server.CreateObject("ADODB.Connection")

StrCnn = "Provider=sqloledb; User ID=sa; Password=; Initial Catalog=pubs; Data Source=ICBCZJP"

Cnn.Open StrCnn

%>

注意:自己使用時要將Data Source設為你的數據庫服務器所在的機器名。

另外,以前使用Access數據庫時,用Microsoft Access97可以很方便的查看字段及數據,而使用SQL Server數據庫,尤其是并不在數據庫服務器,而是在另一臺機器上調試ASP腳本時,要查看字段及數據便需另外安裝工具,這里向你提供一個工具:Msqry32.exe(Microsoft Query),這個文件隨Office97安裝,一般位于目錄“Microsoft Office/Office”下。

例wuf70.asp:

%@ LANGUAGE="VBSCRIPT" %>

!--#include file="AdoSQL7.asp"-->

!--#include file="adovbs.inc"-->

% '' wuf70.asp

Dim cmdTest, prmTest, rsTest

''創建 Command 對象

Set cmdTest = Server.CreateObject("ADODB.Command")

‘Recordset、Command對象都可以通過ActiveConnection屬性來連接Connection對象

cmdTest.ActiveConnection = Cnn

''SQL命令 - 含兩個參數, 用 ? 表示

cmdTest.CommandText = "Update jobs Set job_desc = ? Where job_id = ?"

''設命令類型為 SQL 語句

cmdTest.CommandType = adCmdText

''Prepared 屬性決定是否將 SQL 命令先行編譯,將其設為True,可以加快運行

cmdTest.Prepared = True


''創建 Parameter 對象

Set prmTest=cmdTest.CreateParameter("job_desc",adVarChar,adParamInput,50,"網絡")

''將數據追加到 Parameters 數據集合中

cmdTest.Parameters.Append prmTest


Set prmTest = cmdTest.CreateParameter("job_id",adSmallInt,adParamInput,,"12")

cmdTest.Parameters.Append prmTest


''執行修改  主站蜘蛛池模板: 大田县| 饶河县| 定襄县| 兰西县| 含山县| 双城市| 青海省| 永平县| 高安市| 漾濞| 抚宁县| 济南市| 枣强县| 马公市| 吐鲁番市| 和政县| 玛多县| 上高县| 平南县| 南昌市| 浦北县| 师宗县| 通榆县| 项城市| 清河县| 平罗县| 曲水县| 天镇县| 察哈| 旬邑县| 信宜市| 余干县| 张家川| 土默特左旗| 科技| 英山县| 古田县| 台州市| 松阳县| 清原| 扎赉特旗|