本文目录
- 用ACCESS和VB做学生成绩查询系统~数据库已做好~VB的代码该怎么写~（包括学号，姓名，班级查询） 跪求高手
- 用vb+access做一个成绩查询系统，怎么按课程查询成绩
- access 学生成绩查询系统
- 请问在网页中如何建立成绩查询系统，通过access数据库进行查询，要求能
- asp+access 编写高考成绩查询系统
- access中，基于学生成绩表，根据用户输入的姓氏查询学生各科成绩，用查询设计怎么做
用ACCESS和VB做学生成绩查询系统~数据库已做好~VB的代码该怎么写~（包括学号，姓名，班级查询） 跪求高手
很简单呀！ 你先启动VisualBasic6.0 然后 创立标准EXE 添加 access 数据的控件 添加的方法。 第一进入 "工程（P）" → "引用(N)" ... 打开窗口找到 Microsoft ActiveX Datam Objects 2.0 Library 选择（打对号）， FORM1 添加一个Listbox控件，然后打开“查看代码” 窗口 输入下面的代码：Public imu As BooleanPublic flag As Integer ’ìí?óoíDT??μ?±ê??Public iflag As Integer ’êy?Y?aê?2?′ò?a±ê??Public RS As ADODB.RecordsetPublic SQL As StringPublic Function TransactSQL(ByVal SQL As String) As ADODB.RecordsetDim con As ADODB.ConnectionDim RS As ADODB.RecordsetDim strConnection As StringDim strArray() As StringSet con = New ADODB.Connection ’′′?¨á??óSet RS = New ADODB.Recordset ’′′?¨?????ˉOn Error GoTo TransactSQL_Error strConnection = "Provider=Microsoft.jet.oledb.4.0;Data Sourc e=" & "D:\Test.mdb;persist security info=false; jet oledb:database password=pnurkim32" strArray = Split(SQL) con.Open strConnection ’′ò?aá??ó If StrComp(UCase$(strArray(0)), "select", vbTextCompare) = 0 Then RS.Open Trim$(SQL), con, adOpenKeyset, adLockOptimistic Set TransactSQL = RS ’·μ???????ˉ iflag = 1 Else con.Execute SQL ’?′DD?üá? iflag = 1 End IfTransactSQL_Exit: Set RS = Nothing Set con = Nothing Exit FunctionTransactSQL_Error: MsgBox "2é?ˉ′í?ó￡o" & Err.Description iflag = 2 Resume TransactSQL_ExitEnd FunctionSub Display()SQL = "select * from Words" ‘ Words是Test数据文件的某一个表Set RS = TransactSQL(SQL)If RS.EOF = True ThenRS.MoveFirstElseWhile Not RS.EOFList1.AddItem RS.Fields("English") ‘ Engilis 表示 Words表的某一个趔RS.MoveNextWendEnd IfRS.Close End SubPrivate Sub Form_Load()DisplayEnd Sub 试试吧！
用vb+access做一个成绩查询系统，怎么按课程查询成绩
access1样可以试用sql语句查询的，也能够用窗体操作，加入学生表、课程表、成绩表，设置它们之间的关系，如：学生表.学号=成绩表.学号,课程表.课程号=成绩表.课程号,最后加限制条件,学生表.姓名like张%
access 学生成绩查询系统
我做了一个 图书馆管理系统 里面的查书名 作者的这个查询理论一样的 我把代码复制在下面:3个按钮为单选按钮 Private Sub Command4_Click()On Error GoTo error: If Text1.Text 《》 "" Then If Option1.Value Then searchSQL = "SELECT * FROM 借阅 WHERE 图书名称=" & "’" & Text1.Text & "’" If Option2.Value Then searchSQL = "SELECT * FROM 借阅 WHERE 读者姓名=" & "’" & Text1.Text & "’" If Option3.Value Then searchSQL = "SELECT * FROM 借阅 WHERE 读者身份证号码=" & "’" & Text1.Text & "’" Else MsgBox "条件不能为空" Text1.SetFocus End If Adodc1.RecordSource = searchSQL Adodc1.Refresh If Option1.Value Then If Adodc1.Recordset.EOF Then MsgBox "没有这本书!" End If Exit Sub End If If Option2.Value Then If Adodc1.Recordset.EOF Then MsgBox "没有这位读者!" End If Exit Sub End If If Option3.Value Then If Adodc1.Recordset.EOF Then MsgBox "没有这个身份证号!" End If Exit Sub End Iferror: MsgBox Err.DescriptionEnd Sub
请问在网页中如何建立成绩查询系统，通过access数据库进行查询，要求能
这个问题需要网页和数据库配合才能实现，大致分以下几步：1、先建立一个数据库，字段包括姓名、部门、考试类别、成绩等字段2、建立一个查询页面和成绩显示页面，在查询页面里添加表单，表单里要有输入框，在输入框里输入查询关键字，提交表单时打开显示成绩的页面，同时查询关键字也导入到了那个页面。3、在显示成绩页面里将接收到的查询关键字赋给一个变量，同时，这个页面要成功连接数据库，然后以查询关键字为条件调出数据库里的数据，再利用简单的语句就可以把数据显示在页面上了。 仰韶图语网站为您简单答复，具体请下载相应代码进行研究。
asp+access 编写高考成绩查询系统
太简单了。首先是数据库比如为cj.mdb,里面有表为grade存储成绩。查询首页(index.html)：《form method="POST" action="result.asp"》姓名：《input type="text" name="xm" size="20"》准考证号：《input type="text" name="kh" size="20"》《input type="submit" value="提交" name="B1"》以下是result.asp:《%set conn=server.createobject("adodb.connection")dbpath=server.mappath("cj.mdb")conn.open "driver={microsoft access driver (*.mdb)};dbq="& dbpathdim xm,khxm=trim(request("xm"))kh=trim(request("kh"))if xm=""then Response.write "《script language=’javascript’》" & VbCRlf Response.write "alert(’系统提示\n姓名不能为空！’);" & VbCrlf Response.write "history.go(-1);" & vbCrlf Response.write "《/script》" & VbCRLF Response.endend ifif kh=""then Response.write "《script language=’javascript’》" & VbCRlf Response.write "alert(’系统提示\n准考证号不能为空！’);" & VbCrlf Response.write "history.go(-1);" & vbCrlf Response.write "《/script》" & VbCRLF Response.endend ifset rs=server.createobject("adodb.recordset")sql="select * from grade where xm=’"&bh&"’ and kh=’"&kh&"’"rs.open sql,conn,1,1%〉《div align="center"》 《center》 《table border="1" width="400" cellspacing="0" cellpadding="5" bordercolorlight="#000000" bordercolordark="#FFFFFF"》 《tr》 《td width="100%" colspan="5"》 《p align="center"》查找结果《/p》 《/td》 《/tr》《%if not rs.eof then%》《%do while not rs.eof%》 《tr》 《td width="20%" align="center"》准考证号《/td》 《td width="20%" align="center"》姓名《/td》 《td width="20%" align="center"》语文《/td》 《td width="20%" align="center"》数学《/td》 《td width="20%" align="center"》外语《/td》 《td width="20%" align="center"》综合成绩《/td》 《/tr》 《tr》 《td width="20%" align="center"》《%=rs("kh")%》《/td》 《td width="20%" align="center"》《%=rs("xm")%》《/td》 《td width="20%" align="center"》《%=rs("yw")%》《/td》 《td width="20%" align="center"》《%=rs("sx")%》《/td》 《td width="20%" align="center"》《%=rs("wy")%》《/td》 《td width="20%" align="center"》《%=rs("zhcj")%》《/td》 《/tr》 《%rs.movenext%》 《%loop%》 《%else%》 《tr》 《td width="100%" colspan="5"》《marquee》没有您所查找的学生成绩《/marquee》《/td》 《/tr》《%end if%》 《/table》 《/center》《/div》《%rs.closeset rs=nothing%》应该就可以了，不懂再问
access中，基于学生成绩表，根据用户输入的姓氏查询学生各科成绩，用查询设计怎么做
SELECT 学生成绩.*FROM 学生成绩WHERE (((学生成绩.姓名) Like & "*"));
查询设计视图
