为什么会只显示表的属性却没显示值?麻烦会的解答下。谢谢!
- VB code
Dim conn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim strCon As String Dim Sql As String Dim name As String strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\student.mdb;" Sql = "select * from sc where 学号='" & Form3.Text1.Text & "'" DataGrid1.Refresh '''''' conn.ConnectionString = strCon conn.Open rs.CursorLocation = adUseClient rs.Open Sql, conn, adOpenDynamic, adLockOptimistic, adCmdext '''''' Set DataGrid1.DataSource = rs
[解决办法]
1,检查输入的学号条件是否存在
2,将 rs.Open Sql, conn, adOpenDynamic, adLockOptimistic, adCmdext
改成 rs.Open Sql, conn, adOpenkeyset,adlockreadonly 试试
[解决办法]
conn.ConnectionString = strCon
conn.CursorLocation = adUseClient
conn.Open