خىيال تور بېكىتى> ماقالىلەر> پروگرامما تۈزۈش> كۈرۈشماقالە
VB.NET دا SQL سانداننغا ئۇلاش (2)
0 admin يوللانغان ۋاقتى:2021-يىل01-ئاينىڭ17-كۈنى

تۆۋەندىكى كودنى تۈر (类) دىن بىرنى قۇرۇپ ئىشلەتسىڭىز بولىدۇ.

Imports System.Data.SqlClient
Public Class sandan
    Shared Function Search(ByVal strSQL As String) As DataTable
        '创建SQLConnection实例
        Dim ConnStr As String = "Data Source=.;Initial Catalog=PJSX;User ID=sa;Password=123"
        '创建SqlConnection实例
        Dim conn As SqlConnection = New SqlConnection(ConnStr)
        '创建SQL命令
        Dim myCommand As SqlCommand = New SqlCommand(strSQL, conn)
        '打开数据库链接
        conn.Open()
        '设置适配器
        Dim adapter As New SqlDataAdapter
        adapter.TableMappings.Add("Table", "TEMP")
        adapter.SelectCommand = myCommand
        '充分数据集
        Dim ObjectdsDataSet As New DataSet()
        adapter.Fill(ObjectdsDataSet)
        '关闭数据库链接
        conn.Close()
        '返回查询的表
        Return ObjectdsDataSet.Tables("TEMP")
    End Function

End Class


پىكىر بىرىڭ
بىز ھەققىدە- ئالاقىلىشىڭ- قانۇنىي بايانات- ھەمكارلىشىڭ- ھەقسىزلەر بايانى- بىكەت خەرىتىسى- تەرجىمان
بىز ھەققىدە
' if(if_open == 'true'){ $('#article-comment').show() }else{ $('#article-comment').hide() }