当前位置:编程学习 > C#/ASP.NET >>

请问使用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
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,