<1> 优化了部分代码及一些BUG.提高了浏览速度 <2> 可以通过会员助手自由管理各种信息 <3> 修正了反馈信息及询价订单错误 <4>

				
				
				
								   
				
				
				
				   dim rs,sql,id
					
				        id=request("id")
						
				
					sql="delete from [user] where id="&request("id")
					sql="delete from [user_zj] where id="&request("id")
					set rs=server.createobject("adodb.recordset")
				        rs.open sql,conn,3,3
				
				%>
				
								        connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
					connstr = connstr & Server.MapPath("../mdb/system.asp")
					set conn=Server.CreateObject("AdoDb.Connection")
					conn.Open connstr
				
					sql="delete from [user] where id="&request("id")
					set rs=server.createobject("adodb.recordset")
				        rs.open sql,conn,3,3
				  
				
				  response.redirect Request.ServerVariables("HTTP_REFERER")
				%>