Graffiti.Asp
上传用户:qfkgdy
上传日期:2020-06-18
资源大小:1888k
文件大小:7k
源码类别:

手机WAP编程

开发平台:

ASP/ASPX

  1. <!--#include file="wml.ini"-->
  2. <%  
  3. id=request("id")
  4. page=cint(request("page")) 
  5. p=cint(request("p"))
  6. pp=cint(request("pp")) 
  7. %>
  8. <% 
  9. call wmlbegin("制作涂鸦图片","wrap")
  10.    set rs=conn.execute("select * from [Picture] WHERE id=" & id & "")
  11. do while not rs.eof
  12. path=rs("File_Url")
  13. 'call wmlimg(rs("File_Url"),rs("Title"),true)
  14. v1=wap.rndc()
  15. if wap.ftype(rs("File_Url"))="gif" then
  16. Set fso = Server.CreateObject("Scripting.FileSystemObject") 
  17. fso.copyfile server.mappath(replace(rs("File_Url"),"/","")),server.mappath("") & "imagestemp"
  18. set objfso=nothing  
  19. end if
  20. if wap.ftype(rs("File_Url"))<>"gif" then
  21. Call (new ImageClass).zoom(rs("File_Url"),"images/temp/"& v1 & rs("id") &"_176x220." & wap.ftype(rs("File_Url")) & "",176,220)
  22. call wmlimg("/images/temp/" & v1 & rs("id") & "_176x220." & wap.ftype(rs("File_Url")) & "",wap.filter("wml",rs("Title")),true) 
  23. else
  24. call wmlimg("/images/temp/" & Split(rs("File_Url"),"/")(4) & "",wap.filter("wml",rs("Title")),true) 
  25. end if
  26. %>
  27. 宽:<input type="text" format="*N"  name="width" maxlength="3" size="3" value="160"/>
  28. 高:<input type="text" format="*N"  name="height" maxlength="3" size="3" value="240"/> 
  29. <br/>涂鸦文字:<input type="text" format="*m"  name="texts" maxlength="20" value="Hello World!"/>
  30. <br/>字体大小:<input type="text" format="*N"  name="font_size" maxlength="2" value="10" size="3"/>
  31. <br/>文字阴影颜色:<select name="font_shadow" value="a">
  32.        <option value="a">不加阴影</option>
  33.        <option value="FFFFFF">白色</option>
  34.        <option value="F5F5F5">烟白色</option>
  35.        <option value="FFFF00">黄色</option>
  36.        <option value="9ACD32">黄绿色</option>
  37.        <option value="F0F8FF">艾利斯兰</option>
  38.        <option value="FAEBD7">古董白</option>
  39.        <option value="00FFFF">浅绿色</option>
  40.        
  41.         <option value="7FFFD4">碧绿色</option>
  42.        <option value="F0FFFF">天蓝色</option>
  43.        <option value="F5F5DC">米色</option>
  44.        <option value="FFE4C4">桔黄色</option>
  45.        <option value="000000">黑色</option>
  46.        <option value="FFEBCD">白杏色</option>
  47.        <option value="0000FF">蓝色</option>
  48.        
  49.        <option value="8A2BE2">紫罗兰色</option>
  50.        <option value="A52A2A">褐色</option>
  51.        <option value="DEB887">实木色</option>
  52.        <option value="5F9EA0">军兰色</option>
  53.        <option value="7FFF00">黄绿色</option>
  54.        <option value="D2691E">巧可力色</option>
  55.        <option value="FF7F50">珊瑚色</option>
  56.        </select>
  57.  <br/>文字背景颜色:<select name="font_background" value="a">
  58.        <option value="a">不加背景颜色</option>
  59.        <option value="FFFFFF">白色</option>
  60.        <option value="F5F5F5">烟白色</option>
  61.        <option value="FFFF00">黄色</option>
  62.        <option value="9ACD32">黄绿色</option>
  63.        <option value="F0F8FF">艾利斯兰</option>
  64.        <option value="FAEBD7">古董白</option>
  65.        <option value="00FFFF">浅绿色</option>
  66.        
  67.         <option value="7FFFD4">碧绿色</option>
  68.        <option value="F0FFFF">天蓝色</option>
  69.        <option value="F5F5DC">米色</option>
  70.        <option value="FFE4C4">桔黄色</option>
  71.        <option value="000000">黑色</option>
  72.        <option value="FFEBCD">白杏色</option>
  73.        <option value="0000FF">蓝色</option>
  74.        
  75.        <option value="8A2BE2">紫罗兰色</option>
  76.        <option value="A52A2A">褐色</option>
  77.        <option value="DEB887">实木色</option>
  78.        <option value="5F9EA0">军兰色</option>
  79.        <option value="7FFF00">黄绿色</option>
  80.        <option value="D2691E">巧可力色</option>
  81.        <option value="FF7F50">珊瑚色</option>
  82.        </select>      
  83. <br/>字体:<select name="font_family" value="SimSun">
  84.        <option value="SimSun">宋体</option>
  85.        <option value="LiSu">隶书</option>
  86.        <option value="KaiTi_GB2312">楷体</option>
  87.        <option value="YouYuan">幼圆</option>
  88.        <option value="SimHei">黑体</option>
  89.        </select>
  90. <br/>字体样式:<select name="font_bold" value="true">
  91.        <option value="False">无</option>
  92.        <option value="true">粗体</option>
  93.        </select>       
  94. <br/>字体颜色:<select name="font_color" value="FFFFFF">
  95.        <option value="FFFFFF">白色</option>
  96.        <option value="F5F5F5">烟白色</option>
  97.        <option value="FFFF00">黄色</option>
  98.        <option value="9ACD32">黄绿色</option>
  99.        <option value="F0F8FF">艾利斯兰</option>
  100.        <option value="FAEBD7">古董白</option>
  101.        <option value="00FFFF">浅绿色</option>
  102.        
  103.         <option value="7FFFD4">碧绿色</option>
  104.        <option value="F0FFFF">天蓝色</option>
  105.        <option value="F5F5DC">米色</option>
  106.        <option value="FFE4C4">桔黄色</option>
  107.        <option value="000000">黑色</option>
  108.        <option value="FFEBCD">白杏色</option>
  109.        <option value="0000FF">蓝色</option>
  110.        
  111.        <option value="8A2BE2">紫罗兰色</option>
  112.        <option value="A52A2A">褐色</option>
  113.        <option value="DEB887">实木色</option>
  114.        <option value="5F9EA0">军兰色</option>
  115.        <option value="7FFF00">黄绿色</option>
  116.        <option value="D2691E">巧可力色</option>
  117.        <option value="FF7F50">珊瑚色</option>
  118.        </select>
  119. <br/>位置:<select name="position" value="0">
  120.        <option value="0">自定义</option>
  121.        <option value="1">左上角</option>
  122.        <option value="2">右上角</option>
  123.        <option value="3">左下角</option>
  124.        <option value="4">右下角</option>
  125.        <option value="5">居中</option>
  126.        </select>
  127. <br/>
  128. X坐标:<input type="text" format="*N"  name="px" maxlength="3" size="3" value="90"/>
  129. Y坐标:<input type="text" format="*N"  name="py" maxlength="3" size="3" value="220"/> 
  130. <br/>
  131.  <anchor>打完收工
  132.  <go href="DIY.Asp?" method="post" accept-charset="utf-8">
  133.   <postfield name="width" value="$(width)"/>
  134.   <postfield name="font_size" value="$(font_size)"/>
  135.   <postfield name="height" value="$(height)"/>
  136.   <postfield name="texts" value="$(texts)"/>
  137.   <postfield name="font_shadow" value="$(font_shadow)"/>
  138.   <postfield name="font_background" value="$(font_background)"/> 
  139.   <postfield name="font_family" value="$(font_family)"/>  
  140.   <postfield name="font_bold" value="$(font_bold)"/>
  141.   <postfield name="font_color" value="$(font_color)"/>
  142.   <postfield name="position" value="$(position)"/>
  143.   <postfield name="px" value="$(px)"/>
  144.   <postfield name="py" value="$(py)"/>
  145.   <postfield name="pid" value="<%=id%>"/>
  146.   <postfield name="path" value="<%=path%>"/>
  147.  </go>
  148.  </anchor>
  149. <br/>
  150. <%
  151. ClassID=rs("ClassID")
  152. AlbumID=rs("AlbumID")
  153. rs.movenext
  154. loop
  155. Closers()
  156.     %>
  157. <br/>
  158. <%
  159. set rs=conn.execute("select * from [Class] WHERE id=" & ClassID & "")
  160. do while not rs.eof
  161. Class_Title=rs("Class_Title")
  162. rs.movenext
  163. loop
  164. Closers()
  165. set rs=conn.execute("select * from [Album] WHERE id=" & AlbumID & "")
  166. do while not rs.eof
  167. Album_Title=rs("Album_Title")
  168. rs.movenext
  169. loop
  170. Closers()
  171. call wap.navs(Class_Title&",Categories.Asp?id="& ClassID &"&amp;page=" & p & "|"&Album_Title&",View.Asp?id=" & AlbumID & "&amp;page=" & pp & "&amp;p=" & p & ",")
  172. call wmlend
  173. %>