<%@ LANGUAGE=VBScript codepage ="936" %>
<!--#include file="check.asp"-->
<%Response.Expires=0
Response.Buffer=true
lb=LCase(trim(Request.QueryString("lb")))
id=trim(Request.QueryString("id"))
if id<>"" then
	Set conn=Server.CreateObject("ADODB.CONNECTION")
	Set rs=Server.CreateObject("ADODB.RecordSet")
	conn.open Application("sjjh_usermdb")
	rs.open "SELECT * from sjjh_ss where id=" & id,conn,1,1
	a=rs("a")
	b=rs("b")
	c=rs("c")
	rs.close
	set rs=nothing
	conn.close
	set conn=nothing
else
	id=0
	a="名称"
	b="http://"
	c=lb
end if
%>
<html><head><title>贴图音乐动画添加程序</title><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><link href="jh.css" rel="stylesheet" type="text/css"></head>
<SCRIPT language=JavaScript>
function check(){
var a=document.form.a.value;
var b=document.form.b.value;
var c=document.form.c.value;
if(a=="" || a=="名称"){alert("提示：名称不能为空！");return false;}
if(b=="" || b=="http://"){alert("提示：联接地址不可为空！");return false;}
if(c=="" ){alert("提示：请选择清加的类别！");return false;}
}
</script>
<form method="post" action="jhgl.asp?act=addss" onSubmit="return check(this);" name="form" >
  <table width="50%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#000000" bordercolordark="#FFFFFF">
    <tr> 
      <td height="14" colspan="2" align="center" bgcolor="#009900">贴图音乐动画添加程序</td>
    </tr>
    <tr bgcolor="" onmouseover="this.bgColor='#85C2E0';" onmouseout="this.bgColor='';"> 
      <td width="54" align="center">名称</td>
      <td width="330"><input name="id" type="hidden" value="<%=id%>" size="20" maxlength="20"><input name="a" type="text" value="<%=a%>" size="20" maxlength="20"></td>
    </tr>
    <tr bgcolor="" onmouseover="this.bgColor='#85C2E0';" onmouseout="this.bgColor='';"> 
      <td width="54" align="center">地址</td>
      <td width="330"><input name="b" type="text" id="b" value="<%=b%>" size="40"> </td>
    </tr>
    <tr bgcolor="" onmouseover="this.bgColor='#85C2E0';" onmouseout="this.bgColor='';"> 
      <td width="54" align="center">类别</td>
      <td width="330"><select name=c size=1 id="c" >
          <option value="" selected>选择类别</option>
          <option value="贴图" <%if c="贴图" then%>selected<%end if%>>贴图</option>
          <option value="图片" <%if c="图片" then%>selected<%end if%>>图片</option>
          <option value="音乐" <%if c="音乐" then%>selected<%end if%>>音乐</option>
          <option value="影视" <%if c="影视" then%>selected<%end if%>>影视</option>
          <option value="flash" <%if c="flash" then%>selected<%end if%>>flash</option>
        </select> </td>
    </tr>
    <tr align="center"> 
      <td colspan="2" bgcolor="#009900"><input type="submit" value="确 定"> <input  onClick="javascript:window.document.location.href='sslist.asp?lb=<%=lb%>'" value="返 回" type=button name="back"></td>
    </tr>
  </table>
  <div align="center"><br>
    贴图文件如果要增加请赶接写贴图的文件名，然后将文件上传到chat/pic目录中即可.
  </div>
</form>
