tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]　 [ワード検索]　 [Home]

タイトル ： Re^2: ODBCのDSNを使った接続文
投稿日： 2006/10/25(Wed) 19:53
投稿者： WON
ありがとうございます。

おかげで、接続まではできました。

もう1点だけよろしいでしょうか？
SQL文をパラメータで渡しDataViewをとりたいのですが・・・

SqlCommandをOdbcCommandにし
SqlDataAdapterは何に変えるのでしょうか？

今までのSQLserverの内容を投稿します。これをODBCのDSNを使ってホストに接続し
DataViewを取得したいのです。

修正ポイントを教えて頂けませんか..

Public Function GetDv(ByVal pSQL As String) As DataView
        
        Dim MyCn As New SqlConnection
        Dim MyCmd As New SqlCommand
        Dim MyDA As New SqlDataAdapter
        Dim MyDS As DataSet = New DataSet

        Dim strConnection As String = "Persist Security Info=True;Integrated Security=false;User ID=ainq;Password=inq;Initial Catalog=ADB;Data Source=SY01 "

        With MyCmd
            .CommandType = CommandType.Text
            .CommandText = pSQL
            .Connection = MyCn
        End With
        '**************************************************************
        Try
            MyCn.ConnectionString = strConnection
            MyCn.Open()
            MyDA.SelectCommand = MyCmd
            MyDA.Fill(MyDS)
            MyCn.Close()
            Return MyDS.Tables(0).DefaultView
        Catch ex As Exception
            If (MyCn.State = ConnectionState.Open) Then
                MyCn.Close()
            End If
        End Try
        Return Nothing
    End Function

申し訳ありません、
宜しくお願いします。
- 関連一覧ツリー （ をクリックするとツリー全体を一括表示します）

古いスレッドにレスはつけられません。