fifa16在哪里下载:这样能实现吗????

来源:百度文库 编辑:高考问答 时间:2024/05/09 19:22:39
Access
我先建立一个包含“编号,姓名”两项的表,保存为“试验1”表
然后做了一个窗体,包含两个名称分别为编号和姓名的文本框和一个命令按钮,在命令按钮的单击事件中写入:
Dim STemp As String
Dim Rs As ADODB.Recordset
Set Rs = New ADODB.Recordset
STemp = "Select*From 试验1"
Rs.Open STemp, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
If IsNull(Me![编号]) = True Then
MsgBox "请输入编号,它不能为空!", vbOKOnly, "输入编号"
Me![编号].SetFocus
ElseIf IsNull(Me![姓名]) = True Then
MsgBox "请输入姓名,它不能为空!", vbOKOnly, "输入姓名"
Me![姓名].SetFocus
Else
STemp = "INSERT INTO 试验1"
STemp = STemp & "(编号,姓名)VALUES('" & Me![编号] & "','" & Me![姓名] & "')"
DoCmd.RunSQL STemp
End If
希望能实现从窗体向数据库写入,行吗??
在下新手,劳烦诸位说清楚点儿,哈哈
如果这样写会出现什么错误提示?
怎么改啊?

貌似缺少数据库连接哟

没有定义数据连接的路径

没有连接,哪能更新呢?

CurrentProject.Connection这个是什么?