TO yohomonkey(ht): 把DATASET改了为何没结果,只有库的标题?显示一个数字“1"
dim mystr,mysql as string dim myconn as sqlconnection dim myadapter as new sqldataAdapter() dim ds as dataset()
mystr="server=localhost;pwd=;uid=sa;database=pubs" myconn=new sqlconnection(mystr) myconn.open() Dim sqlCMD As New SqlCommand("test", myConn) sqlCMD.CommandType = CommandType.StoredProcedure sqlCMD.SelectCommand.Parameters.Add("@id", trim(par.text)) myconn.open() myadapter.SelectCommand = sqlCMDds = new DataSet() myadapter.Fill(ds,"tblUser") myconn.close()
应该是! Dim mystr, mysql As String Dim myconn As SqlConnection Dim myadapter As New SqlDataAdapter() Dim ds As DataSet() mystr = "server=localhost;pwd=;uid=sa;database=pubs" myconn = New SqlConnection(mystr) Dim sqlCMD As New SqlCommand("test", myconn) sqlCMD.CommandType = CommandType.StoredProcedure sqlCMD.Parameters.Add("@id", Trim(par.text)) myconn.Open() myadapter.SelectCommand = sqlCMD ds as New DataSet() myadapter.Fill(ds, "tblUser") myconn.Close()
dim myconn as sqlconnection
dim myadapter as new sqldataAdapter()
dim ds as dataset()
mystr="server=localhost;pwd=;uid=sa;database=pubs"
myconn=new sqlconnection(mystr)
myconn.open() Dim sqlCMD As New SqlCommand("test", myConn)
sqlCMD.CommandType = CommandType.StoredProcedure
sqlCMD.SelectCommand.Parameters.Add("@id", trim(par.text)) myconn.open()
myadapter.SelectCommand = sqlCMDds = new DataSet()
myadapter.Fill(ds,"tblUser")
myconn.close()
Dim mystr, mysql As String
Dim myconn As SqlConnection
Dim myadapter As New SqlDataAdapter()
Dim ds As DataSet() mystr = "server=localhost;pwd=;uid=sa;database=pubs"
myconn = New SqlConnection(mystr) Dim sqlCMD As New SqlCommand("test", myconn)
sqlCMD.CommandType = CommandType.StoredProcedure
sqlCMD.Parameters.Add("@id", Trim(par.text)) myconn.Open()
myadapter.SelectCommand = sqlCMD ds as New DataSet()
myadapter.Fill(ds, "tblUser")
myconn.Close()