请问版主在ACCESS代码编辑器中怎样应用SELECT语句啊?

lovesun · 发表于 2003-12-18 10:24

我想用SELECT语句到一个表中查询符合条件记录,然后把返回的字段值赋给一个变量,插入到另一个表中.

lovesun · 发表于 2003-12-18 10:43

版主帮忙啊.

lovesun · 发表于 2003-12-18 11:17

在代码编辑器中怎么写啊?

lovesun · 发表于 2003-12-18 13:50

怎么上传文件啊?

lovesun · 发表于 2003-12-18 13:53

我想从course表中查找一个课程名等于给定名称的记录,然后取此记录的课程号字段,组织成SQL以后再插入到score表中. Private Sub AddRecord_Click() On Error GoTo Err_AddRecord_Click Dim courseid As String 'Dim rst As adodb.Recordset Dim appAccess As New Access.Application appAccess.OpenCurrentDatabase ("C:\Documents and Settings\Administrator\桌面\lijun2.mdb") 'Set rst = New adodb.Recordset Set rst = Me.Recordset 'MsgBox "SELECT 课程号 from course where 课程名='" & coursename & "'," & appAccess.CurrentDb.Connection, adOpenKeyset, adLockOptimistic MsgBox "SELECT 课程号 from course where 课程名='" & coursename & "'" rst.Open "SELECT 课程号 from course where 课程名='" & coursename & "'" 'Set rst = OpenRecordset("SELECT 课程号 from course where 课程名='" & coursename & "'") courseid = rst.Fields(0) DoCmd.RunSQL ("insert into score values('" & stuid & "', '" & courseid & "'," & stuscore & ")") Exit_AddRecord_Click: Exit Sub Err_AddRecord_Click: MsgBox Err.Description Resume Exit_AddRecord_Click End Sub

lovesun · 发表于 2003-12-18 14:14

我的需求如下: 1. 创建新的数据库（在acess中） 2. 建立三个表（stu、scores、course） 3. 写出每个表的字段（属性、数据类型、长度、约束） 4. 建立三个窗体，分别输入三个表的内容，stu和course是直接输入，而scores表则是通过选择学号、课程名称和输入成绩来完成输入的 5. 建立一个查询其中stu是学生关系 ID 学号姓名年龄性别所在系名 1 66601 张红 20 女计算机 2 66602 李军 18 男计算机 3 66603 王洁 20 男计算机 4 66604 赵文 21 男计算机 Course为课程 ID 课程号课程名任课教员学时数 1 C601 高等数学李一 100 2 C603 操作系统唐二 78 3 C604 数据库任三 60 4 C602 数据结构刘四 70 Score是成绩关系 ID 学号课程号成绩 1 66601 C601 100 3 66602 C603 100 4 66603 C603 80 5 66604 C603 11 7 66601 C601 80

lovesun · 发表于 2003-12-19 09:02

不是.就是一个简单的学生成绩管理程序.

lovesun · 发表于 2003-12-19 14:56

版主啊,你在那里.

loadhigh · 发表于 2003-12-19 20:02

AsDHnpiR.zip (77.64 KB, 下载次数: 45)

loadhigh · 发表于 2003-12-19 11:58

o ，这个简单。我以为你是要做一通用的access文件，根据不同的需求生成不同的access文件，但内部结构相同。有空做好传上来。

		自动登录	找回密码
密码			免费注册

请问版主在ACCESS代码编辑器中怎样应用SELECT语句啊?

时间有限，可能还比较粗糙。