SQServer实验15BS体系结构数据库访问_第1页
SQServer实验15BS体系结构数据库访问_第2页
SQServer实验15BS体系结构数据库访问_第3页
SQServer实验15BS体系结构数据库访问_第4页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、SQServer实验15B/S体系结构数据库访问实验指导1、 建立Web服务器,(参看书262页)开始设置控制面板管理工具Internet服务管理器展开服务器右击默认Web站点-属性,Web站点卡IP地址:,主目录卡-执行许可:脚本和可执行程序,其他为默认。2、 建立数据源配置ODBC数据源开始-设置-控制面板-管理工具数据源(ODBC)-添加选SQL Server 完成名称:jwgl下一步选身份验证(选SQL Server验证,输入用户名sa和密码)-下一步下一步完成-测试数据源-确定。(在SQL Server企业管理器中右击服务器-属性将身分验证设为Windows及

2、SQL Server混合验证)3、 在记事本中输入 .asp程序:(其中服务器名及密码因机而异)<html><head> <title> 利用 </title></head><body><center> <H2>学生<H2> </center> <% dim strsql1 set conn=server.CreateObject("ADODB.Connection") conn.open "driver=sql server;server

3、=jys04;uid=sa;pwd=000;database=jwgl" strsql1="select * from student where class_id='g99403'" set rs=conn.execute(strsql1) if not rs.eof then %> <table border="1" align="center">response.write "<tr>"for i=0 to fdcount-1response.write

4、 "<td><font size='2'>" & rs.fields(i).name & "</font></td>"nextresponse.write "<tr>"for i=0 to fdcount-1response.write "<td><font size='2'>" & rs.fields(i).value & "</font><

5、;/td>"nextresponse.write "<tr>"loopresponse.write "</table>"elseresponse.write "表中无此数据"end if%></body></html>4、 将此程序存到c:inetpunwwwroot目录下5、打开浏览器,(可以是网络中的其他机器的浏览器)在地址栏中输入:/ss.asp,回车,运行。(网址因机而异)另一个例子:1、在jwgl库中建立一个带参数的存储

6、过程spstucoutea_withparam见书184页例11-22、在记事本中输入 .asp程序 ,取名pp.asp,存于c:inetpubwwwroot处。3、打开浏览器,在地址栏中输入:/ss.asp,回车,运行。<html><head> <title> 利用参数传递查询记录 </title></head><body><center> <H2>学生选课情况表<H2> </center> <% dim recordnum set

7、 conn=server.CreateObject("ADODB.Connection") strdsn="DSN=jwgl;UID=sa;PWD=000" conn.open "driver=sql server;server=jys04;uid=sa;pwd=000;database=jwgl" Set comm=Server.CreateObject("ADODB.Command") comm.ActiveConnection=conn dim prm_name,prm_type,prm_direction,

8、prm_size,prm_value prm_name="studentname" prm_type=200 prm_direction=1 prm_size=10 prm_value="张虹" dim prm set prm=comm.createparameter(prm_name,prm_type,prm_direction,prm_size,prm_value) comm.parameters.append prm mandtext="spstucoutea_withparam" mandtype=4 set rs=comm.

9、Execute if not rs.eof then %> <table border="1" align="center">response.write "<tr>"for i=0 to fdcount-1response.write "<td><font size='2'>" & rs.fields(i).name & "</font></td>"nextresponse.write

10、 "<tr>"for i=0 to fdcount-1response.write "<td><font size='2'>" & rs.fields(i).value & "</font></td>"nextresponse.write "<tr>"loopresponse.write "</table>"elseresponse.write "表中无此数据"

11、end if%></body></html>使用ODBC接口访问数据库示例使用Visual C+开始程序 Microsoft Visual C+ 6.0,调出C+设计环境。文件新建MFC AppWizard exe,输入工程名称:jwgl确定。出现MFV应用程序向导:步骤1,选单文档下一步,步骤2,选查看数据库不使用文件支持点击数据源-ODBC下选jwgl数据源OK,输入密码OK,选择数据库表OK下一步-下一步下一步下一步到步骤6,完成确定。向窗体内加控件:单击静态文本控件,在窗体内拖大,共加5个,右击控件属性,将标题分别设为:学号、姓名、班级、性别、住址。(输入

12、时要两次回车)加5个编辑框,右击控件属性,常规卡ID:下分别输入IDC_STUDENT_ID,IDC_STUDENT_NAME,IDC_STUDENT_CLASSID,IDC_STUDENT_SEX,IDC_STUDENT_ADDR,输入IDC_STUDENT_ID时,选样式卡,选中只读复选框。查看菜单建立类向导选,Member Variables卡,Class Name:下选CJwgl2Set,查看Column Names:下内容,不对的用Delete Variable按钮删除,然后单击Bind All(由于使用的不是全部字段,所以要反复进行,直到全正确)。再在Class Name:下选CJwgl2View(提示保存时,保存之),在Control ID

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论