nameexp4.asp

来自「Active Server Pages 网页制作教程看之前请传到ASP空间。或者」· ASP 代码 · 共 27 行

ASP
27
字号
<%
Response.Buffer = True

Response.Cookies("NameExp")("HTML") = "HyperText Markup Language, 超文字标识语言"
Response.Cookies("NameExp")("ASP") = "Active Server Pages, 动态服务器端网页"
Response.Cookies("NameExp")("ADO") = "ActiveX Data Object, 数据存取对象"
Response.Cookies("NameExp")("RDS") = "Remote Data Service, 远端数据存取服务"

data = Request("Name")	' 读取上网者所输入的名词
data = Trim(data)

If data = Empty Then
    dataexp = "请以 Name 为参数,输入数据!"
Else
    dataexp = Request.Cookies("NameExp")(data)
    If dataexp = "" Then
        dataexp = "没有对应的名词解释"
    End If
End If
%>

<HTML>
<BODY>
<DL><DT><%=data%><DD><%=dataexp%></DL>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?