⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 linkreport.asp

📁 动态自定义报表,真正的中国式报表,可自行编辑
💻 ASP
字号:
<%
'==================================
' 乘风网址 v3.1
' 制 作:乘 风
' 开发网站:http://www.qqcf.com
' 程序演示:http://www.qqcf.com/?action=try
' 最新版本下载:http://www.qqcf.com/?action=down
' 声 明:	
' 本软件系免费程序,提供给个人免费使用,除保留版权外无其它任何限制。
' 我们为付费版用户提供升级服务和技术支持。
' 在程序首页保留乘风原创程序版权和链接的免费用户我们也提供一些的升级服务和技术支持。
' 未经作者许可禁止用于任何商业用途。
' 乘风网址功能:
' 1.同时支持Access和Mssql数据库
' 2.完全生成静态页面,包括每个网址转向页面
' 3.支持修改模板,支持二级栏目
' 4.自带4000多条网址数据,支持系统放在网站子目录
' 乘风其它作品:乘风多用户计数器.net,php,access,MsSql版、乘风电影程序、
'        乘风网站推广系统、乘风广告管理系统、乘风论坛等。
' 此段版权注释不会影响网页打开速度,请勿删除!
'           2006年12月25日									
'===================================
%>
<!--#include file="Conn.asp"-->
<!--#include file="QQCF_MyFunction.asp"-->
<%IF Request("Action")="save" Then%>
<%

 sitename=GoBack(Request("sitename"),"请输入网站名称")
 url=GoBack(Request("url"),"请输入网站网址")

 Content="<b>错误报告:</b><br>网站名称:"&sitename&"<br>"
 Content=Content&"网站网址:"&url&"<br>"

 Set Rs= Server.CreateObject("ADODB.Recordset")
 Sql="Select Top 1 * From WWW_QQCF_COM_CFWZ_Gbook"
 Rs.Open Sql,Conn,3,2
 Rs.addnew
 Rs("Content")=Content
 Rs.update
 
 Call AlertUrl("申请成功!","LinkReport.asp")
%>
<%End If%>
<html>
<head>
<title>错误网址报告</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="QQCF_Pic/style.css" rel="stylesheet" type="text/css">
</head>

<body>

<!--#include file="Top.asp"-->
       
<table width="600" border="0" align="center" cellpadding="3" cellspacing="2" bordercolor="D6DFF5" bgcolor="D6DFF5" >
  <form action="?Action=save" method="post" name="link">
    <tr bgcolor="ffffff"> 
      <td colspan="2"> <div align="center"><font color="#000000"><strong>无效网址报告</strong></font>&nbsp;&nbsp; 
        </div></td>
    </tr>
    <tr bgcolor="#FFFFFF"> 
      <td>网站名称:<font color="#FF0000">*</font></td>
      <td><input name="sitename" type="text" id="sitename" size="20" maxlength="12">
      </td>
    </tr>
    <tr bgcolor="#FFFFFF"> 
      <td bgcolor="#FFFFFF">网站地址:<font color="#FF0000">*</font></td>
      <td><input name="url" type="text" id="url" value="http://" size="40" maxlength="50">
      </td>
    </tr>
    <tr bgcolor="#FFFFFF"> 
      <td colspan="2" align="center"> <input name="Submit" type="submit" class="input" style="background-color: #F8FFFF; color: #00000E; border-style: dotted; border-width: 1" value="提交申请">
      </td>
    </tr>
  </form>
</table>                                  
                               
  
</div>
<!--#include file="Bottom.asp"-->
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -