• 西安外事学院在省茶艺大赛中创多项佳绩西安外事学院-陕西教育新闻 2019-10-25
  • 人民网评:让军人成为全社会最尊崇的职业 2019-10-17
  • 新规:续航150公里以下新能源车取消补贴 2019-10-11
  • 法国革命时代,女人流行穿什么 2019-10-11
  • 黑龙江省县(市、区)委统战部长培训班举办 2019-10-06
  • “夏季第一瓜”竟是它! 2019-10-06
  • 《阿古顿巴》藏语版在藏语卫视首播 2019-09-06
  • 晋中市“三同步”推动互联网治理创新 2019-08-27
  • 法媒:研究称美国人常用药物或增加抑郁风险 2019-08-27
  • 宝贝是地名,你能想到这么浪漫的地名在哪儿吗? 2019-08-15
  • 何树山副省长到方圆机电调研指导工作 2019-08-15
  • 大乐透彩票:如何用ASP输出HTML文件?

    来源:本网整理

    彩票双色球历史开奖结果 www.s9h6.com <!--#include file="top.inc"-->
    <%
    u_title=request.form("u_title")

    ' 检查标题是否被输入.
    if u_title = "" then
    %>
    <form method="POST" action="<%= request.servervariables("script_name") %>">
     <!--当没有标题输入时显示输入框-->

      <p>文件标题<br>
      <input type="text" name="u_title" size="35"></p>
      <p>Font Size<br>
      <select size="1" name="u_text_size">
      <option selected value="1">1</option>
      <option value="2">2</option>
      <option value="3">3</option>
      <option value="4">4</option>
      <option value="5">5</option>
      <option value="6">6</option>
       
      </select></p>
      <p>第1段<br>
      <textarea rows="2" name="u_paragraph1" cols="35"></textarea></p>
      <p>第2段<br>
      <textarea rows="2" name="u_paragraph2" cols="35"></textarea><input type="submit" value="提交" ></p>
    </form>
    <%
    end if
    %>

    <%
    if u_title <> "" then
        u_title=request.form("u_title")
        u_paragraph1=request.form("u_paragraph1")
        u_paragraph2=request.form("u_paragraph2")
        u_text_color=request.form("u_text_color")
        u_text_size=request.form("u_text_size")
        g_filename=replace(u_title," ","_")

    ' 如果有一个用户输入了标题,则获取所有的用户输入的内容.

    set fso = createobject("scripting.filesystemobject")
    Set act = fso.CreateTextFile(server.mappath("write2htm/"&g_filename & "-"& month(date())& day(date())& year(date()) &".htm"), true)
    ' 创建create the text (html) file文件到服务器,并添加mmddyyyy 格式年月日.

    ' 写所有用户输入的text (html) 文件, .htm 扩展名文件可以很容易地转换成你网站最需要的.asp 或 .inc文件.
        act.WriteLine "<html>"
        act.WriteLine chr(13)
        act.WriteLine "<title>"& u_title &"</title>"
        act.WriteLine chr(13)
        act.WriteLine "<body bgcolor='#FFFFFF'>"
        act.WriteLine chr(13)
        act.WriteLine "<p align='center'><font face='arial' size='"& u_text_size &"'>"
        act.WriteLine chr(13)
        act.WriteLine  u_title &"</p>"
        act.WriteLine chr(13)
        act.WriteLine "<p align='left'><font face='arial' size='"&u_text_size&"'>"
        act.WriteLine chr(13)
        act.WriteLine  u_paragraph1 &"</p>"
        act.WriteLine chr(13)
        act.WriteLine "<p align='left'><font face='arial' size='"& u_text_size &"'>"
        act.WriteLine chr(13)
        act.WriteLine u_paragraph2 &"</p>"
        act.WriteLine chr(13)
        act.WriteLine "<p> </p><p> </p><p> </p>"
        act.WriteLine "<p align='center'><font face='arial' size='"& u_text_size &"'>"
        act.WriteLine "此文件被创建!"
        act.WriteLine  now() &"</p>"
    act.Close

    ' 关闭文件.
    %>
    您的页面已成功创建!请点击查看.
    <a href="write2htm/<%= g_filename &"-"& month(date())& day(date())& year(date())  %>.htm"
    target="_blank">查看</a>
    <br>
    <br>
    <% response.write "<html>"
        response.write chr(13)
        response.write "<title>"& u_title &"</title>"
        response.write chr(13)
        response.write "<body bgcolor='#FFFFFF'>"
        response.write chr(13)
        response.write "<p align='center'><font face='arial' size='"& u_text_size &"'>"
        response.write chr(13)
        response.write  u_title &"</p>"
        response.write chr(13)
        response.write "<p align='left'><font face='arial' size='"&u_text_size&"'>"
        response.write chr(13)
        response.write  u_paragraph1 &"</p>"
        response.write chr(13)
        response.write "<p align='left'><font face='arial' size='"& u_text_size &"'>"
        response.write chr(13)
        response.write u_paragraph2 &"</p>"
        response.write chr(13)
        response.write "<p> </p><p> </p><p> </p>"
        response.write "<p align='center'><font face='arial' size='"& u_text_size &"'>"
        response.write "此文件被创建!"
        response.write  now() &"</p>"
    end if
    %>
    <!--#include file="bottom.inc"-->

     

  • 本文相关:
  • 如何用表单的方式推送请求的信息?
  • 如何远程读取数据库页面?
  • 如何在ASP里显示进度条?
  • 如何自动更新导航栏?
  • 如何阻止别人非法链接你网站的图片?
  • 怎样获知数据库的连接属性?
  • 如何按时间显示最新标志
  • 禁止站外提交表单(author:killer)
  • ASP问答集
  • asp中在JScript中使用RecordSet对象的GetRows
  • 免责声明 - 关于我们 - 联系我们 - 广告联系 - 友情链接 - 彩票双色球历史开奖结果 - 频道导航
    Copyright © 2017 彩票双色球历史开奖结果 www.s9h6.com All Rights Reserved
  • 西安外事学院在省茶艺大赛中创多项佳绩西安外事学院-陕西教育新闻 2019-10-25
  • 人民网评:让军人成为全社会最尊崇的职业 2019-10-17
  • 新规:续航150公里以下新能源车取消补贴 2019-10-11
  • 法国革命时代,女人流行穿什么 2019-10-11
  • 黑龙江省县(市、区)委统战部长培训班举办 2019-10-06
  • “夏季第一瓜”竟是它! 2019-10-06
  • 《阿古顿巴》藏语版在藏语卫视首播 2019-09-06
  • 晋中市“三同步”推动互联网治理创新 2019-08-27
  • 法媒:研究称美国人常用药物或增加抑郁风险 2019-08-27
  • 宝贝是地名,你能想到这么浪漫的地名在哪儿吗? 2019-08-15
  • 何树山副省长到方圆机电调研指导工作 2019-08-15
  • 彩票大奖得主情况 遇到长龙 怎么赚的最多 北京快乐8是真假 吉林快三跨度走势图电子版 赌徒为什么戒不了赌 足球位置 电脑龙虎和赢钱技巧 pk10两期必中 15选5开奖结果 竞彩篮球大小分稳赚 安徽快三是什么时候 幸运飞艇加减公式 什么叫竟彩足球过关 斯诺克最新消息丁俊晖 买30码教你赢钱