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

📄 strleft.asp

📁 每次上传
💻 ASP
📖 第 1 页 / 共 2 页
字号:
		<TD class='ML_Tdbg'><a href="Sale.asp?Action=Salea">国 际 市 场</a></TD>
	</TR>
	<TR><TD colspan=2 height=2><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
</TABLE>
<TABLE cellPadding=0 cellSpacing=0 border=0><TR><TR><TD height=8><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR></TABLE>
</DIV>
<%
End Sub

Sub Style_Job()
%>
<DIV align="center">
<TABLE cellPadding=0 cellSpacing=0 class='ML_TitlePt'>
	<TR> 
		<TD class='ML_TdPtbg'><SPAN class=GlowLeft>人 才 招 聘</SPAN></TD>
	</TR>
</TABLE>
<TABLE cellPadding=0 cellSpacing=0 align="center" class="ML_Titlebg">
	<TR><TD colspan=2 height=2><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	<TR> 
		<TD class='ML_TdImgLI'></TD>
		<TD class='ML_Tdbg'><a href="Job.asp">人 才 招 聘</a></TD>
	</TR>
	<TR><TD colspan=2 class='TdDotted'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	<TR> 
		<TD class='ML_TdImgLI'></TD>
		<TD class='ML_Tdbg'><a href="Jobs.asp">人 才 策 略</a></TD>
	</TR>
	<TR><TD colspan=2 height=2><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
</TABLE>
<TABLE cellPadding=0 cellSpacing=0 border=0><TR><TR><TD height=8><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR></TABLE>
</DIV>
<%
End Sub

Sub Style_Download()
%>
<DIV align="center">
<TABLE cellPadding=0 cellSpacing=0 class='ML_TitlePt'>
	<TR> 
		<TD class='ML_TdPtbg'><SPAN class=GlowLeft>下 载 列 表</SPAN></TD>
	</TR>
</TABLE>
<TABLE cellPadding=0 cellSpacing=0 class="ML_Titlebg">
	<TR><TD height=2><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	<TR>
		<TD vAlign=top><% call Show_DownSmallClass_Tree() %></TD>
	</TR>
</TABLE>
<TABLE cellPadding=0 cellSpacing=0 border=0><TR><TR><TD height=8><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR></TABLE>
</DIV>
<%
End Sub

Sub Style_Member()
%>
<DIV align="center">
<TABLE cellPadding=0 cellSpacing=0 class='ML_TitlePt'>
	<TR> 
		<TD class='ML_TdPtbg'><SPAN class=GlowLeft>会 员 中 心</SPAN></TD>
	</TR>
</TABLE>
<TABLE cellPadding=0 cellSpacing=0 align="center" class="ML_Titlebg">
	<TR><TD colspan=2 height=2><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	<TR> 
		<TD class='ML_TdImgLI'></TD>
		<TD class='ML_Tdbg'><a href="Faq.asp">常见问题解答</a></TD>
	</TR>
	<TR><TD colspan=2 class='TdDotted'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	<TR> 
		<TD class='ML_TdImgLI'></TD>
		<TD class='ML_Tdbg'><a href="Went.asp">用户信息反馈</a></TD>
	</TR>
	<TR><TD colspan=2 class='TdDotted'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	<TR> 
		<TD class='ML_TdImgLI'></TD>
		<TD class='ML_Tdbg'><a href="Manage.asp">修改会员资料</a></TD>
	</TR>
	<TR><TD colspan=2 class='TdDotted'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	<TR> 
		<TD class='ML_TdImgLI'></TD>
		<TD class='ML_Tdbg'><a href="ManagePwd.asp">修改会员密码</a></TD>
	</TR>
	<TR><TD colspan=2 class='TdDotted'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	<TR> 
		<TD class='ML_TdImgLI'></TD>
		<TD class='ML_Tdbg'><a href="E_shop.asp">购物订单查询</a></TD>
	</TR>
	<TR><TD colspan=2 class='TdDotted'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	<TR> 
		<TD class='ML_TdImgLI'></TD>
		<TD class='ML_Tdbg'><a href="NetBook.asp">站内留言中心</a></TD>
	</TR>
	<TR><TD colspan=2 class='TdDotted'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	<TR> 
		<TD class='ML_TdImgLI'></TD>
		<TD class='ML_Tdbg'><a href="UserLogout.asp">退出会员中心</a></TD>
	</TR>
	<TR><TD colspan=2 height=2><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
</TABLE>
<TABLE cellPadding=0 cellSpacing=0 border=0><TR><TR><TD height=8><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR></TABLE>
</DIV>
<%
End Sub

Sub Style_Mail()
%>
<DIV align="center">
<TABLE cellPadding=0 cellSpacing=0 class='ML_TitlePt'>
	<TR> 
		<TD class='ML_TdPtbg'><SPAN class=GlowLeft>邮 件 列 表</SPAN></TD>
	</TR>
</TABLE>
<TABLE cellPadding=0 cellSpacing=0 align="center" class="ML_Titlebg">
	<TR><TD height=5><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
	<TR> 
		<form method="POST" action="Mail_chk.asp">
			<TD vAlign=top>
				<table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
					<tr> 
						<td height="25"> <div align="center"><input name='email'type='text'value="@" size='15' class=form></div></td>
					</tr>
					<tr> 
						<td height="25"><div align="center"> 
							<input type="submit" value="订阅" name="action">
							&nbsp; 
							<input type="submit" value="退订" name="action">
						</div></td>
					</tr>
				</table>
			</TD>
		</form>
	</TR>
	<TR><TD height=5><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
</TABLE>
<TABLE cellPadding=0 cellSpacing=0 border=0><TR><TR><TD height=8><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR></TABLE>
</DIV>
<%
End Sub

Sub Style_Fellow()
%>
<DIV align="center">
<TABLE cellPadding=0 cellSpacing=0 class='ML_TitlePt'>
	<TR> 
		<TD class='ML_TdPtbg'><SPAN class=GlowLeft>友 情 连 接</SPAN></TD>
	</TR>
</TABLE>
<TABLE cellPadding=0 cellSpacing=0 class="ML_Titlebg">
	<TR><TD height=2><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
<%
dim rs_links,sqltext4,i
set rs_links=server.createobject("adodb.recordset")
sqltext4="select top 10 * from Links order by id desc"
rs_links.open sqltext4,conn,1,1

i=0
do while not rs_links.eof
%>
				<TR vAlign=center>
					<TD align='center' class='ML_Tdbg'>
					<a href="<%=rs_links("link")%>" title="<%=rs_links("note")%>"target="_blank"><%=rs_links("name")%></a></TD>
				</TR>
				<TR><TD class='TdDotted'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
<%
rs_links.movenext
i=i+1
if i=10 then exit do
loop
rs_links.close 
%>
</TABLE>
<TABLE cellPadding=0 cellSpacing=0 border=0><TR><TR><TD height=8><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR></TABLE>
</DIV>
<%
End Sub
Sub Style_Adcolumn()
%>
<SCRIPT LANGUAGE="JavaScript" src="../Skin/<%=strSkins%>/BsImgLogo.js"></SCRIPT>
<%
End Sub
'首页
Sub Left_Index() 
if strSkins <= 200 and strSkins >= 1 then
Call Style_Login() '会员登陆
Call Style_Bulletin() '网站公告
elseif strSkins <= 250 and strSkins >= 201 then 
end if
Call Style_CoProfile() '公司简介
Call Style_Product() '产品列表
Call Style_Mail() '邮件列表
Call Style_Fellow() '友情连接
End Sub

'首页右
Sub Right_Index() 
Call Style_Login() '会员登陆
Call Style_Bulletin() '网站公告
Call Style_Search() '产品搜索
End Sub

'下载中心
Sub Right_Download() 
Call Style_Login() '会员登陆
Call Style_Search() '产品搜索
End Sub

'公司简介
Sub Left_CoProfile() 
if strSkins <= 200 and strSkins >= 1 then
Call Style_Login() '会员登陆
elseif strSkins <= 250 and strSkins >= 201 then 
end if
Call Style_CoProfile() '公司简介
Call Style_Mail() '邮件列表
Call Style_Fellow() '友情连接
End Sub

'新闻资讯
Sub Left_News() 
if strSkins <= 200 and strSkins >= 1 then
Call Style_Login() '会员登陆
elseif strSkins <= 250 and strSkins >= 201 then 
end if
Call Style_News() '新闻中心
Call Style_Mail() '邮件列表
Call Style_Fellow() '友情连接
End Sub

'产品展示
Sub Left_Product() 
if strSkins <= 200 and strSkins >= 1 then
Call Style_Login() '会员登陆
elseif strSkins <= 250 and strSkins >= 201 then 
end if
Call Style_Product() '产品列表
Call Style_Fellow() '友情连接
End Sub

'公司荣誉
Sub Left_Honor() 
if strSkins <= 200 and strSkins >= 1 then
Call Style_Login() '会员登陆
elseif strSkins <= 250 and strSkins >= 201 then 
end if
Call Style_Honor() '公司荣誉
Call Style_Mail() '邮件列表
Call Style_Fellow() '友情连接
End Sub

'营销网络
Sub Left_Sale() 
if strSkins <= 200 and strSkins >= 1 then
Call Style_Login() '会员登陆
elseif strSkins <= 250 and strSkins >= 201 then 
end if
Call Style_Sale() '营销网络
Call Style_Mail() '邮件列表
Call Style_Fellow() '友情连接
End Sub

'人才招聘
Sub Left_Job() 
if strSkins <= 200 and strSkins >= 1 then
Call Style_Login() '会员登陆
elseif strSkins <= 250 and strSkins >= 201 then 
end if
Call Style_Job() '人才招聘
Call Style_Mail() '邮件列表
Call Style_Fellow() '友情连接
End Sub

'下载中心
Sub Left_Download() '下载列表
if strSkins <= 200 and strSkins >= 1 then
Call Style_Login() '会员登陆
elseif strSkins <= 250 and strSkins >= 201 then 
end if
Call Style_Download() '产品列表
Call Style_Fellow() '友情连接
End Sub

'会员中心
Sub Left_Member() 
Call Style_Member() '会员中心
Call Style_Mail() '邮件列表
Call Style_Fellow() '友情连接
End Sub

'call Style_Bulletin()
%>

⌨️ 快捷键说明

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