最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
简体中文编码对应器---建议加入精华区供大家可能备用
时间：2022-07-02 23:46:42 编辑：袖梨 来源：一聚教程网
FirstCHR = Request("FirstCHR") 'FirstCHR="45217" '定义起始值
LastCHR = Request("LastCHR") 'LastCHR="62289" '定义终结值
HttpAddress = Request.ServerVariables("url") '不要动
Sub MakeChinese()
Response.write "起始值："&FirstCHR&" "
Response.write "终止值："&LastCHR&" "
Response.write "差值= "&LastCHR-FirstCHR+1&"
LastCHR = Request("LastCHR") 'LastCHR="62289" '定义终结值
HttpAddress = Request.ServerVariables("url") '不要动
Sub MakeChinese()
Response.write "起始值："&FirstCHR&" "
Response.write "终止值："&LastCHR&" "
Response.write "差值= "&LastCHR-FirstCHR+1&"
"
FOR J = FirstCHR TO LastCHR
RESPONSE.WRITE " "
k = k+1
if (J mod 20) = 0 then
RESPONSE.WRITE "（最后为"&J&"）
"
end if
NEXT
RESPONSE.WRITE "
共有："& K &"中文字
"
End Sub
%>
相关文章
- dnf幽暗岛奖励大全 幽暗岛奖励掉落有哪些 11-30
- dnf第6套天空套幻魅外观大全 第6期稀有装扮幻魅外观汇总 11-30
- dnf撕碎的衣角怎么获得 撕碎的衣角掉落地图介绍 11-30
- dnf铭刻在迷雾中的足迹隐藏任务触发条件攻略 铭刻足迹于迷雾中者声誉获得方法 11-30
- dnf阿拉德萌动小兽通行券宠物属性介绍 11-30
- dnf阿拉德萌动小兽通行券全奖励内容及价格一览 11-30