<!--#include file="dbconn.asp"-->
<!--#include file="inc/char.inc"-->
<%
dim id
dim title
dim dateandtime
dim url
dim ip
dim ys
dim showname
dim name
dim sql
dim rs
dim cansave
dim founderr
dim errmsg
if founderr=false then
id=htmlencode2(request.form("txtid"))
name=htmlencode2(request.form("txtname"))
ip=Request.ServerVariables("REMOTE_ADDR")
ys=htmlencode2(request.form("ys"))
showname=htmlencode2(request.form("txtshowname"))
title=htmlencode2(request.form("txttitle"))
lx=htmlencode2(request.form("lx"))
yxhj=htmlencode2(request.form("yxhj"))
url=request.form("txturl")
set rs=server.createobject("adodb.recordset")
sql="select * from con where (id is null)" 
rs.open sql,conn,1,3
rs.addnew
rs("id")=id
rs("ys")=ys
rs("title")=title
rs("ip")=ip
rs("url")=url
rs("name")=name
rs("lx")=lx
rs("yxhj")=yxhj
rs("showname")=showname
rs("dateandtime")=date()
rs.update
rs.close
set rs=noting
conn.close
set conn=nothing

%>
<html>
<head>
<title></title>
<link rel="stylesheet" type="text/css" href="pick.css">
</head>
<body>

<table border="0" width="100%" cellspacing="0" cellpadding="0" height="284">
  <tr>
    <td width="100%" height="100%" valign="middle"><div align="center"><center><table border="0"
    width="90%" cellspacing="0" cellpadding="0">
      <tr>
        <td width="73%"
        style="border-right: 1px solid rgb(0,0,0); border-top: 1px solid rgb(0,0,0)"
        bgcolor="#F3F3F3" valign="top"><table border="0" width="100%" height="327" cellspacing="0"
        cellpadding="0">
          <tr>
            <td width="100%" height="21" class="newfont4"><p align="center"><font color="#0000FF"><b>中国源码站软件发布系统</b></font></td>
          </tr>
          <tr>
            <td width="100%" height="288" valign="top"><div align="center"><center><table border="1" cellspacing="0" width="80%" cellpadding="0" bordercolorlight="#C0C0C0"
bordercolordark="#FFFFFF" height="138">
  <tr>
    <td width="100%" bgcolor="#FFFFFF" height="23"><p align="center"><font color="#000060">添加成功，非常感谢您提供好的软件</font></td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#FFFFFF" height="111"><p align="left" style="margin-left:5px"><font
    color="#000000"><br>
      你的姓名:<%response.write name%><br>
    <br>
      下载地址:<%response.write url%><br>
    <br>
      软件名称:<%response.write showname%><br>
      <br>
      运行环境:<%response.write yxhj%><br>
      <br>
      软件类型:<%response.write lx%><br>
    <br>
      程序演示:<%response.write ys%><br>
    <br>
      发表时间:<%response.write date()%><br>
      <br>
    </font><font color="#800080">您的IP是:</font><%response.write IP%><br>
      </p>
    <p align="center"><font color="#000000"><a href="add.asp">继续发布软件<br>
      </font>
    </td>
  </tr>
</table>
 </center></div></td>
     </tr>
    </table>
     </td>
     </tr>
    </table>
    </center></div></td>
  </tr>
</table>
<%else
 response.write "由于以下的原因不能保存数据："
 response.write errmsg
end if
%>
</body>
</html>