country.asp

英文版全站B2B仿阿里巴巴贸易平台网站,全英文

<%
	if instr(session("EAPurview"),"32")=0 then
		response.redirect "../login.asp"
		response.end
	end if
%>
<!--#include file="../../Inc/DBConn1.asp" -->
<LINK href="../../CSS/style.css" rel="stylesheet" type="text/css"></LINK>

<%
	if request("action")="del" then
		conn.execute("delete from Country where CountryID=" & request("CountryID"))
	end if
%>

<%
	set CounRs=server.createobject("adodb.recordset")
	CounSql="select * from Country"
	CounRs.open CounSql,conn,1,1
%>
<CENTER>
<table width="100%" border="0" cellspacing="0" cellpadding="3" ID="Table1">
	<TR height=30 bgcolor="#F78200">    
		<TD><b><font color="#FFFFFF">国家/地区管理&nbsp;——&nbsp;<a href="AddCountry.asp"><font color="#FFFFFF">添加国家/地区</font></a></font></b></td>
	</tr>
	<tr>
		<td valign=top>
			<TABLE border="0" width="100%" cellpadding="0" ID="Table2">
				<TR height=23>
				<%
					j=1
					while not CounRs.eof
				%>
				<td width="25%" height="25" align="left"><p style="line-height:150%"><%=CounRs("CountryName")%>〖<a href='EditCountry.asp?CountryID=<%=CounRs("CountryID")%>'><font color=#ff0000>修改</font></a>│<a href='Country.asp?action=del&CountryID=<%=CounRs("CountryID")%>' onclick="return confirm('确定要删除这个国家/地区吗？')"><font color=#ff0000>删除</font></a>〗</td>
				<%if j mod 3 = 0 then%></tr><tr><%end if%>
				<%
						CounRs.movenext
						j=j+1
					wend
					CounRs.close
					set CounRs=nothing
				%>
			</TABLE>   
		</TD>
	</TR>
</TABLE>