📄 postinput.asp
字号:
<%
' 读取各输入框的数据
Name = Request("Name")
Email = Request("Email")
Subject = Request("Subject")
Memo = Request("Memo")
' 检查各输入框是否输入有数据
If Name = "" Or Email = "" Or Subject = "" Or Memo = "" Then
Response.Write "输入框不能为空白!"
Response.End '不再处理以下的程序
End If
' 第一行包含"姓名"与"Email"
Line1 = "留言人:" & Name
Line1 = Line1 & String(5, " ") ' 插入5个汉字空格
Email = "<A HREF=mailto:" & Email & ">" & Email & "</A>"
Line1 = Line1 & "Email
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -