📄 function.asp
字号:
<%
'user_grade 1 会员 2 VIP会员 3 批发商
public error,kucun
Public webwidth,lwidth,rwidth,pleftwidth,prightwidth,pcenterwidth,picpath,user_picpath,s_pic_xw,s_pic_xh,bx,loading,today,yeday,alday,yscount,thisurl,verifycode
Public strprice,strsprice,strcprice,strcprice1,strpfprice,strtitle,pp,ppp,showprice,showprice1,strau_sprice,strau_price,strauprice,straday,strau_sj,aday
Public cache,i,rs,sql,temp,sqlnum,copy,sitename,lanname,lanname1,lang,lanmoney,lanmoney1,lan,dw,num,num1,num2,num3
public adminip,userip,AcceptIP,pagenum,product_name,jifen,sort_list_t,sort_list,sort_list1,sort_list_f,youjian,pagecount
Public user_id,strgrade,gradename1,gradename2,gradename3
Public www56770com_sys_gg,gg_s1,gg_s1url,gg_s2,gg_s2url,gg_s3,gg_s3url,gg_s4,gg_s4url,gg_tj,gg_tjurl,ifggtj,ifggtop,ggtop_url,ggtop,gg1_w,gg1_h,ggtop_w,ggtop_h,ggtj_w,ggtj_h
Public www56770com_sys_56770system,id,name,mail,web,site_name,fax,code,info,Jmail_smtp,jmail_sendmail,Jmail_sendpass,Jmail_regon,Jmail_cashon,Jmail_cashoveron,lowprice,jmail_frommail,jmail_sendname,jifenbilv,needjifen,jifenyxq,sys_tel,kg_reg,css,iftree,sys_56770com1,sys_56770com2,sys_56770com3,sys_56770com4,sys_oicq,sys_oicqname,qq_zt,qq_ys,qq_wz,lockip,sys_56770com5,sys_56770com6,sys_56770com7,sys_56770com8,sys_56770com9,sys_56770com10,sys_56770com11,sys_56770com12,sys_56770com13,sys_56770com14,sys_56770com15,sys_56770com16,sys_56770com17,sys_56770com18,sys_56770com19,sys_56770com20,sys_56770com21,sys_56770com22,sys_56770com23,info_lan1,sitename_lan1,name_lan1,jifenbilv_vip,sys_56770com24,sys_56770com25,sys_56770com26,sys_56770com27,sys_56770com28,sys_56770com29,sys_56770com30,sys_56770com31,jmail_type,guest_lowprice,vip_lowprice,pf_lowprice,jifenbilv_pf,str_sys_oicq,sys_oicq_x,sys_oicq_y,oicq_skin,oicq_zt
public moneyhl,lan_zf_fs,lan_fs,lan_bank,lan_brand,lan_sort_name,lan_csort_name,lan_cxsort_name,lan_cysort_name,lan_subject,lan_message,lan_newstype,lan_user_sort,lan_product_name,lan_info,lan_siminfo,lan_pro2,lan_cinfo,lan_pro3,lan_bzhuang,lan_pro4,lan_pro5,lan_company,lan_pro1,lan_pro8,lan_pro6,lan_pro6_name,lan_pro7,lan_pro7_name,lan_ifbrand,lan_p_tags,lan_sitename,lan_name,lan_bigclassname,lan_smallclassname,lan_title,lan_user,lan_content,lan_gjc,lan_fuwu,lan_fw
picpath="pic/" '首页商品图片目录
bx=" <font color=red>*</font>"
loading="<script language='javascript' src='include/js/loading.js'></script>"
Set Cache = New Cls_Cache
cache.name="www56770com_sys_gg"
Cache.Reloadtime = 5000 '5000分钟更新
If Cache.ObjIsEmpty() Then
set rs=server.CreateObject("adodb.recordset")
rs.open "select gg_s1,gg_s1url,gg_s2,gg_s2url,gg_s3,gg_s3url,gg_s4,gg_s4url,gg_tj,gg_tjurl,ifggtj,ifggtop,ggtop_url,ggtop,gg1_w,gg1_h,ggtop_w,ggtop_h,ggtj_w,ggtj_h from [56770_gg]", conn, 1, 1
dim gg_Temp
gg_Temp = Rs.GetString(,1, "<><><>","","")
Rs.Close
Set rs=nothing
Cache.Value = gg_Temp
End if
www56770com_sys_gg = Split(cache.value,"<><><>")
gg_s1 = www56770com_sys_gg(0)
gg_s1url = www56770com_sys_gg(1)
gg_s2 = www56770com_sys_gg(2)
gg_s2url = www56770com_sys_gg(3)
gg_s3 = www56770com_sys_gg(4)
gg_s3url = www56770com_sys_gg(5)
gg_s4 = www56770com_sys_gg(6)
gg_s4url = www56770com_sys_gg(7)
gg_tj = www56770com_sys_gg(8)
gg_tjurl = www56770com_sys_gg(9)
ifggtj = www56770com_sys_gg(10)
Ifggtop = www56770com_sys_gg(11)
ggtop_url = www56770com_sys_gg(12)
ggtop = www56770com_sys_gg(13)
gg1_w = www56770com_sys_gg(14)
gg1_h = www56770com_sys_gg(15)
ggtop_w = www56770com_sys_gg(16)
ggtop_h = www56770com_sys_gg(17)
ggtj_w = www56770com_sys_gg(18)
ggtj_h = www56770com_sys_gg(19)
cache.name="www56770com_sys_56770system"
cache.reloadtime= 5000
If cache.objisempty() Then
set rs = server.CreateObject("adodb.recordset")
rs.Open "select id, name,mail,web,sitename,fax,code,info,Jmail_smtp,Jmail_sendmail,Jmail_sendpass,Jmail_regon,Jmail_cashon,Jmail_cashoveron,lowprice,jmail_frommail,jmail_sendname,jifenbilv,needjifen,jifenyxq,sys_tel,kg_reg,css,iftree,sys_56770com1,sys_56770com2,sys_56770com3,sys_56770com4,sys_oicq,sys_oicqname,qq_zt,qq_ys,qq_wz,lockip,sys_56770com5,sys_56770com6,sys_56770com7,sys_56770com8,sys_56770com9,sys_56770com10,sys_56770com11,sys_56770com12,sys_56770com13,sys_56770com14,sys_56770com15,sys_56770com16,sys_56770com17,sys_56770com18,sys_56770com19,sys_56770com20,sys_56770com21,sys_56770com22,sys_56770com23,info_lan1,sitename_lan1,name_lan1,jifenbilv_vip,sys_56770com24,sys_56770com25,sys_56770com26,sys_56770com27,sys_56770com28,sys_56770com29,sys_56770com30,sys_56770com31,jmail_type,guest_lowprice,vip_lowprice,pf_lowprice,jifenbilv_pf,fapiao_kg,fapiao_bl from [56770_system]",conn, 1, 1
SqlNum=SqlNum+1
Dim sys_temp
sys_temp = rs.getstring(,1,"<><>","","")
rs.close
Set rs=Nothing
cache.value = sys_temp
End if
www56770com_sys_56770system = Split(cache.value,"<><>")
id = www56770com_sys_56770system(0)
name = www56770com_sys_56770system(1)
mail = www56770com_sys_56770system(2)
web = www56770com_sys_56770system(3)
site_name = www56770com_sys_56770system(4)
fax = www56770com_sys_56770system(5)
code = www56770com_sys_56770system(6)
info = www56770com_sys_56770system(7)
jmail_smtp = www56770com_sys_56770system(8)
jmail_sendmail = www56770com_sys_56770system(9)
jmail_sendpass = www56770com_sys_56770system(10)
jmail_regon = www56770com_sys_56770system(11)
jmail_cashon = www56770com_sys_56770system(12)
jmail_cashoveron = www56770com_sys_56770system(13)
lowprice = www56770com_sys_56770system(14)
jmail_frommail = www56770com_sys_56770system(15)
jmail_sendname = www56770com_sys_56770system(16)
jifenbilv = www56770com_sys_56770system(17)
needjifen = www56770com_sys_56770system(18)
jifenyxq = www56770com_sys_56770system(19)
sys_tel = www56770com_sys_56770system(20)
kg_reg = www56770com_sys_56770system(21)
css = www56770com_sys_56770system(22)
iftree = www56770com_sys_56770system(23)
sys_56770com1 = www56770com_sys_56770system(24)
sys_56770com2 = www56770com_sys_56770system(25)
sys_56770com3 = www56770com_sys_56770system(26)
sys_56770com4 = www56770com_sys_56770system(27)
sys_tencent_qq = www56770com_sys_56770system(28)
sys_oicqname = www56770com_sys_56770system(29)
qq_zt = www56770com_sys_56770system(30)
qq_ys = www56770com_sys_56770system(31)
qq_wz = www56770com_sys_56770system(32)
lockip = www56770com_sys_56770system(33)
sys_56770com5 = www56770com_sys_56770system(34)
sys_56770com6 = www56770com_sys_56770system(35)
sys_56770com7 = www56770com_sys_56770system(36)
sys_56770com8 = www56770com_sys_56770system(37)
sys_56770com9 = www56770com_sys_56770system(38)
sys_56770com10 = www56770com_sys_56770system(39)
sys_56770com11 = www56770com_sys_56770system(40)
sys_56770com12 = www56770com_sys_56770system(41)
sys_56770com13 = www56770com_sys_56770system(42)
sys_56770com14 = www56770com_sys_56770system(43)
sys_56770com15 = www56770com_sys_56770system(44)
sys_56770com16 = www56770com_sys_56770system(45)
sys_56770com17 = www56770com_sys_56770system(46)
sys_56770com18 = www56770com_sys_56770system(47)
sys_56770com19 = www56770com_sys_56770system(48)
sys_56770com20 = www56770com_sys_56770system(49)
sys_56770com21 = www56770com_sys_56770system(50)
sys_56770com22 = www56770com_sys_56770system(51)
sys_56770com23 = www56770com_sys_56770system(52)
info_lan1 = www56770com_sys_56770system(53)
sitename_lan1 = www56770com_sys_56770system(54)
name_lan1 = www56770com_sys_56770system(55)
jifenbilv_vip = www56770com_sys_56770system(56)
sys_56770com24 = www56770com_sys_56770system(57)
sys_56770com25 = www56770com_sys_56770system(58)
sys_56770com26 = www56770com_sys_56770system(59)
sys_56770com27 = www56770com_sys_56770system(60)
sys_56770com28 = www56770com_sys_56770system(61)
sys_56770com29 = www56770com_sys_56770system(62)
sys_56770com30 = www56770com_sys_56770system(63)
sys_56770com31 = www56770com_sys_56770system(64)
jmail_type = www56770com_sys_56770system(65)
guest_lowprice = www56770com_sys_56770system(66)
vip_lowprice = www56770com_sys_56770system(67)
pf_lowprice = www56770com_sys_56770system(68)
jifenbilv_pf = www56770com_sys_56770system(69)
fapiao_kg = www56770com_sys_56770system(70)
fapiao_bl = www56770com_sys_56770system(71)
str_sys_oicq = Split(sys_tencent_qq,"$$")
sys_oicq_x = str_sys_oicq(0)
sys_oicq_y = str_sys_oicq(1)
oicq_skin = str_sys_oicq(2)
oicq_zt = str_sys_oicq(3)
sys_oicq = str_sys_oicq(4)
Public www56770com_sys_56770count,count_ys
cache.name="www56770com_sys_56770count"
cache.reloadtime= 5000
If cache.objisempty() Then
set rs=server.CreateObject("adodb.recordset")
sql="select ys from [56770_count]"
rs.open sql, conn, 1, 1
Dim count_temp
count_temp = rs.getstring(,1,"<><><><>","","")
rs.close:Set rs=Nothing
cache.value = count_temp
End if
www56770com_sys_56770count = Split(cache.value,"<><><><>")
count_ys = www56770com_sys_56770count(0)
Public www56770com_sys_56770pay,payifqpay,qpayusername,qpaykeys,qpayleixing,qpayfangshi,qpayurlback,alipay_of,alipay_ef,alipay_email,alipay_code,alipay_url,alipay_partnerId,ifalipay,PAYPAL_NAME,IFPAYPAL
cache.name="www56770com_sys_56770pay"
cache.reloadtime= 1
If cache.objisempty() Then
set rs=server.CreateObject("adodb.recordset")
sql="select payifqpay,qpayusername,qpaykeys,qpayleixing,qpayfangshi,qpayurlback,alipay_of,alipay_ef,alipay_email,alipay_code,alipay_url,alipay_partnerId,ifalipay,PAYPAL_NAME,IFPAYPAL from [56770_pay] where id=1"
rs.open sql, conn, 1, 1
Dim pay_temp
pay_temp = rs.getstring(,1,"<>@<>","","")
rs.close:Set rs=Nothing
cache.value = pay_temp
End if
www56770com_sys_56770pay = Split(cache.value,"<>@<>")
payifqpay= Trim(www56770com_sys_56770pay(0))
qpayusername= Trim(www56770com_sys_56770pay(1))
qpaykeys= Trim(www56770com_sys_56770pay(2))
qpayleixing= Trim(www56770com_sys_56770pay(3))
qpayfangshi= Trim(www56770com_sys_56770pay(4))
qpayurlback= Trim(www56770com_sys_56770pay(5))
alipay_of = Trim(www56770com_sys_56770pay(6))
alipay_ef = Trim(www56770com_sys_56770pay(7))
alipay_email = Trim(www56770com_sys_56770pay(8))
alipay_code = Trim(www56770com_sys_56770pay(9))
alipay_url = Trim(www56770com_sys_56770pay(10))
alipay_partnerId = Trim(www56770com_sys_56770pay(11))
ifalipay = Trim(www56770com_sys_56770pay(12))
paypal_name = Trim(www56770com_sys_56770pay(13))
ifpaypal = Trim(www56770com_sys_56770pay(14))
Public www56770com_sys_56770skins,skin_main,strskin_main,skin_head,skin_footer,skin_temp,skin_name,skin_topmenu,skin_topgg,skin_default,skin_mulu,strskin_mulu,skin_ml,skin_mulu_dh,skin_mulu_list,skin_brand,strskin_brand,skin_brand_tjlist,skin_brand_dh,skin_brand_list,skin_showsort,skin_newpro,skin_tjpro,skin_tjia,skin_proinfo,skin_reg,strskin_reg,skin_reginput,skin_regok_top,skin_regok_footer,skin_login,skin_basket,skin_basket_cash,skin_basket_cashsave_1,skin_basket_cashsave_2,strskin_basket_cashsave,skin_basket_cashsave,skin_myuser,strskin_myuser,skin_myuser_left,skin_myuser_ctop,skin_myuser_cfooter,skin_myuser_right,skin_jfpro,strskin_jfpro,skin_jfpro_list,skin_topmain,skin_zhuanti,strskin_zhuanti,skin_zhuanti_menu,skin_zhuanti_top,skin_zhuanti_footer,skin_zhuanti_class,skin_zhuanti_list,skin_zhuanti_right,skin_help,strskin_help,skin_help_menu,help_word1,help_word2,skin_help_rtop,skin_help_rfooter,skin_book,strskin_book,skin_book_left,skin_book_rtop,skin_book_rfooter,skin_search,skin_search_gj,skin_button,strskin_button,unlogin,button_1,button_2,button_3,button_4,button_5,button_6,button_7,button_8,button_9,button_10,button_11,button_12,button_13,button_14,button_15,button_16,button_17,button_18,button_19,button_20,button_21,button_22,button_23,button_24,button_25,button_26,button_27,button_28,button_29,button_30,button_31,skin_pic_size,pic_size,pic_xw,pic_xh,pic_dw,pic_dh,pic_zt,skin_id,skin_topnum,str_num,top1,top2,top3,top4,top5,top6,top7,top8,top9,top10,top11,top12,top13,top14,top15,top16,top17,top18,top19,top20,skin_ys1,skin_ys2,skin_ys3
cache.name="www56770com_sys_56770skins"
cache.reloadtime= 5000
If cache.objisempty() Then
set rs=server.CreateObject("adodb.recordset")
sql="select s_name,s_ml,s_56770_1,s_56770_2,s_56770_3,s_56770_4,s_56770_5,s_56770_6,s_56770_7,s_56770_8,s_56770_9,s_56770_10,s_56770_11,s_56770_12,s_56770_13,s_56770_14,s_56770_15,s_56770_16,s_56770_17,s_56770_18,s_56770_19,s_56770_20,s_width,s_56770_21,s_56770_22,s_picsize,s_id,s_topnum from [56770_skins] where s_check=1"
rs.open sql, conn, 1, 1
skin_temp = rs.getstring(,1,"<><><><><>","","")
rs.close:Set rs=Nothing
cache.value = skin_temp
End if
www56770com_sys_56770skins = Split(cache.value,"<><><><><>")
skin_name = Trim(www56770com_sys_56770skins(0))
skin_ml = Trim(www56770com_sys_56770skins(1))
skin_main = www56770com_sys_56770skins(2)
skin_default = www56770com_sys_56770skins(3)
skin_mulu = www56770com_sys_56770skins(4)
skin_brand = www56770com_sys_56770skins(5)
skin_showsort = www56770com_sys_56770skins(6)
skin_newpro = www56770com_sys_56770skins(7)
skin_tjpro = www56770com_sys_56770skins(8)
skin_tjia = www56770com_sys_56770skins(9)
skin_proinfo = www56770com_sys_56770skins(10)
skin_reg = www56770com_sys_56770skins(11)
skin_login = www56770com_sys_56770skins(12)
skin_basket = www56770com_sys_56770skins(13)
skin_basket_cash = www56770com_sys_56770skins(14)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -