请问使用VS2005测试,如何连接数据库
我需要取得 T共通_稼動ログ 表中的数据.需要将其清空.再取得数据测试对与否.我的问题是连接的数据库打不开.代码如下:Public Sub K047000WTest11()
Dim target As K047000W.K047000W = New K047000W.K047000W
Dim accessor As K047000W_K047000WAccessor = New K047000W_K047000WAccessor(target)
Dim cmDB As New ComnDbLogic
Dim strSQLlog As New StringBuilder
Dim strSQL As New StringBuilder
Dim cmFileIO As New ComnFileIO
cmDB.Co_dsOpen(1)
With strSQLlog
.Append("TRUNCATE TABLE T共通_稼動ログ")
End With
If cmDB.Co_rsExecuteNonQuery(strSQL.ToString) <> 0 Then
Throw New Exception()
End If
accessor.InitLoad()
With strSQL
.Append("SELECT 業務情報,処理区分,担当者コード,付帯情報")
.Append("FROM T共通_稼動ログ")
End With
'cmFileIO.Co_OperationLog("AP", "K047000W", "1", "売掛金戻し")
cmDB.Co_getString.Read()
Assert.AreEqual("Ap", cmDB.Co_getString("処理区分"), "処理区分Error")
Assert.AreEqual("K047000W", cmDB.Co_getString("業務情報"), "業務情報Error")
Assert.AreEqual("1", cmDB.Co_getString("担当者コード"), "担当者コードError")
Assert.AreEqual("売掛金戻し", cmDB.Co_getString("付帯情報"), "付帯情報Error")
cmDB.Co_dsClose()
'Assert.Inconclusive("値を返さないメソッドは確認できません。")
End Sub --------------------编程问答-------------------- cmDB.Co_dsOpen(1)
是不是还有 OPEN(2) 啊?还有有 OPEN(N)?
为什么要指定 OPEN(1) 啊? --------------------编程问答-------------------- 对的. --------------------编程问答-------------------- 该回复被版主删除
补充:.NET技术 , VB.NET