产品类别 |
|
友情链接 |
|
 |
尊敬的客户如果您对我们的产品感兴趣,需要更详细资料:
1、适用范围 2、详细参数 3、设备的正面图、侧面图、内部图、适用的各种配件 4、设备的操作和使用说明书 5、设备的实际报价（直销价；代理价）6、售后服务7、质量保证等。请您在下面的留言栏留下您的联系方式(电话、E-mail)，我们会在见到留言后马上给您回复： |
<% if request("neirong")="" and request("title")="" then %>
| 我需要产品更详细信息： 带 * 的需填写 |
| |
| 发邮件给： |
王明福 |
|
|
| |
<% end if %>
<% if session("tijiao")= "" then
session("tijiao")=0
else
session("tijiao")=session("tijiao")+1
end if
if request("neirong")<>"" and len(trim(request("title")))>2 then
ipNum=Ip2Str(request("remote_addr"))
Set rstObj=Server.CreateObject("ADODB.Recordset")
sql="select * from dv_address where "&ipNum&" Between ip1 And ip2"
rstObj.open sql,cnnDB,1,1
if not rstObj.eof then
ipaddr=rstObj("country")&rstObj("City")
end if
Set rstObj=Server.CreateObject("ADODB.Recordset")
rstObj.Open "c_card",cnnDB,2,2
rstObj.addnew
rstObj("zs_id")=c_id
rstObj("yh_username")=session("username")
rstObj("yh_company")=replace(request("yh_company"),">","〉")
rstObj("yh_linkman")=replace(request("linkman"),">","〉")
rstObj("yh_address")=replace(request("address"),">","〉")
rstObj("yh_tel")=replace(request("tel"),">","〉")
rstObj("yh_email")=replace(request("email"),">","〉")
rstObj("yh_title")=replace(request("title"),">","〉")
rstObj("yh_liuyan")=replace(request("neirong"),">","〉")&"
需要进一步了解的信息：
"&request("liaojie")
rstObj("yh_ip")=request("remote_addr")
rstObj("yh_time")=now
rstObj("yh_ipaddress")=ipaddr
rstObj.update
%>
<% end if
%>
|
关闭窗口 
返回页顶 
