在click中有:
SQL = "select * from User where ID ='" & UserId & "'"
Check.Open SQL, DBCnn, adOpenStatic, adLockOptimistic在formload中Private Sub Form_Load()
Dim strSql As String
Dim strFileName As String
UserName.Text = ""
Pwd.Text = ""
strFileName = "student.mdb"
strSql = "Provider= Microsoft.Jet.OLEDB.4.0;Data Source = " & App.Path & "\" & strFileName
DBCnn.Open strSql
End Sub为什么说from子句出错!!!
SQL = "select * from User where ID ='" & UserId & "'"
Check.Open SQL, DBCnn, adOpenStatic, adLockOptimistic在formload中Private Sub Form_Load()
Dim strSql As String
Dim strFileName As String
UserName.Text = ""
Pwd.Text = ""
strFileName = "student.mdb"
strSql = "Provider= Microsoft.Jet.OLEDB.4.0;Data Source = " & App.Path & "\" & strFileName
DBCnn.Open strSql
End Sub为什么说from子句出错!!!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货