快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

动态产生变量

<%
how_many=50
mycreate = request.querystring("create")
If mycreate = "" Then
%><TITLE>Dynamically Generate Variables</TITLE>
<BODY bgcolor="#FFFFFF">
<FORM method="post" action="dyn_gen_variables.asp?create=1">
<FONT face="Verdana, Arial, Helvetica, sans-serif" size="2"><B>Dynamically Generate
Variables </B><BR>
<BR>
Variable Name: </FONT>
<INPUT type="text" name="variablename">
<BR>
<FONT face="Verdana, Arial, Helvetica, sans-serif" size="2">Request Type: </FONT>
<INPUT type="radio" name="requesttype" value="querystring" checked>
<FONT face="Verdana, Arial, Helvetica, sans-serif" size="2">Querystring</FONT>
<INPUT type="radio" name="requesttype" value="form">
<FONT face="Verdana, Arial, Helvetica, sans-serif" size="2">Form </FONT><BR>
<BR>
<INPUT type="submit" name="Submit" value="Submit">
</FORM>
<%
else
%>
<TITLE>Dynamically Generate Variables - DONE</TITLE>
<FONT face="Verdana, Arial, Helvetica, sans-serif" size="2"><B>Dynamically Generate
Variables</B></FONT> - DONE<BR>
<BR>
<BR>
<%
variablename = request.form("variablename")
requesttype = request.form("requesttype")
mycounter = 0
Do While mycounter < how_many
myvaroutput = myvaroutput & variablename & mycounter & " = replace(request." & requesttype & "(" & chr
(34) & variablename & mycounter & chr(34) & "), " & chr(34) & "\\\'" &chr(34) & ", " &chr(34) & "\\\'\\\'" & chr
(34) & ")"
myvaroutput = myvaroutput & "<BR>"
myvaroutput2 = myvaroutput2 & variablename & mycounter & " = TRIM(" & variablename & mycounter & ")"
myvaroutput2 = myvaroutput2 & "<BR>"
mycounter = mycounter + 1
loop
response.write "<FONT face=\\\'arial\\\' size=\\\'2\\\'>"
response.write "\\\' Get VARIABLES AND REPLACE APOSTROPHES With Double APOSTROPHES<BR>"
response.write myvaroutput
response.write "<BR><BR>"
response.write "\\\' TRIM ALL TEH SPACES OUT OF THE VARIABLES<BR>"
response.write myvaroutput2
response.write "</FONT>"
%> <%
End If
%>
</BODY>
</HTML>
返回类别: 教程
上一教程: ASP OBJECT之:REDIRECT
下一教程: 在ASP中使用SQL语句之10:视图

您可以阅读与"动态产生变量"相关的教程:
· 产生一个密码,并记录到数据库,然后发送给用户
· 动态显示图片的函数(显示广告条) 
· 实现可动态改变宽度的表格简朴方式
· 动态增加\删除物件如(TEXT,TABLE)的例子
· 查看服务器APPLICATION/SESSION变量工具
    微笑服务 优质保证 索取样品