Ajax 之windows7 安装IIS 启动web asp

来源:互联网 发布:王大治知乎 编辑:程序博客网 时间:2024/06/03 20:05

1、 windows7 安装IIS 启动Web

a.  控制面板 -> 添加/删除程序 -> 打开或关闭windows功能 -> Internet信息服务 选择所有内容b.  之后在C盘目录下会出现 Inetpub文件夹c.  打开 Inetpub文件夹,打开wwwroot文件夹d.  在wwwroot文件夹下创建新的文件夹,如"MyWeb"e.  放入 asp 代码文件,如 "test1.asp"f.  确保服务器正在运行: 控制面板 -> 管理工具 -> IIS管理器 -> 网站 -> 右键并找到启动g.  访问: http:// localhost/MyWeb/test1.asp或者b.  进入IIS管理器 c.  在网站中右键, 添加网站d.  网站名称: AspTest(随便写), 物理路径: E:\tmp(随便写,项目根目录,可放置页面文件), IP地址: 10.0.8.8, 之后点击确定e.  在物理路径下面放置 页面文件  如 MyWeb文件夹,test1.asp文件f.  访问: http:// localhost/MyWeb/test1.asp 

2、 javascript示例

var xmlHttp;function showCustomer(str){    xmlHttp = GetXmlHttpObject();    if ( xmlHttp == null ) {        alert("您的浏览器不支持Ajax");        return ;    }    var url = "getcustomer.asp";    url = url + "?q=" + str;    url = url + "&sid" + Math.random();    // 处理服务器响应的函数    xmlHttp.onreadystatechange = stateChanged;    // 第一个参数: 定义发送请求所使用的方法 (GET 或者 POST)    // 第二个参数:规定服务器端脚本的URL    // 第三个参数:规定应当对请求进行异步地处理,默认true    xmlHttp.open("GET", url, true);    xmlHttp.send(null);}function stateChanged () {    // 服务器响应的状态信息,每当readyState改变时,onreadystatechange 函数就会被执行    // 0 -> 请求未初始化 (在调用open()之前)    // 1 -> 请求已提出 (调用send()之前)     // 2 -> 请求已发出 (这里通常可以从响应得到内容头部)    // 3 -> 请求处理中 (响应中通常有部分数据可用,但是服务器还没有完成响应)    // 4 -> 请求已完成 (可以访问服务器响应并使用它)    if ( xmlHttp.readyState == 4 ) {        // responseText 取回由服务器返回的数据        document.getElementById("txtHint").innerHTML = xmlHttp.responseText;    }}function GetXmlHttpObject() {    var xmlHttp = null;    try {        xmlHttp = new XMLHttpRequest();    } catch (err) {        try {            xmlHttp = new ActiveXObject("Msxml2.XMLHTTP");        } catch (err) {            xmlHttp = new ActiveXObject("Microsoft.XMLHTTP");        }    }}

3、 asp页面示例
ASP: 指Active Server Pages (动态服务器页面), 是运行于IIS之中的程序
ASP文件: 和html文件相似; 可包含文本、html、xml和脚本; 文件的脚本可在服务器上执行;

注: 在asp中可以直接操作java代码,类似于jsp的java代码块;也可以直接操作请求request和响应response

// 简单响应<% response.write("Hello World") %><%= "Hello World" %><% response.write("Hello World") %>// 创建数组<% response.expires=-1    <!--定义数组 从03031个 -->    dim a(30)      a(0) = "zhangsan "    a(1)....a(30)    <!-- 从url取参数q-->    q = ucase(request.querystring("q"))    ...%>// 连接数据库  字符串连接用&号<% sql = "select * from table1 where q="sql = sql & "'' & request.querystring("q") & "'"set conn = Server.CreateObject("ADODB.Connection")conn.Provider = "Microsoft.Jet.OLEDB.4.0"conn.Open(Server.Mappath("/db/northwind.mdb"))set rs = Server.CreateObject("ADODB.recordset")rs.Open sql, connresponse.write("<table>")do until rs.EOF    for each x in rs.Fields        response.write("<tr><td><em>" & x.name & "</em></td>")        response.write("<td>" & x.value & "</td></tr>")    next    rs.MoveNextloopresponse.write("</table>")%>// 返回xml文件<% set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")xmlDoc.async = "false"xmlDoc.load(Server.MapPath("cd_catalog.xml"))set nodes = xmlDoc.selectNodes("CATALOG/CD[ARTIST='" & q & "']")for each x in nodes     for each y in x.childnodes        response.write("<b>" & y.nodename & ":</b>")        response.write(y.text)        response.write("<br />")    nextnext%>// 返回xml文件<% response.write("<?xml version='1.0' encoding='UTF-8' ?>")response.write("<company>")response.write("</company>")%>
原创粉丝点击