<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> 服务中心_<%=contact("gname")%> " /> " /> <% if request("a")="l" then set rs=server.CreateObject("adodb.recordset") sql="select * from liuyan" rs.open sql,conn,1,3 FullName=request("FullName") CompanyName=request("CompanyName") Tel=request("Tel") Address=request("Address") Mail=request("Mail") msg=request("msg") call kz(FullName,"Name") call kz(CompanyName,"CompanyName") if Mail<>"" then call em(Mail) end if call kz(Tel,"Tel") call kz(msg,"Content") rs.addnew rs("FullName")=FullName rs("CompanyName")=CompanyName rs("Tel")=Tel rs("Address")=Address rs("Mail")=Mail rs("msg")=msg rs.update call pop_no("留言发布成功,我们会尽快与您取得联系!!") end if %>
 
网站首页 关于我们 产品中心 行业方案 资料下载 服务中心 联系我们
 
常见问题
问题反馈
下载中心
 
 服务中心
标题:
公司名称:
留言人姓名:
性别:
电话/手机:
电子邮箱:
留言内容:
验证码: <%=key2%>

 
 
 
 主打产品  应用行业  新闻中心  服务支持  关于我们
<% Set rs = Server.CreateObject("ADODB.Recordset") sql="select * from product where jindian=1 order by date desc" rs.open sql,conn,1,1 if not rs.eof then c=1 do while not rs.eof %> <% c=c+1 rs.movenext loop end if%>
.html"><%=rs("productname")%>
<% menusql="select top 4 * from hangyenav where bid=15 order by pid asc" set menurs=server.CreateObject("adodb.recordset") menurs.open menusql,conn,1,3 x=1 do while not menurs.eof %> <% menurs.movenext x=x+1 loop menurs.close set menurs=nothing %>
.html" title="<%=menurs("nav")%>" class="a1"><%=menurs("nav")%>
<% Set rs = Server.CreateObject("ADODB.Recordset") sql="select * from newsnav where bid=15 order by pid asc" rs.open sql,conn,1,1 if not rs.eof then do while not rs.eof %> <% rs.movenext loop end if %>
.html" target="_blank" title="<%=rs("nav")%>" class="a1"><%=rs("nav")%>
常见问题
在线下载
留言反馈
<% menusql="select * from menu where nav=16 order by pid asc" set menurs=server.CreateObject("adodb.recordset") menurs.open menusql,conn,1,3 x=1 do while not menurs.eof %> <% menurs.movenext x=x+1 loop menurs.close set menurs=nothing %>
.html" title="<%=menurs("menuname")%>" class="a2"><%=menurs("menuname")%>
友情链接:<% set rsbc=server.CreateObject("adodb.recordset") rsbc.Open "select * from link where link='wenzi' order by ID",conn,1,1 do while not rsbc.eof %> " target="_blank"><%=rsbc("linkname")%>   <% rsbc.movenext loop rsbc.Close set rsbc=nothing %>
<%=contact("gcopyright")%>