<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>asp从a到z循环输出26个英文字母</title>
</head>
<body>
第一种：asc码方式：<%Dim i : For i=Asc("a") To Asc("z") : Response.Write Chr(i) : Next%><hr>
第二种：
<%
str="a|b|c|d|e|f|g|h|i|j|k|l|m|n|o|p|q|r|s|t|u|v|w|x|y|z"
str=Split(str,"|")
For i=0 to Ubound(str)
Response.Write str(i)
Next
%>
<hr>
第三种：<br />
大写字母：
<%
for i=65 to 90
response.Write chr(i)
next
%><br />
小写字母：
<%
for i=97 to 122
response.Write chr(i)
next
%><br />
<hr>
第四种：
<%
str="a|b|c|d|e|f|g|h|i|j|k|l|m|n|o|p|q|r|s|t|u|v|w|x|y|z"
str=replace(str,"|","_")
Response.Write(str)
%><hr>
第五种：
<%
str="abcdefghijklmnopqrstuvwxyz"
for n=1 to 26
response.write(mid(str,n,1))
next
%>
</body>
</html>
网站首页
业务范围
服务案例
投票系统
联系方式
电话联系