校园网站设计 |
|---|
论文大全网：lw.yeewe.com
|
Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open("FILEDSN=c:\Program Files\Common Files\ODBC\Data Sources\ms access database.dsn") SQL = "SELECT name,id,score FROM stud WHERE id='" & Request.Form("ID1") & "'" Set RS = Conn.Execute(SQL) 若考试通过，则显示考试的结果，包括姓名、准考证编号、总分和考试结果，分别由RecordSets 组件的RS（0）、RS（1）、RS（2）、RS（3）得到。FS.Field.Count表示RecordSets组件的域的总数，由“for I=0 to RS.Fields.count-1”，取得RS（I）各域的数据。配合 <Table> 表格的HTML语法，将结果填入表格的各单元格中。 若还有下一个数据，就使用RS.MoveNext 移到下一个位置。 3.4.4页面访问计数器的制作 利用文件处理组件FILESYSTEM的强大功能来制作，比用Application对象计数器要好，Application计数器当有20分钟没有人连上该网页或关机时，计数器会被归零。而文件计数器却不会因时间而消失。我用Count.txt存放访问人次。代码如下： whichfile=server.mappath("pic\count.txt") set myfile=server.createobject("scripting.filesystemobject") 创建一个 set thisfile=myfile.opentextfile(whichfile) 组件对象 visit=thisfile.readline thisfile.close 读取计数器数据文件Count.txt中的计数数据 visit=visit+1 记录自加一次 length=len(visit) for i=1 to length response.write "<img src="&mid(visit,i,1)&".jpg></img>" 将记录的数据用图片显示出来 next set thisfile=myfile.createtextfile(whichfile,1) 将新计数数据写入文件thisfile.writeline(visit) |
| 上一篇：电子政务与办公自动化初探 下一篇：基于CORBA的电子商务系统的安全性 |
|