ASP生成静态html页面简单实例
为了SEO，静态化页面是一个重要的步骤，这里介绍一个ASP生成静态html页面简单实例，比较易懂，看以下代码，可以亲自试试看，让后自己在改变下。
createhtml.asp
<%
filename=”test.html”
if request(“body”)<>”" then
set fso = Server.CreateObject(“Scripting.FileSystemObject”)
set fout = fso.CreateTextFile(server.mappath(“”&filename&”"))
fout.write “标题(title):” & request.form(“title”) & “<br>”
fout.write “内容(body):” & request.form(“body”)
fout.close
set fout=nothing
set fso=nothing
end if
%>
<form name=”form1″ method=”post” action=”">
<input name=”title” size=18><br>
<textarea name=”body”></textarea>
<br>
<br>
<input type=”submit” name=”Submit” value=”生成”>
</form>
然后在浏览器输入打开createhtml.asp这个页面，填写完毕后，就会生成test.html这个文件，里面的内容就是你刚才填写的。
asp的转换函数和应用实例
Variant变量一般会将其代表的数据子类型自动转换成合适的数据类型,但有时候,自动转换也会造成一些数据类型不匹配的错误.这时,可使用转换函数来强制转换数据的子类型.
|
函数
|
功能
|
|
Asc 函数
|
返回与字符串的第一个字母对应的 ANSI 字符代码。
|
|
Chr 函数
|
返回与指定的 ANSI 字符代码相对应的字符
|
|
Hex 函数
|
返回表示十六进制数字值的字符串。
|
|
Oct 函数
|
返回表示数字八进制值的字符串。
|
|
CStr 函数
|
返回表达式，该表达式已被转换为 字符串 子类型。 |
|
CDate 函数
|
返回表达式，此表达式已被转换为 日期 子类型。
|
|
CInt 函数
|
返回表达式，此表达式已被转换为 整数 子类型。
|
|
CLng 函数
|
返回表达式，此表达式已被转换为 长整数 子类型 |
|
CSng 函数
|
返回表达式，该表达式已被转换为 Single 子类型 |
|
CDbl 函数
|
返回表达式，此表达式已被转换为 Double 子类型 |
|
CBool 函数
|
返回表达式，此表达式已转换为 布尔 子类型
|
1、Asc 函数示例
下面例子中, Asc 返回每一个字符串首字母的 ANSI 字符代码:
Dim MyNumberMyNumber = Asc(“A”) ‘返回 65。MyNumber = Asc(“a”) ‘返回 97。MyNumber = Asc(“Apple”) ‘返回 65。2、Chr 函数示例下面例子利用 Chr 函数返回与指定的字符代码相对应的字符:
Dim MyCharMyChar = Chr(65) ‘返回 A。MyChar = Chr(97) ‘返回 a。MyChar = Chr(62) ‘返回 >。MyChar = Chr(37) ‘返回 %。3、Hex 函数示例下面的示例利用 Hex 函数返回数字的十六进制数：
Dim MyHexMyHex = Hex(5) ‘ 返回 5。MyHex = Hex(10) ‘ 返回A。MyHex = Hex(459) ‘ 返回 1CB。4、Oct 函数示例下面的示例利用 Oct 函数返回数值的八进制数：Dim MyOctMyOct = Oct(4) ‘ 返回 4。MyOct = Oct(8) ‘ 返回 10。MyOct = Oct(459) ‘ 返回 713。5、 CStr 函数示例
<% num1=666 StrWelcome=”欢迎第”&CStr(num1)&”个来访者” %>CStr将变量num1由整数子类型强制转换为字符串子类型6、CDate 函数示例
MyDate = “October 19, 1962″ ‘ 定义日期。
MyShortDate = CDate(MyDate) ‘ 转换为日期数据类型。
MyTime = “4:35:47 PM” ‘ 定义时间。
MyShortTime = CDate(MyTime) ‘ 转换为日期数据类型。
7、CInt 函数示例
Dim MyDouble, MyInt
MyDouble = 2345.5678 ’ MyDouble 是 Double。
MyInt = CInt(MyDouble) ‘ MyInt 包含 2346。
8、CLng 函数示例
Dim MyVal1, MyVal2, MyLong1, MyLong2
MyVal1 = 25427.45: MyVal2 = 25427.55 ’ MyVal1, MyVal2 是双精度值。
MyLong1 = CLng(MyVal1) ‘ MyLong1 25427。
MyLong2 = CLng(MyVal2) ‘ MyLong2 包含 25428 。
9、CBool 函数示例
Dim A, B, Check
A = 5: B = 5 ’ 初始化变量。
Check = CBool(A = B) ‘复选框设为 True 。
A = 0 ’定义变量。
Check = CBool(A) ‘复选框设为 False 。
用JavaScript验证表单中的email地址是否合法完整实例
十一月 20, 2008 by FDS
类别:HTML, JAVASCRIPT 已经有978次浏览
在设计表单是，经常要遇到要求输入EMAIL的。这里就用一个完整实例来说明用JavaScript验证email地址的完美方法。
以下是代码部分。
提示：你可以先修改部分代码再运行。
在JavaScript中创建对象的实例二
十月 16, 2008 by FDS
类别:JAVASCRIPT 已经有354次浏览
在JavaScript中创建对象的实例二，颜色变化的例子。
提示：你可以先修改部分代码再运行。
在JavaScript中创建对象的实例一
十月 15, 2008 by FDS
类别:JAVASCRIPT 已经有530次浏览
在JavaScript中创建对象的实例一，一个动态文字滚动的例子。
提示：你可以先修改部分代码再运行。
自动装载和自动卸载的例子，JavaScript程序构成四
七月 15, 2008 by FDS
类别:JAVASCRIPT 已经有487次浏览
下例程序是一个自动装载和自动卸载的例子。即当装入HTML文档时调用loadform()函数,而退出该文档进入另一HTML文档时则首先调用unloadform()函数,确认后方可进入。
提示：你可以先修改部分代码再运行。
