重庆源丰来酒业贸易有限公司

<% nsort_id=Request("nsort_id") chkid(nsort_id) set rs=conn.execute("select nsort_name,sort_id from venshop_nsort where nsort_id="&nsort_id&"") if not rs.eof then nsort_name=rs("nsort_name") sort_id=rs("sort_id") end if rs.close set rs=nothing set rs=conn.execute("select sort_name,sort_skin from venshop_sort where sort_id="&sort_id&"") if not rs.eof then sort_name=rs("sort_name") if rs("sort_skin")<>"" then venshop_skin=rs("sort_skin") end if rs.close set rs=nothing order=request("order") page=request("page") orderx=getorder(order) page=getpage(page) %> 重庆源丰来酒业贸易有限公司_

首页

产品分类

PRODUCT

新闻动态

NEWS

<%set rs=server.createobject("adodb.recordset") rs.open "select top 10 id,a_name,a_date from venshop_article where a_sort=5 order by id DESC",conn,1,1 i=0 do while not rs.eof i=i+1%>

· " target="_blank"><%=left(rs("a_name"),16)%> <%if datediff("d",rs("a_date"),now())<=10 then%> <%end if%> <%rs.movenext loop rs.close set rs=nothing%>

联系我们

CONTACT

公司名称：重庆源丰来酒业贸易有限公司
地址:重庆市南岸区南坪万达广场二组团二栋1401室
联系人：张生
手机：13883501358，13649886835

<%user_name=Request.Cookies("venshop")("user_name") set rs=server.createobject("adodb.recordset") sql="select * from venshop_gb order by id desc" rs.open sql,conn,1,1 if not rs.eof then page=request("page") if page="" then page=1 if not(isnumeric(page)) then page=1 if page<1 then page=1 page=int(page) rs.pagesize=20 totalrec=rs.recordcount totalpage=rs.pagecount if page>totalpage then page=totalpage rs.absolutepage=page rs.cachesize=rs.pagesize i=0 do while not rs.eof and (i <%rs.movenext loop end if rs.close set rs=nothing%>



<%=rs("name")%> .gif">	" title="发邮件到：<%=rs("email")%>"> ">
	<%=rs("content")%>(<%=rs("riqi")%>) <%if rs("re")<>"" then%> Re:<%=rs("re")%> <%else%> <%end if%>

第<%=page%>页/共<%=totalpage%>页 <%for i=1 to totalpage%> <%if i=page then%> <%=i%> <%else%> <%=i%> <%end if%> <%next%>

<% if request("action")="post" then venip=Request.ServerVariables("HTTP_X_FORWARDED_FOR") If venip="" Then venip=Request.ServerVariables("REMOTE_ADDR") Set rs=Server.CreateObject("ADODB.Recordset") sql="select * from venshop_gb" rs.open sql,conn,1,3 rs.Addnew rs("name")=DelStr(Request("name")) rs("email")=DelStr(Request("email")) rs("oicq")=DelStr(Request("oicq")) rs("content")=DelStr(Request("content")) rs("photo")=DelStr(Request("photo")) rs("ip")=venip rs("riqi")=date() rs.Update rs.Close Set rs=Nothing Response.Redirect"khly.asp" Response.end else%>

<%end if%>

昵称：	*
性别：
邮箱：	*
电话：	*
留言：	*

	销前咨询
	销前咨询
	技术咨询
	售后服务
	售后服务