'----- グローバル変数定義 Dim DbConn ' ADO Connectionオブジェクト用 Dim ret ' 戻り値用 Dim errDescription ' エラー詳細用
On Error Resume Next Set DbConn = CreateConnection() If Err Then Response.Clear DspError "DB接続エラー 詳細:" & Err.Description Response.End End If On Error Goto 0
Function CreateConnection()
Set CreateConnection = Server.CreateObject("ADODB.Connection") CreateConnection.Open Application("ProvStr") CreateConnection.commandTimeout = 360
分類:[ASP.NET]
ASP.NETでSQLサーバーに接続しようとしているのですが、既存のASPのソースをASP.NETにそのままコピーするとコンパイルエラーとなってしまいます。
下のソースはどのように書き換えるとASP.NETに対応できるのか教えていただけませんか。
'----- グローバル変数定義
Dim DbConn ' ADO Connectionオブジェクト用
Dim ret ' 戻り値用
Dim errDescription ' エラー詳細用
On Error Resume Next
Set DbConn = CreateConnection()
If Err Then
Response.Clear
DspError "DB接続エラー 詳細:" & Err.Description
Response.End
End If
On Error Goto 0
Function CreateConnection()
Set CreateConnection = Server.CreateObject("ADODB.Connection")
CreateConnection.Open Application("ProvStr")
CreateConnection.commandTimeout = 360
End Function