270 likes | 495 Views
8.2 ASP 技术. 8.2.1 ASP 的语法. 1、编制的语言 VBScript JavaScript 2、格式: <% 开始 %> 结束 3、工具:记事本 FrontPage2000/XP Dreamweave Ultradev. 4. 服务器支持 Personal Web Server IIS 其他. 8.2.2 数据库的建立. Access 数据库的操作和使用. 8.2.3 在 ASP 中使用 SQL 语法示例. 连接数据库
E N D
8.2.1 ASP的语法 • 1、编制的语言 • VBScriptJavaScript • 2、格式: • <% 开始 • %> 结束 • 3、工具:记事本 FrontPage2000/XP Dreamweave Ultradev
4. 服务器支持 • Personal Web Server • IIS • 其他
8.2.2 数据库的建立 • Access数据库的操作和使用
8.2.3 在ASP中使用SQL语法示例 • 连接数据库 • strProvider = "Provider=Microsoft.JET.OLEDB.4.0;Data Source=将该段文字替换为本地硬盘上数据库的路径;" • Set objConn = server.createobject("ADODB.Connection") • objConn.Open strProvider
DELETE • strCommand = "DELETE FROM Customers WHERE LastName = 'Smith'" • objConn.Execute strCommand
SELECT • sql1="select * from online where 姓名='" & name & "' and passwd='" & passwd & "'" • set rs=objConn.execute(sql1)
UPDATE • strCommand = "UPDATE online SET 平时1 = '" & score & "' WHERE 姓名 = '" & name & "' " • objConn.Execute strCommand
INSERT • strCommand = "INSERT INTO Customers (FirstName, LastName) VALUES ('Jose','Lugo')" • objConn.Execute strCommand
8.2.4 ASP中的对象 • 1.Response • 该对象用来向文档中输出服务器执行程序的结果 • 2.Request • 该对象用来获取用户的相关信息
3.Application • ASP中的Application对象是用来存储各种变量的 • 4.Session • Session对象也是用来存储各种信息的,但该对象只是针对单一用户而言
5.Server • 该对象用来获取服务器中的属性和方法 • 6.Error • 该对象用来显示一个ASP页面错误的详细信息
1、最简单的ASP • <%@ Language=JScript %> • <font face="MS Gothic"> • <% • var strGreeting; • strGreeting = "Hello World!"; • %> • <%=strGreeting%>
用VBScript • <% • strGreeting=“Hello, World!” • %> • <%= strGreating %>
简化一下: <%=“Hello,World!”%>
2、显示时间 • <%@ Language=JScript %> • <% • var months; • var hours; • today = new Date(); • months = today.getMonth()+1; • hours =today.getHours(); • if (hours <12){ • %> • <%= "早上好!" %>
<% • }else if (hours < 18) { • %> • <%= "下午好!"%> • <% • }else if (hours < 24) { • %> • <%= "晚上好!" %> • <% • } • %>
用VBScript • <% • Dim dtmHour • dtmHour = Hour(Now()) • If dtmHour < 12 Then • strGreeting = "早上好!" • Else • strGreeting = "您好!" • End If • %> • <%= strGreeting %>
进一步修改 • <% • ‘下面增加时间参数 • dtmYear=Year(Now()) • dtmMonth=Month(Now()) • dtmDay=Day(Now()) • dtmHour = Hour(Now()) • dtmMin=Minute(Now()) • dtmsec=Second(Now())
If dtmHour < 12 Then • strGreeting = "早上好!" • Else • strGreeting = "您好!" • End If • %> • <%= "现在的时间是:" &dtmHour & "时" & dtmMin & "分" & dtmsec &"秒<br>今年是:" & dtmYear & "年" & dtmMonth & "月" & dtmDay &"日<br>" %> • <%= strGreeting %>
3、一个简单的留言本 • 1、表单的制作 • <form method="POST" name="guestbook" action ="gresult.asp">
2、用Access制作数据库 • 数据库名称: guestbook.mdb • 字段:姓名、留言
4、gresult.asp代码 • <% • dim strTB1, strTB2, strCommand • strTB1 =Server.HTMLEncode(Request.QueryString("name")) • strTB2 =Server.HTMLEncode(Request.QueryString("content")) • strProvider = "Provider=Microsoft.JET.OLEDB.4.0;Data • Source=D:\InetPub\Wwwroot\fpdb\guestbook.mdb;"
Set objConn = server.createobject("ADODB.Connection") • objConn.Open strProvider • strCommand = "INSERT INTO guest(姓名,留言) VALUES ('" • strCommand = strCommand & strTB1 & "','" & strTB2 • strCommand = strCommand & "')" • objConn.Execute strCommand • Response.Write("谢谢!数据添加成功。") • %>