接続および切断をするサンプルコードについて説明します。
本サンプルコードは、接続後Webページ上に接続できたことを表示します。
アプリケーションの手順
Connectionオブジェクトを生成します。
Connection.ConnectionStringプロパティへ接続文字列を設定します。
Connection.Openメソッドでコネクションを接続します。
Connection.Closeメソッドでコネクションを切断します。
オブジェクトを破棄します。
エラー処理については、“D.4.10 エラー処理”を参照してください。
<%@ language="vbscript" %>
<html>
<head>
<title>接続/切断</title>
</head>
<body bgcolor="White">
<b>接続/切断</b>
<hr>
<%
'宣言
Dim OBJdbConnection
'1. Connectionオブジェクトの生成と設定
Set OBJdbConnection = Server.CreateObject("ADODB.Connection")
OBJdbConnection.ConnectionString = "DSN=DSN01;UID=USER01;PWD=PASS01"
'2. コネクション接続
OBJdbConnection.Open
Response.Write "Connect<br>接続できました"
'3. コネクション切断
OBJdbConnection.Close
'4. オブジェクトの破棄
Set OBJdbConnection = Nothing
%>
<hr>
</body>
</html>