📄 2.asp
字号:
<!--#include file = "../top/public.asp"-->
<!--#include file="login.asp"-->
<!--#include file="conn.asp"-->
<%
Set rs=Server.CreateObject("ADODB.recordset")
mysq="select * from mm where user='"&user&"'"
set rs=cn.execute(mysq)
Set rs1=Server.CreateObject("ADODB.recordset")
mysq1="select * from user1 where u1='"&user&"'"
set rs1=cn.execute(mysq1)
%>
<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>
网站网电在线销售中心！</title>
<link href="mycss.css" rel="stylesheet" type="text/css">
</head>
<body leftMargin=0 topMargin=1 background="../images/mybk2.gif">
<div align="center" style="width: 728; height: 659">
<center>
<table width="770" border="0" align="center" cellpadding="0" cellspacing="0" height="78">
<tr>
<td width="190" height="78">
<span style="font-size: 9pt">
<img src="../images1/logo.gif" width="184" height="65"></span></td>
<td height="78">
<table border=0 cellpadding=0 cellspacing=0 width="100%">
<tr>
<td height=70 width="478" align="center"><span style="font-size: 9pt"><img src="../images1/banner.gif" width="468" height="60"></span></td>
<td height=70 width="92" align="center" bgcolor="#FFFFFF">
<table width="82" border="0" cellspacing="0" cellpadding="1" height="60" bgcolor="#1859FF">
<tr>
<td height="58" bgcolor="#FFFFFF">
<table width="100%" border="0" cellspacing="0" cellpadding="1" bgcolor="#E7EBFF" height="60">
<tr>
<td bgcolor="#FF0000" height="58">
<font color=#FFFFFF><span style="font-size: 9pt">站长：<a style=cursor:hand; title=============================== 站长联系资料 ============================== 站长：<%=user%> QQ：<%=oicq1%> 信箱：<%=mail1%> ==============================><%=left(user,4)%>...</a><br>QQ：<a style=cursor:hand; title=============================== 站长联系资料 ============================== 站长：<%=user%> QQ：<%=oicq1%> 信箱：<%=mail1%> ==============================><%=left(oicq1,6)%>...</a><br>信箱：</span></font><span style="font-size: 9pt"><font color=1859FF><a href=mailto:<%=mail1%>><font color="#FFFFFF"><img border=0 src=../images/mail.gif align=absbottom width=16 height=16 alt=<%=mail1%>></font></a></font></span><font color="#FFFFFF"><span style="font-size: 9pt">
</span>
</font>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</center>
</div>
<SCRIPT LANGUAGE=vbscript>
Sub save_onclick
if form.name.value="" then
msgbox "请填写用户名"
form.name.focus ()
exit sub
end if
if form.SiteName.value="" then
msgbox "请输入网站名称"
form.SiteName.focus ()
exit sub
end if
if form.linktype.value="请选择类别" or form.linktype.value="" then
msgbox "请选择网站类别"
exit sub
end if
if form.Description.value="" then
msgbox "请输入网站简介"
form.Description.focus ()
exit sub
end if
if len(form.Description.value)>100 then
msgbox "网站简介长度大于100"
form.Description.focus ()
exit sub
end if
form.submit ()
End Sub
</SCRIPT>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>友情链接</title>
<link href="1.css" rel="stylesheet" type="text/css">
</head>
<body topmargin="0" leftmargin="0">
<div align="center">
<center>
<table border="0" width="400" cellspacing="0" cellpadding="10" bordercolorlight="#000000" bordercolordark="#FFFFFF" align="center" class="table004" height="121">
<tr>
<td class=table003 align=center height="12" style="background-color: #CCCCCC" background="images/hard_03.gif"><font size="3">
<%
SQL="Select * From sort"
Set rs=conn.Execute(SQL)
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1
%>
</font>申请支付</td>
</tr>
<tr>
<td height="69" align="center" class="table001" style="background-color: #F9F9F9">
<form action="Gform.asp" method="post" name="form" id="form">
<table width="336" height="108" border="0" class="unnamed1">
<tr>
<td width="30%" height="25">用户名：</TD>
<td width="70%" height="25">
<input name="Name" size="32" value="ID（）次申请支付" class="input1">
</TD>
</TR>
<tr>
<td width="30%" height="25">姓名：�</TD>
<td width="70%" height="25"><input name="SiteName" type="text" class="input1" value="" size="32"></TD>
</TR>
<tr>
<td height="28">加入类别：</TD>
<td height="28">
<select name="linktype" id="linktype">
<option>请选择类别</option>
<% do while not rs.eof %>
<option value="<%=rs("sort")%>"><%=rs("sort")%></option>
<% rs.movenext
loop
%>
</select></TD>
</TR>
<tr>
<td colspan="2" height="1"> <p>申请支付金额
<TEXTAREA name=Description rows=1 cols=27 class="input1"></TEXTAREA>
</TD>
</TR>
<tr>
<td align="middle" colspan="2" height="1">
<div align="center">
<input name="join" type="button" class="input2" id="join" onclick=save_onclick value=" 加 入 " >
<input name="B12" type="reset" class="input2" id="B12" value=" 重 写 " >
</div></TD>
</TR>
</TABLE>
</form>
</td>
</tr>
</table>
</CENTER></DIV>
</body>
</html></body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -