<%
'-----------------------------------
'eaupfm(eafnm,eafmz,eafsn,eafstr,eafup)
'=eaupfm(8,"nr",ai_sn,ai_nr/"picname,picurl@@content",updir)
'-----------------------------------
function eaupfm(eafnm,eafmz,eafsn,eafstr,eafup)
eaupfm="<input type=""hidden"" name="""&eafmz&""" id="""&eafmz&"__"" value=""@@""><div class=""eups"" id=""eupadiv"">"
eaupfm=eaupfm&esupr(1,eafstr)
eupdmj=0
if aiint(eupdmud)>2 then
for eupdmi=0 to aiint(eupdmud)-1 step 2
eupdmj=eupdmj+1
eaupfm=eaupfm&"<input type=""text"" name="""&eafmz&""" id="""&eafmz&"_"&eupdmj&""" value="""&trim(eupdmrr(eupdmi))&"""><input type=""text"" name="""&eafmz&""" id="""&eafmz&eupdmj&""" value="""&trim(eupdmrr(eupdmi+1))&""">"&esup("0|1|"&eafsn&"_"&eupdmj&"|"&eafup&"|0|EESaiForm|"&eafmz&eupdmj&"|"&ew_py&"|"&ew_ps&"|0|0.ees")&"<br>"
next
end if
eaupfm=eaupfm&"</div>"&vbcrlf
if eafnm>eupdmj then eupdmj=eafnm
eaupfm=eaupfm&"<script language=""javascript"">"&vbcrlf&""_
&"var eupi="&eupdmj&";"&vbcrlf&""_
&"function eupadd(eafmz,eafsn){"&vbcrlf&""_
&"eupi=eupi+1;"&vbcrlf&""_
&"var eupv=document.getElementById(""eupadiv"");"&vbcrlf&""_
&"var eupbt=document.createElement(""input"");"&vbcrlf&""_
&"eupbt.type=""button"";"&vbcrlf&""_
&"eupbt.id=eupbt.name=""btn""+eupi;"&vbcrlf&""_
&"eupbt.className=""f-se"";"&vbcrlf&""_
&"eupbt.value=""DEL"";"&vbcrlf&""_
&"eupbt.onclick=function() { "&vbcrlf&""_
&"var eupbx=document.getElementById(eupbt.id);"&vbcrlf&""_
&"eupv.removeChild(eupbx.nextSibling);"&vbcrlf&""_
&"eupv.removeChild(eupbx.previousSibling);"&vbcrlf&""_
&"eupv.removeChild(eupbx.previousSibling);"&vbcrlf&""_
&"eupv.removeChild(eupbx.previousSibling);"&vbcrlf&""_
&"eupv.removeChild(eupbx);"&vbcrlf&""_
&"} "&vbcrlf&""_
&"eupv.appendChild(eupbt);"&vbcrlf&""_
&"var eupmz=document.createElement(""input"");"&vbcrlf&""_
&"eupmz.className=""f-a1"";"&vbcrlf&""_
&"eupmz.type=""text"";"&vbcrlf&""_
&"eupmz.value=eafsn+""_""+eupi;"&vbcrlf&""_
&"eupmz.id=eafmz+""_""+eupi;"&vbcrlf&""_
&"eupmz.name=eafmz;"&vbcrlf&""_
&"eupmz.title=""请输入图片名称"";"&vbcrlf&""_
&"eupv.appendChild(eupmz);"&vbcrlf&""_
&"var eupfi=document.createElement(""input"");"&vbcrlf&""_
&"eupfi.className=""f-a1"";"&vbcrlf&""_
&"eupfi.type=""text"";"&vbcrlf&""_
&"eupfi.id=eafmz+eupi;"&vbcrlf&""_
&"eupfi.name=eafmz;"&vbcrlf&""_
&"eupfi.title=""请点击右侧浏览图片，选中图片后，点击上传，上传成功后会在此文本框中自动生成文件地址，或者您也可以直接输入图片地址"";"&vbcrlf&""_
&"eupv.appendChild(eupfi);"&vbcrlf&""_
&"var eupfr=document.createElement(""iframe"");"&vbcrlf&""_
&"eupfr.src="""&eshref(s_drplug&"X/EESaiUpLoad/",3)&"?0|1|""+eafsn+""_""+eupi+""|"&eafup&"|0|EESaiForm|""+eafmz+eupi+""|"&ew_py&"|"&ew_ps&"|0|0.ees"";"&vbcrlf&""_
&"eupfr.className=""f-up"";"&vbcrlf&""_
&"eupfr.frameborder=""0"";"&vbcrlf&""_
&"eupfr.border=""0"";"&vbcrlf&""_
&"eupfr.scrolling=""no"";"&vbcrlf&""_
&"eupv.appendChild(eupfr);"&vbcrlf&""_
&"eupv.appendChild(document.createElement(""BR""));"&vbcrlf&""_
&"}"&vbcrlf&""_
&"</script>"&vbcrlf&""_
&"<input class=""f-sb"" type=""button"" name=""Submit"" value=""添加更多图片"" onClick=""eupadd('"&eafmz&"','"&eafsn&"')"">"
end function
'-----------------------------------
'ai ppt picture show
'=eaupsh(eafid,eafstr)
'-----------------------------------
function eaupsh(eafid,eafstr,eafup,eafbt,eafel)
if eafup<>"" then
eaupsh=esupr(1,eafstr)
if aiint(eupdmud)>2 then
dim eaudp,eaudl
eaudp="<a title="""&eafbt&""" id="""&eafid&"lj"" target=""_blank"" href="""&esups(eafup,1)&"""><img id="""&eafid&"id"" src="""&eshref(eafup,1)&"""></a>"
eaudl="<img onmousemove=""F"&eafid&"(this.src,this.alt);"" alt="""&eafbt&""" title="""&eafbt&""" src="""&esups(eafup,1)&""">"
for eupdmi=0 to aiint(eupdmud)-1 step 2
if eupdmrr(eupdmi+1)<>"" then
eaudl=eaudl&"<img onmousemove=""F"&eafid&"(this.src,this.alt);"""
if eupdmrr(eupdmi)<>"" then eaudl=eaudl&" alt="""&eupdmrr(eupdmi)&""" title="""&eupdmrr(eupdmi)&""""
eaudl=eaudl&" src="""&esups(eupdmrr(eupdmi+1),1)&""">"
end if
next
eaupsh=eaupsh&"<script>function F"&eafid&"(pfstr,pftit){document.getElementById("""&eafid&"id"").src=pfstr;document.getElementById("""&eafid&"lj"").title=pftit;document.getElementById("""&eafid&"lj"").href=pfstr;}</script>"
if left(eafid,2)="X_" then
eaupsh=eaupsh&"<table class=""p-ssx"" border=""0"" cellspacing=""0"" cellpadding=""0""><tr><td class=""p-ssxmt""><div class=""p-ssxm"">"&eaudl&"</div></td><td class=""p-ssxs"" valign=""middle"">"&eaudp&"</td></tr></table>"
elseif left(eafid,2)="Y_" then
eaupsh=eaupsh&"<table class=""p-ssx"" border=""0"" cellspacing=""0"" cellpadding=""0""><tr><td class=""p-ssxs"" valign=""middle"">"&eaudp&"</td><td class=""p-ssxmt""><div class=""p-ssxm"">"&eaudl&"</div></td></tr></table>"
else
eaupsh=eaupsh&"<table class=""p-ssd"" border=""0"" cellspacing=""0"" cellpadding=""0""><tr><td class=""p-ssds"" valign=""middle"">"&eaudp&"</td></tr><tr><td class=""p-ssdmt""><div class=""p-ssdm"">"&eaudl&"</div></td></tr></table>"
end if
else
eaupsh=easpic(eafup,eafbt,eafbt,eafup,10)
end if
else
eaupsh=easpic(eafup,eafbt,eafbt,eafup,10)
end if
end function
'-----------------------------------
'add/edit form
'=eaform()
'-----------------------------------
Function eaform(eafqh,eafty,eafsn)
dim eadty,eadqx,eadqxyz,eadupd,eadoks,eadxx
if aibj(left(eafty,len(s_umxg)),s_umxg) then
eadty=1
else
eadty=0
end if

eadqx=0
if left(eafqh,1)="3" then
eadqxyz=aiint(e_uzj)
if eadqxyz>3 then
eadqx=2
elseif eadqxyz>2 then
eadqx=1
end if
else
eadqxyz=aiint(e_gdj)
if eadqxyz>2 then
eadqx=2
elseif eadqxyz>1 then
eadqx=1
end if
end if

if eadty=0 then
ai_eq="":ai_bt="":ai_jj="":ai_ss="":ai_nr="":ai_t2="":ai_mm="":ai_up="":ai_ot="":ai_yy=""
ai_pl=ew_pl
ai_ew=ep_ew
ai_el=aiint(ep_el)
ai_ep=ep_sn
ai_ef=ef_sn
ai_sn="ES"&aisn(1)
ai_us=e_uer
if uk_mc<>"" then
ai_um=uk_mc
elseif e_ubt<>"" then
ai_um=e_ubt
else
ai_um=e_uer
end if
ai_ee=e_gmc
ai_ss=""
ai_yy=""
if eadqx>0 then
ai_xy=1
elseif e_uxy>0 or e_gdj>0 then
ai_xy=1
else
ai_xy=i_xkxy
end if
ai_px=0
ai_hi=0
ai_xi=0
ai_bd=0
ai_bc=0
ai_jg=0
ai_jy=0
ai_oz=0
ai_oy=0
ai_tm=now()
ai_t1=date()
'ai_t2=date()
ai_xt=espxx("添加"&i_gg&e_gmc)
else
ai_t1=date()
ai_xt=ai_xt&espxx("修改"&i_gg&e_gmc)
end if
if ew_gn=0 or ew_dj=0 or ew_pj=0 then
ealhx=0
else
ealhx=1
end if
eadxx="<li class=""l-1"">属性：高级属性选项开关　<input type=""button""  onclick=""document.getElementById('easmid').style.display='block';"" class=""f-se"" value=""打开""><input type=""button""  onclick=""document.getElementById('easmid').style.display='none';"" class=""f-se"" value=""关闭""></li><ul id=""easmid"" style=""display:none;"">"
eadupd=esupcc(ai_ep,ai_sn)
ai_el=aiint(ai_el)
if eadty=1 then
eaform=eaformx(eafqh,eadty,eadqx,ai_el,eadupd)
else
if aibj(eafqh,"0") then Call epread(eafsn)
eaform=eaformx(eafqh,eadty,eadqx,ep_el,eadupd)
end if

if ainull(eaform) then
eaform="<div class=""l-f""><form id=""EESaiForm"" name=""EESaiForm"" action="""" method=""post"" AUTOCOMPLETE=""off""><ul>"
'BT------0
if eadqx>1 then
eaform=eaform&"<li class=""l-1"">标题："&aiinput("","bt","",0,200,"*"&ep_dm&"标题","f-a3|f-b3|f-c3",ai_bt)&"导言："&aiinput("","jj","",0,200,"对"&ep_dm&"标题加以描述的导言","f-c1|f-b1|f-c1",ai_jj)&"</li>"
eaform=eaform&"<li>状态："&aiselect("xy","*","","f-s1",ai_xy,0,i_bxy)&"排序："&aiinput("","px","",6,50,"排序值，可供依靠排序值的调用使用","f-c1|f-b1|f-c1",ai_px)&"点击："&aiinput("","hi","",6,50,"点击浏览次数，需要网站开启点击统计功能","f-c1|f-b1|f-c1",ai_hi)&"我顶："&aiinput("","xi","",6,50,"被我顶推荐的次数，需要网站开启我顶统计功能","f-c1|f-b1|f-c1",ai_xi)&"</li>"
if not aibj(ep_ef,"5") then
eadoks=ukselect(ep_sn,"eq",uk_fl,ai_eq)
eaform=eaform&efselect(5,ep_ef,"ef",ai_ep,ai_ef)
if left(eafqh,1)="3" and not ainull(eadoks) then
eaform=eaform&"<div class=""l-rt"">"&eadoks&"</div>"
else
eaform=eaform&"<li>标签："&aiinput("","eq","",0,200,"又名关键词，可以优化网站搜索引擎抓取，多个标签请使用英文逗号,隔开。","f-c4|f-b4|f-c4",ai_eq)&"</li>"
end if
else
eaform=eaform&aiinput("hidden","ef","",0,0,"","",ai_ef)&aiinput("hidden","eq","",0,0,"","",ai_eq)
end if
else
eaform=eaform&"<li class=""l-1"">标题："&aiinput("","bt","",0,200,"*"&ep_dm&"标题","f-a4|f-b4|f-c4",ai_bt)&"</li>"
eaform=eaform&aiinput("hidden","jj","",0,0,"","",ai_jj)&aiinput("hidden","xy","",0,0,"","",ai_xy)&aiinput("hidden","px","",0,0,"","",ai_px)&aiinput("hidden","hi","",0,0,"","",ai_hi)&aiinput("hidden","xi","",0,0,"","",ai_xi)&"</li>"
if not aibj(ep_ef,"5") then
eadoks=ukselect(ep_sn,"eq",uk_fl,ai_eq)
if left(eafqh,1)="3" and not ainull(eadoks) then
eaform=eaform&"<li>"&ukselect(ep_sn,"eq",uk_fl,ai_eq)&"</li>"
else
eaform=eaform&aiinput("hidden","eq","",0,0,"","",ai_eq)
end if
eaform=eaform&efselect(5,ep_ef,"ef",ai_ep,ai_ef)
else
eaform=eaform&aiinput("hidden","ef","",0,0,"","",ai_ef)&aiinput("hidden","eq","",0,0,"","",ai_eq)
end if
end if
eaform=eaform&icot(0,ep_el,ep_ot,ai_ot)
eaform=eaform&"<li class=""l-1"">内容："&esedit(esnr(ai_nr),"nr",8)&"</li>"
'BT------1
'UP------0
if ai_el=14 then
eaform=eaform&aiinput("hidden","up","",0,0,"","",ai_up)
else
eaform=eaform&"<li>封面："&aiinput("","up","",0,200,"封面图片，列表显示的图片","f-c2|f-b2|f-c2",ai_up)&esup("0|1|"&ai_sn&"|"&eadupd&"|0|EESaiForm|up|"&ew_py&"|"&ew_ps&"|0|0.ees")&"</li>"
if ai_el=2 or ai_el=4 or ai_el=7 or ai_el=10 or ai_el=11 or ai_el=12 then eaform=eaform&"<li class=""l-1""><div class=""l-up"">"&eaupfm(0,"nr",ai_sn,ai_nr,eadupd)&"</div></li>"
end if
'UP------1
'EESAI------0
if not (ai_el=1 or ai_el=3 or ai_el=14 or ai_el=15 or ai_el=4 or ai_el=7) then
'___________________________________________________________________________________0
'2	产品系统
if ai_el=2 then
eaform=eaform&"<li>原价："&aiinput("","jy","",6,50,"*原价","f-c1|f-b1|f-c1",ai_jy)&"售价："&aiinput("","jg","",6,50,"*售价","f-c1|f-b1|f-c1",ai_jg)
if eadqx>1 then
eaform=eaform&"更新："&aiinput("","t1","",99,100,"最后更新时间，今日：（"&now()&"）","f-c1|f-b1|f-c1",ai_t1)&"过期："&aiinput("","t2","",99,100,"优惠活动过期时间，今日：（"&now()&"）","f-c1|f-b1|f-c1",ai_t2)
else
eaform=eaform&"过期："&aiinput("","t2","",99,100,"优惠活动过期时间，今日：（"&now()&"）","f-c2|f-b2|f-c2",ai_t2)&aiinput("hidden","t1","",0,0,"","",ai_t1)
end if
eaform=eaform&"</li>"
if ealhx=0 then eaform=eaform&eadxx
if eadqx>1 then
eaform=eaform&"<li>已售："&aiinput("","oy","",6,50,"已售数量","f-c1|f-b1|f-c1",ai_oy)&"库存："&aiinput("","oz","",6,50,"库存数量","f-c1|f-b1|f-c1",ai_oz)&"榜分："&aiinput("","bd","",6,50,"打榜分数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bd)&"榜次："&aiinput("","bc","",6,50,"进入榜单次数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bc)&"</li>"
else
eaform=eaform&aiinput("hidden","bd","",0,0,"","",ai_bd)&aiinput("hidden","bc","",0,0,"","",ai_bc)&aiinput("hidden","oz","",0,0,"","",ai_oz)&aiinput("hidden","oy","",0,0,"","",ai_oy)
end if
'5	人才招聘
elseif ai_el=5 then
eaform=eaform&"<li class=""l-1"">月薪："&aiinput("","jg","",6,50,"月薪多少,直接输入数字,单位:元/月,0表示面议","f-c1|f-b1|f-c1",ai_jg)&"人数："&aiinput("","jy","",6,50,"职位招聘的人数,直接输入数字,0表示不限制.","f-c1|f-b1|f-c1",ai_jy)&""

if eadqx>1 then
eaform=eaform&"要求："&aiinput("","uf","",0,200,"请输入对应聘人员的要求.","f-c2|f-b2|f-c2",ai_uf)&"</li>"
eaform=eaform&"<li>更新："&aiinput("","t1","",99,100,"最后更新时间","f-c2|f-b2|f-c2",ai_t1)&"过期："&aiinput("","t2","",99,100,"招聘过期时间，今日：（"&now()&"）","f-c2|f-b2|f-c2",ai_t2)&"</li>"
else
eaform=eaform&"要求："&aiinput("","uf","",0,200,"请输入对应聘人员的要求.","f-c1|f-b1|f-c1",ai_uf)&"过期："&aiinput("","t2","",99,100,"招聘过期时间，今日：（"&now()&"）","f-c1|f-b1|f-c1",ai_t2)&aiinput("hidden","t1","",0,0,"","",ai_t1)&"</li>"
end if
if ealhx=0 then eaform=eaform&eadxx
if eadqx>1 then
eaform=eaform&"<li>已售："&aiinput("","oy","",6,50,"已售数量","f-c1|f-b1|f-c1",ai_oy)&"库存："&aiinput("","oz","",6,50,"库存数量","f-c1|f-b1|f-c1",ai_oz)&"榜分："&aiinput("","bd","",6,50,"*打榜分数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bd)&"榜次："&aiinput("","bc","",6,50,"*进入榜单次数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bc)&"</li>"
else
eaform=eaform&aiinput("hidden","oz","",0,0,"","",ai_oz)&aiinput("hidden","oy","",0,0,"","",ai_oy)&aiinput("hidden","bd","",0,0,"","",ai_bd)&aiinput("hidden","bc","",0,0,"","",ai_bc)
end if
'6	友情链接
elseif ai_el=6 then
eaform=eaform&"<li class=""l-1"">链接："&aiinput("","uf","",0,200,"请输入友情链接的地址","f-c4|f-b4|f-c4",ai_uf)&"</li>"
if ealhx=0 then eaform=eaform&eadxx
if eadqx>1 then
eaform=eaform&"<li>价格："&aiinput("","jg","",6,50,"价格","f-c1|f-b1|f-c1",ai_jg)&"原价："&aiinput("","jy","",6,50,"原价","f-c1|f-b1|f-c1",ai_jy)&"已售："&aiinput("","oy","",6,50,"已售数量","f-c1|f-b1|f-c1",ai_oy)&"库存："&aiinput("","oz","",6,50,"库存数量","f-c1|f-b1|f-c1",ai_oz)&"</li>"
eaform=eaform&"<li class=""l-1"">榜分："&aiinput("","bd","",6,50,"打榜分数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bd)&"榜次："&aiinput("","bc","",6,50,"进入榜单次数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bc)&"更新："&aiinput("","t1","",99,100,"最后更新时间","f-c1|f-b1|f-c1",ai_t1)&"过期："&aiinput("","t2","",99,100,"媒体失效时间，今日：（"&now()&"）","f-c1|f-b1|f-c1",ai_t2)&"</li>"
else
eaform=eaform&aiinput("hidden","jg","",0,0,"","",ai_jg)&aiinput("hidden","jy","",0,0,"","",ai_jy)&aiinput("hidden","oz","",0,0,"","",ai_oz)&aiinput("hidden","oy","",0,0,"","",ai_oy)&aiinput("hidden","bd","",0,0,"","",ai_bd)&aiinput("hidden","bc","",0,0,"","",ai_bc)&aiinput("hidden","t1","",0,0,"","",ai_t1)&aiinput("hidden","t2","",0,0,"","",ai_t2)
end if
'8	下载系统
elseif ai_el=8 then
eaform=eaform&"<li class=""l-1"">文件："&aiinput("","uf","",0,200,"可供下载的文件","f-c2|f-b2|f-c2",ai_uf)&esup("0|3|"&ai_sn&"_uf|"&eadupd&"|0|EESaiForm|uf|"&ew_py&"|"&ew_ps&"|0|0.ees")&"</li>"
eaform=eaform&"<li class=""l-1"">过期："&aiinput("","t2","",99,100,"文件下载失效时间，今日：（"&now()&"）","f-c4|f-b4|f-c4",ai_t2)&"</li>"
if ealhx=0 then eaform=eaform&eadxx
if eadqx>1 then
eaform=eaform&"<li>价格："&aiinput("","jg","",6,50,"价格","f-c1|f-b1|f-c1",ai_jg)&"原价："&aiinput("","jy","",6,50,"原价","f-c1|f-b1|f-c1",ai_jy)&"已售："&aiinput("","oy","",6,50,"已售数量","f-c1|f-b1|f-c1",ai_oy)&"库存："&aiinput("","oz","",6,50,"库存数量","f-c1|f-b1|f-c1",ai_oz)&"</li>"
eaform=eaform&"<li class=""l-1"">榜分："&aiinput("","bd","",6,50,"打榜分数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bd)&"榜次："&aiinput("","bc","",6,50,"进入榜单次数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bc)&"更新："&aiinput("","t1","",99,100,"最后更新时间","f-c2|f-b2|f-c2",ai_t1)&"</li>"
else
eaform=eaform&aiinput("hidden","jg","",0,0,"","",ai_jg)&aiinput("hidden","jy","",0,0,"","",ai_jy)&aiinput("hidden","oz","",0,0,"","",ai_oz)&aiinput("hidden","oy","",0,0,"","",ai_oy)&aiinput("hidden","bd","",0,0,"","",ai_bd)&aiinput("hidden","bc","",0,0,"","",ai_bc)&aiinput("hidden","t1","",0,0,"","",ai_t1)
end if
'9	媒体系统
elseif ai_el=9 then
eaform=eaform&"<li class=""l-1"">媒体："&aiinput("","uf","",0,200,"媒体文件","f-c2|f-b2|f-c2",ai_uf)&esup("0|2|"&ai_sn&"_mt|"&eadupd&"|0|EESaiForm|uf|"&ew_py&"|"&ew_ps&"|0|0.ees")&"</li>"
eaform=eaform&"<li>过期："&aiinput("","t2","",99,100,"媒体失效时间，今日：（"&now()&"）","f-c4|f-b4|f-c4",ai_t2)&"</li>"
if ealhx=0 then eaform=eaform&eadxx
if eadqx>1 then
eaform=eaform&"<li>价格："&aiinput("","jg","",6,50,"价格","f-c1|f-b1|f-c1",ai_jg)&"原价："&aiinput("","jy","",6,50,"原价","f-c1|f-b1|f-c1",ai_jy)&"已售："&aiinput("","oy","",6,50,"已售数量","f-c1|f-b1|f-c1",ai_oy)&"库存："&aiinput("","oz","",6,50,"库存数量","f-c1|f-b1|f-c1",ai_oz)&"</li>"
eaform=eaform&"<li class=""l-1"">榜分："&aiinput("","bd","",6,50,"打榜分数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bd)&"榜次："&aiinput("","bc","",6,50,"进入榜单次数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bc)&"更新："&aiinput("","t1","",99,100,"最后更新时间","f-c2|f-b2|f-c2",ai_t1)&"</li>"
else
eaform=eaform&aiinput("hidden","jg","",0,0,"","",ai_jg)&aiinput("hidden","jy","",0,0,"","",ai_jy)&aiinput("hidden","oz","",0,0,"","",ai_oz)&aiinput("hidden","oy","",0,0,"","",ai_oy)&aiinput("hidden","bd","",0,0,"","",ai_bd)&aiinput("hidden","bc","",0,0,"","",ai_bc)&aiinput("hidden","t1","",0,0,"","",ai_t1)
end if
'11竞拍系统
elseif ai_el=11 then
if not isdate(ai_t2) then ai_t2=DateAdd("n",30,ai_tm)
if eadqx>1 then
eaform=eaform&"<li>起价："&aiinput("","oz","",6,50,"起拍价格,设为0的时候默认支持预约暗拍","f-c1|f-b1|f-c1",ai_oz)&"定金："&aiinput("","oy","",6,50,"竞拍商品的定金，竞拍开始扣除卖家定金，请保证账户有足够金钱。竞拍结束收取中拍者定金。","f-c1|f-b1|f-c1",ai_oy)&"开始："&aiinput("","t2","",99,100,"竞拍开始时间，注：每场竞拍半小时后连续1分钟无人竞拍即竞拍完成，今日：（"&now()&"）","f-c2|f-b2|f-c2",ai_t2)&"</li>"
eaform=eaform&"<li class=""l-1"">底价："&aiinput("","jy","",6,50,"心理价位，拍卖价大于这个价格的时候显示，0为不显示","f-c1|f-b1|f-c1",ai_jy)&"价格："&aiinput("","jg","",6,50,"当前价格，包含预约出价，须大于起拍价方才有效。","f-c1|f-b1|f-c1",ai_jg)&"中标："&aiinput("","uf","",0,50,"竞拍当前中标人","f-c2|f-b2|f-c2",ai_uf)&"</li>"
if ealhx=0 then eaform=eaform&eadxx
eaform=eaform&"<li>更新："&aiinput("","t1","",99,100,"最后更新时间","f-c2|f-b2|f-c2",ai_t1)&"榜分："&aiinput("","bd","",6,50,"打榜分数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bd)&"榜次："&aiinput("","bc","",6,50,"进入榜单次数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bc)&"</li>"
elseif eadty=0 or (eadty=1 and aiint(ai_xy)=0) then
eaform=eaform&"<li>开始："&aiinput("","t2","",99,100,"竞拍开始时间，注：每场竞拍半小时后连续1分钟无人竞拍即竞拍完成，今日：（"&now()&"）","f-c2|f-b2|f-c2",ai_t2)&"当前时间："&aitm(now(),99)&"</li>"
eaform=eaform&"<li class=""l-1"">定金："&aiinput("","oy","",6,50,"竞拍商品的定金，竞拍开始扣除卖家定金，请保证账户有足够金钱。竞拍结束收取中拍者定金。","f-c2|f-b2|f-c2",ai_oy)&"起价："&aiinput("","oz","",6,50,"起拍价格,设为0的时候默认支持预约暗拍","f-c1|f-b1|f-c1",ai_oz)&"底价："&aiinput("","jy","",6,50,"心理价位，拍卖价大于这个价格的时候显示，0为不显示","f-c1|f-b1|f-c1",ai_jy)&"</li>"&aiinput("hidden","jg","",0,0,"","",ai_jg)&aiinput("hidden","uf","",0,0,"","",ai_uf)
if ealhx=0 then eaform=eaform&eadxx
eaform=eaform&aiinput("hidden","bd","",0,0,"","",ai_bd)&aiinput("hidden","bc","",0,0,"","",ai_bc)&aiinput("hidden","t1","",0,0,"","",ai_t1)
else
response.Write aigo("对不起，您无权操作已审核"&ep_dm&"！请联系管理员。",1)
response.End()
end if
'10商品系统
'12供应系统
elseif ai_el=10 or ai_el=12 then
eaform=eaform&"<li>原价："&aiinput("","jy","",6,50,"原价","f-c1|f-b1|f-c1",ai_jy)&"售价："&aiinput("","jg","",6,50,"售价","f-c1|f-b1|f-c1",ai_jg)&""
if eadqx>1 then
eaform=eaform&"已售："&aiinput("","oy","",6,50,"已售数量","f-c1|f-b1|f-c1",ai_oy)&""
else
eaform=eaform&"已售："&aiinput("read","oy","",6,50,"已售数量*不可修改","f-c1|f-b1|f-c1",ai_oy)&""
end if
eaform=eaform&"库存："&aiinput("","oz","",6,50,"库存数量","f-c1|f-b1|f-c1",ai_oz)&"</li>"
eaform=eaform&"<li class=""l-1"">过期："&aiinput("","t2","",99,100,"优惠活动过期时间，今日：（"&now()&"）","f-c4|f-b4|f-c4",ai_t2)&"</li>"
if ealhx=0 then eaform=eaform&eadxx
if eadqx>1 then
eaform=eaform&"<li>更新："&aiinput("","t1","",99,100,"最后更新时间","f-c2|f-b2|f-c2",ai_t1)&"榜分："&aiinput("","bd","",6,50,"打榜分数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bd)&"榜次："&aiinput("","bc","",6,50,"进入榜单次数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bc)&"</li>"
else
eaform=eaform&aiinput("hidden","t1","",0,0,"","",ai_t1)&aiinput("hidden","bd","",0,0,"","",ai_bd)&aiinput("hidden","bc","",0,0,"","",ai_bc)
end if
'13	求购系统
elseif ai_el=13 then
eaform=eaform&"<li class=""l-1"">底价："&aiinput("","jg","",6,50,"最低价格","f-c1|f-b1|f-c1",ai_jg)&"高价："&aiinput("","jy","",6,50,"最高价格","f-c1|f-b1|f-c1",ai_jy)&"已收："&aiinput("","oy","",6,50,"已经收入的数量","f-c1|f-b1|f-c1",ai_oy)&"需量："&aiinput("","oz","",6,50,"需求总数量","f-c1|f-b1|f-c1",ai_oz)&"</li>"
eaform=eaform&"<li class=""l-1"">过期："&aiinput("","t2","",99,100,"优惠活动过期时间，今日：（"&now()&"）","f-c4|f-b4|f-c4",ai_t2)&"</li>"
if ealhx=0 then eaform=eaform&eadxx
if eadqx>1 then
eaform=eaform&"<li>更新："&aiinput("","t1","",99,100,"最后更新时间","f-c2|f-b2|f-c2",ai_t1)&"榜分："&aiinput("","bd","",6,50,"打榜分数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bd)&"榜次："&aiinput("","bc","",6,50,"进入榜单次数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bc)&"</li>"
else
eaform=eaform&aiinput("hidden","t1","",0,0,"","",ai_t1)&aiinput("hidden","bd","",0,0,"","",ai_bd)&aiinput("hidden","bc","",0,0,"","",ai_bc)
end if
end if
'___________________________________________________________________________________1
else
'1	文章系统
'3	关于我们
'14短文系统
'15单页系统
'4	资质证书
'7	图片系统
if ealhx=0 then eaform=eaform&eadxx
if eadqx>1 then
eaform=eaform&"<li>价格："&aiinput("","jg","",6,50,"价格","f-c1|f-b1|f-c1",ai_jg)&"原价："&aiinput("","jy","",6,50,"原价","f-c1|f-b1|f-c1",ai_jy)&"已售："&aiinput("","oy","",6,50,"已售数量","f-c1|f-b1|f-c1",ai_oy)&"库存："&aiinput("","oz","",6,50,"库存数量","f-c1|f-b1|f-c1",ai_oz)&"</li>"
eaform=eaform&"<li class=""l-1"">榜分："&aiinput("","bd","",6,50,"打榜分数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bd)&"榜次："&aiinput("","bc","",6,50,"进入榜单次数（需要在网站设置中开启该功能）","f-c1|f-b1|f-c1",ai_bc)&"其他："&aiinput("","uf","",0,200,"其他信息","f-c2|f-b2|f-c2",ai_uf)&"</li>"
eaform=eaform&"<li>更新："&aiinput("","t1","",99,100,"最后更新时间","f-c2|f-b2|f-c2",ai_t1)&"过期："&aiinput("","t2","",99,100,"过期时间","f-c2|f-b2|f-c2",ai_t2)&"</li>"
else
eaform=eaform&aiinput("hidden","bd","",0,0,"","",ai_bd)&aiinput("hidden","bc","",0,0,"","",ai_bc)&aiinput("hidden","jg","",0,0,"","",ai_jg)&aiinput("hidden","jy","",0,0,"","",ai_jy)&aiinput("hidden","oz","",0,0,"","",ai_oz)&aiinput("hidden","oy","",0,0,"","",ai_oy)&aiinput("hidden","t1","",0,0,"","",ai_t1)&aiinput("hidden","t2","",0,0,"","",ai_t2)
end if
end if
'EESAI------1
eaform=eaform&"<li class=""l-1"">发布："&aiinput("","um","",0,50,"发布人或作者","f-c1|f-b1|f-c1",ai_um)&"摘要："&aiinput("","ss","",0,200,"请总结描述一下，有助于推广（为空将自动提取详细信息中的前200字文本）输入0表示为空不显示。","f-c3|f-b3|f-c3",ai_ss)&"</li>"
eaform=eaform&"<li>密钥："&aiinput("","mm","",3,50,"选填项，为空或0时无需密钥即可查看"&ep_dm&"，其他字符则需要输入您设定的密钥。","f-c1|f-b1|f-c1",aimm(g_gmm,ai_mm,1))&"引用："&aiinput("","yy","",0,200,"引用网址(如果以#结尾表示隐藏该引用网址)","f-c3|f-b3|f-c3",ai_yy)&"</li>"
'XT------0
if eadqx>1 then
eaform=eaform&"<li class=""l-1"">编码："&aiinput("","sn","",3,50,"*编码(自动生成或手动设置，不可与已有编码重复。)","f-a1|f-b1|f-c1",ai_sn)&""
if e_gdj>3 then
eaform=eaform&"会员："&aiinput("","us","",66,50,"会员账号","f-c1|f-b1|f-c1",ai_us)&"编辑："&aiinput("","ee","",0,50,"编辑","f-c1|f-b1|f-c1",ai_ee)&""&"时间："&aiinput("","tm","",99,100,"*创建时间","f-c1|f-b1|f-c1",ai_tm)
else
eaform=eaform&aiinput("hidden","us","",0,0,"","",ai_us)&aiinput("hidden","ee","",0,0,"","",ai_ee)&"时间："&aiinput("","tm","",99,100,"*创建时间","f-c3|f-b3|f-c3",ai_tm)
end if
eaform=eaform&"</li>"
eaform=eaform&"<li>评论："&aiselect("pl","","","f-s1",ai_pl,0,i_baipl)&"频道："&epselect(ai_ep)&"网站："&ewselect(1,ai_ew)&"类型："&elselect(ai_el)&"</li>"
eaform=eaform&"<li class=""l-1"">"&ep_dm&"备忘录："&eseditxt(right(ai_xt,s_ztpx),"xt",1)&"</li>"
else
eaform=eaform&aiinput("hidden","tm","",0,0,"","",ai_tm)&aiinput("hidden","us","",0,0,"","",ai_us)&aiinput("hidden","ee","",0,0,"","",ai_ee)&aiinput("hidden","pl","",0,0,"","",ai_pl)&aiinput("hidden","sn","",0,0,"","",ai_sn)&aiinput("hidden","ep","",0,0,"","",ai_ep)&aiinput("hidden","ew","",0,0,"","",ai_ew)&aiinput("hidden","el","",0,0,"","",ai_el)&aiinput("hidden","xt","",0,0,"","",right(ai_xt,s_ztpx))
end if
'XT------1
if ealhx=0 then eaform=eaform&"</ul>"


if left(eafqh,1)="3" then
eaform=eaform&eskyx(eadty,1,2)
else
eaform=eaform&eskyx(eadty,2,2)
end if
if eadty=1 then
eaform=eaform&"<li class=""l-sb"">"&aibutton(2,"","","f-sb",s_umxgs)&aiinput("hidden","id","",0,0,"","",ai_id)&aibutton(1,"","","f-sb",s_ztcz)&"</li>"
elseif eadty=0 then
eaform=eaform&"<li class=""l-sb"">"&aibutton(2,"","","f-sb",s_umtjs)&aibutton(1,"","","f-sb",s_ztcz)&"</li>"
end if
eaform=eaform&"<script src="""&eshref(i_dir&"GuoYanSai/FTM.js",3)&"""></script></ul></form></div>"
end if
End Function
'-----------------------------------
'read can shu
'= eascs(easfstr,easfva,easfty)
'-----------------------------------
Function eascs(easfstr,easfva,easfty)
if len(easfstr&"0")>4 then
dim gysarx,gysary,gysri,eascsrra,eascsrrb,eascsccc,eascsrrc,eascsri,eascszz
gysarx=split(easfstr,"#")
for gysri=0 to ubound(gysarx)
gysary=split(gysarx(gysri)&"~","~")
if not isnull(gysary(0)) and not isnull(gysary(1)) then
if left(gysary(0),1)<>"0" then
eascsrra=split(gysary(0)&"=","=")
eascsrrb=split(gysary(1),"|")
eascs=eascs&""&eascsrra(1)&"："
for eascsri=0 to ubound(eascsrrb)
eascsccc=eascsrrb(eascsri)
if len(eascsccc&"0")>3 then
eascsrrc=split(eascsccc&"=","=")
eascszz=eascsrra(0)&eascsrrc(0)
if instr(easfva&",",eascszz&",")>0 then eascs=eascs&" "&eascsrrc(1)&""
end if
next
eascs=eascs&"<br>"
end if
end if
next
end if
End Function
'-----------------------------------
'ai zhaiyao
'=easzy(eafty2=show|3=list-c|4=list|5=top,eafid,eafsn,eafss,eafbt,eafnr,eafmm,eafmx)
'-----------------------------------
Function easzy(eafty,eafid,eafsn,eafss,eafbt,eafnr,eafmm,eafmx)
easzy=""
if aibj(eafss,"0") then
easzy=""
elseif not ainull(eafss) then
easzy=eafss
elseif i_xkzy>=eafty then'make zy
dim ailcbt,ailcnr,ailzrs
ailcbt=len(aitit(eafbt)&"0")
eafnr=esupr(2,eafnr)
if eafty=2 or eafty=3 then
ailcnr=len(aitit(eafnr)&"0")
if ailcbt<ailcnr then
easzy=left(aitit(eafnr),200)
else
easzy=left(aitit(eafbt),200)
end if
if not ainull(easzy) and not aibj(easzy,"0") and instr(easzy,"'")=0 then
Call gysgx(eabiao,"ai_ss='"&easzy&"'","ai_id="&eafid&"")
if eafty=2 then Call eskod(0,0,esapm(1,eafsn))
end if
elseif eafty=4 or eafty=5 then
Call saik(ailzrs,"select ai_ss,ai_nr from "&eabiao&" where ai_id="&eafid&"",3,3)
eafnr=aitit(esnr(ailzrs("ai_nr")))
ailcnr=len(eafnr&"0")
if ailcbt<ailcnr then
easzy=left(eafnr,200)
else
easzy=left(aitit(eafbt),200)
end if
if not ainull(easzy) then
ailzrs("ai_ss")=easzy
ailzrs.update
end if
Call saig(ailzrs)
end if
end if
if len(easzy&"0")>3 then'show zy
if eafty>9 then
easzy="简介："&easzy&""
elseif eafty=2 then
if (aibj(eafmm,eafmx) or ainull(eafmm)) and len(easzy&"0")>180 then
easzy="摘要："&easzy&""
else
easzy=""
end if
elseif eafty>2 then
if not ainull(eafmm) then easzy=s_ztmm
else
easzy=""
end if
else
easzy=""
end if
End Function
'-----------------------------------
'ai show
'=easshow(eafty)
'-----------------------------------
Function easshow(eafqh,eafty,eafsn)
if ainull(ai_bt) then ai_bt=esto(ai_el,ai_bt,esnr(ai_nr))'no title
ew_bt=ai_bt&","&ew_bt:ew_zt=ai_bt&","&ai_eq&","&ew_zt:ew_nr=ai_bt&","&ai_ss&","&ew_nr:ew_cp=ai_um&","&ai_us&","&ai_ee&","&ew_cp
easshow=easshowx(ai_el,eafqh,eafty,eafsn)
if ainull(easshow) then
dim easdpur,easdpg,easdmm,eadupsh,eadlins
if left(eafqh,1)="7" then
easdpg=g_u4:easdmm=g_u5:easdpur=eshref(esnk(ai_ep)&g_urg&esnf(ai_ef)&g_urg&s_umxx&g_urg&ai_sn&g_urg&g_gp&g_urg&easdmm&g_urz,11)
else
easdpg=g_u6:easdmm=g_u7:easdpur=eshref(s_uduk&g_urg&uk_ur&g_urg&esnk(ai_ep)&g_urg&esnf(ai_ef)&g_urg&s_umxx&g_urg&ai_sn&g_urg&g_gp&g_urg&easdmm&g_urz,11)
end if

if ew_gn=0 or ew_dj=0 or ew_pj=0 then
ealhx=0
else
ealhx=1
end if

if aibj(ai_el,"15") or right(ai_bt,2)="**" then
if right(ai_bt,3)="***" then
e_mt=""
elseif right(ai_bt,2)="**" then
e_mt=esbts(ep_sx,ep_el,replace(ai_bt,"**","")&g_gy&eshref(esnk(ai_ep)&g_urg&esnf(ai_ef)&g_urg&s_umxx&g_urg&ai_sn&g_urz,1),"")
end if
icdcb=""
else
if aibj(ai_el,"3") or aibj(ai_el,"4") then
if aibj(ep_ef,"5") then e_mt=esbts(ep_sx,ep_el,ai_bt&g_gy&eshref(esnk(ai_ep)&g_urg&esnf(ai_ef)&g_urg&s_umxx&g_urg&ai_sn&g_urz,1),"")
if not ainull(ai_jj) then
icdcb="<span>"&ai_jj&"</span>"
else
icdcb=ai_bt
end if
else
icdcb=ai_bt
if not ainull(ai_jj) then icdcb=icdcb&"<span>"&ai_jj&"</span>"
end if
'--------------------------------zhaiyao 0
icdcc=easzy(2,ai_id,ai_sn,ai_ss,ai_bt,ai_nr,ai_mm,aimm(g_gmm,easdmm,0))
'--------------------------------zhaiyao 1
'--------------------------------HENG 0
if i_xkatm>0 or ew_dj>0 then
icdcd=eshi(0,ai_id,ai_hi)
if isdate(ai_tm) then icdcd=icdcd&"发布时间："&aitm(ai_tm,9)
if isdate(ai_t1) and isdate(ai_tm) then
if cdate(ai_t1)>cdate(ai_tm) then icdcd=icdcd&" 最近更新："&aitm(ai_t1,0)
end if
if ealhx=1 then
if not ainull(ai_um) or not ainull(ai_us) then
icdcd=icdcd&" 发布："
if not ainull(ai_us) and i_xkubq=1 then
icdcd=icdcd&"<a href="&eshref(s_udus&g_urg&s_umzs&g_urg&ai_us&g_urz,66)&" target=_blank>"&usren(ai_um&g_gg&ai_us)&"</a>"
else
icdcd=icdcd&usren(ai_um&g_gg&ai_us)
end if
end if
if not ainull(ai_ee) then icdcd=icdcd&" 编辑：<a href="&eshref(s_udee&g_urg&s_umzs&g_urg&ai_ee&g_urz,66)&" target=_blank>"&ai_ee&"</a>"
end if
end if
'--------------------------------HENG 1


ai_el=aiint(ai_el)
if aiint(easdpg)<2 then
'4	资质证书
'7	图片系统
'9	媒体系统
if ai_el=4 or ai_el=7 or ai_el=9 then
'media
if ai_el=9 then
if not ainull(ai_uf) and instr(ai_nr,ai_uf)=0 then
icdcj=esmm(0,aiplay(esups(ai_uf,11),"100%","588"),eshref(esnk(ai_ep)&g_urg&esnf(ai_ef)&g_urg&s_umxx&g_urg&ai_sn&g_urg&g_u4&g_urg&g_gg&g_urz,11),ai_mm,aimm(g_gmm,easdmm,0))
end if
'picture cert
elseif not ainull(ai_up) and instr(ai_nr,ai_up)=0 then
icdcj=esmm(0,eaupsh("D_"&ai_sn,ai_nr,ai_up,ai_bt,ai_el),eshref(esnk(ai_ep)&g_urg&esnf(ai_ef)&g_urg&s_umxx&g_urg&ai_sn&g_urg&g_u4&g_urg&g_gg&g_urz,11),ai_mm,aimm(g_gmm,easdmm,0))
end if
'6	友情链接
elseif ai_el=6 then
if i_xklj=1 and len(ai_uf&"0")>8 then response.Redirect(ai_uf)
if not ainull(ai_up) and ((instr(ai_nr,ai_up)=0 and i_upxf=1) or i_upxf=2)  then icdcj=easpic(ai_up,ai_bt,ai_bt,ai_uf,3)
icdcj=icdcj&"<div class=""c-k tc""><a target=""_blank"" href="""&trim(ai_uf)&""" class=""y-n""><font color=#FFFFFF>单击这里前往链接目标</font></a></div>"
'5	人才招聘
elseif ai_el=5 then
if not ainull(ai_up) or aiint(ai_jg)>0 or aiint(ai_jy)>0 or len(ai_uf&"0")>3 then
if not ainull(ai_up)  then
icdcf=easpic(ai_up,ai_bt,ai_bt,ai_up,4)
elseif len(ew_pt)>3 then
icdcf=ew_pt
else
icdcf=""
end if
icdcg=""
if aiint(ai_jg)>0 then icdcg=icdcg&"<li>月薪：<b>"&ai_jg&"</b> 元/月</li>"
if aiint(ai_jy)>0 then icdcg=icdcg&"<li>人数：<b>"&ai_jy&"</b> 人</li>"
if len(ai_uf)>1 then icdcg=icdcg&"<li>要求：<b>"&ai_uf&"</b></li>"
end if
'8	下载系统
elseif ai_el=8 then
if not ainull(ai_up) or not ainull(ai_uf) then
if not ainull(ai_up)  then
icdcf=easpic(ai_up,ai_bt,ai_bt,ai_up,4)
elseif len(ew_pt)>3 then
icdcf=ew_pt
else
icdcf=""
end if
icdcg=""
icdcg=icdcg&icot(3,ep_el,ep_ot,ai_ot)
if not ainull(ai_uf) then icdcg=icdcg&"<div class=""c-k tc"">"&esmm(0,"<a target=""_blank"" href="""&ai_uf&""" class=""y-n"">右键点击选择[目标另存为..]</a>",eshref(esnk(ai_ep)&g_urg&esnf(ai_ef)&g_urg&s_umxx&g_urg&ai_sn&g_urg&g_u4&g_urg&g_gg&g_urz,11),ai_mm,aimm(g_gmm,easdmm,0))&"</div>"
end if
'10	商品系统
'12	供应系统
'2		产品系统
'13	求购系统
elseif ai_el=2 or ai_el=10 or ai_el=12 or ai_el=13 then
icdcg=""
if ai_el=13 then
if aiint(ai_jy)>0 and aiint(ai_jg)>0 then
icdcg=icdcg&"<li>价格要求：<b>"&ai_jg&" 元 - "&ai_jy&" 元</b></li>"
elseif aiint(ai_jy)>0 then
icdcg=icdcg&"<li>价格要求：<b>不高于"&ai_jy&" 元</b></li>"
elseif aiint(ai_jg)>0 then
icdcg=icdcg&"<li>价格要求：<b>不低于"&ai_jg&" 元</b></li>"
end if
else
if aiint(ai_jy)>0 then
if aiint(ai_jg)>0 and aiint(ai_jy)>aiint(ai_jg) then
if isdate(ai_t2) and isdate(ai_tm) then
if cdate(aitm(ai_t2,6))>now() then
icdcg=icdcg&"<li>活动价格：<b>"&ai_jg&" 元</b> <s>原价 "&ai_jy&" 元</s></li><li>剩余时间："&aidjs(1,aitm(ai_t2,6),"","b")&"</li>"
elseif cdate(aitm(ai_t2,6))=cdate(aitm(ai_tm,6)) then
icdcg=icdcg&"<li>活动价格：<b>"&ai_jg&" 元</b> <s>原价 "&ai_jy&" 元</s></li>"
else
if aiint(ai_jy)>aiint(ai_jg) then
Call gysgx("ees_ai","ai_jg="&aiint(ai_jy)&"","ai_id="&ai_id&"")
Call eskod(0,0,g_app)
end if
icdcg=icdcg&"<li>价格：<b>"&ai_jy&" 元</b></li>"
end if
else
icdcg=icdcg&"<li>活动价格：<b>"&ai_jg&" 元</b> <s>原价 "&ai_jy&" 元</s></li>"
end if
else
icdcg=icdcg&"<li>价格：<b>"&ai_jy&" 元</b></li>"
end if
end if
end if
icdcg=icdcg&icot(3,ep_el,ep_ot,ai_ot)
if ai_el=10 or ai_el=12 then
if aiint(ai_oz)>0 or aiint(ai_oy)>0 then
if aiint(ai_oz)>0 then
icdcg=icdcg&"<li>库存：<b>"&ai_oz&" 件</b>"
else
icdcg=icdcg&"<li>库存：<b>已售完</b>"
end if
if aiint(ai_oy)>0 then icdcg=icdcg&" <s>已售 "&ai_oy&" 件</s>"
icdcg=icdcg&"</li>"
end if
elseif ai_el=13 then
if aiint(ai_oz)>0 or aiint(ai_oy)>0 then
if aiint(ai_oz)>0 then
icdcg=icdcg&"<li>需求：<b>"&ai_oz&" 件</b>"
else
icdcg=icdcg&"<li>需求：<b>已达标</b>"
end if
if aiint(ai_oy)>0 then icdcg=icdcg&" <s>已收 "&ai_oy&" 件</s>"
icdcg=icdcg&"</li>"
end if
end if
if i_xkadd>0 and not (ai_el=2 or ai_el=13) then
if aiint(ai_xy)=0 then
icdcg=icdcg&"<li>提示：此商品暂未通过官方核实无法在线购买！</li>"
elseif aiint(ai_jg)=0 and aiint(ai_jy)=0 then
icdcg=icdcg&""
elseif not (aiint(ai_oz)=0 and aiint(ai_oy)>0) then
icdcg=icdcg&"<li>"&uycartj(i_xkadd,"请输入您订购的数量<br>",ai_sn,ai_jg,ai_bt,ai_us)&uycar(i_xkadd)&"</li>"
else
icdcg=icdcg&"<li>提示：请等待补货或联系商家</li>"
end if
else
if not ainull(ew_c0) and not left(eafqh,1)="3" and not ainull(ai_us) then
if ai_el=13 then
icdcg=icdcg&"<div class=""c-k"">"&uslx(8,us_xy,ai_us,us_em,uk_ur)&"</div>"
else
icdcg=icdcg&"<div class=""c-k"">"&uslx(7,us_xy,ai_us,us_em,uk_ur)&"</div>"
end if
end if
end if

if ainull(icdcg) then
if not ainull(ai_up)  then icdcj=eaupsh("D_"&ai_sn,ai_nr,ai_up,ai_bt,ai_el)
else
icdcf=""
if not ainull(ai_up)  then
icdcf=eaupsh("Y_"&ai_sn,ai_nr,ai_up,ai_bt,ai_el)
elseif len(ew_pt)>3 then
icdcf=ew_pt
else
icdcf=""
end if

end if
'11	竞拍系统
elseif ai_el=11 then
if left(eafqh,1)="7" then
easdpg=g_u4:easdmm=g_u5:easdpur=eshref(esnk(ai_ep)&g_urg&esnf(ai_ef)&g_urg&s_umxx&g_urg&ai_sn&g_urg&g_gp&g_urg&easdmm&g_urz,11)
else
easdpg=g_u6:easdmm=g_u7:easdpur=eshref(s_uduk&g_urg&uk_ur&g_urg&esnk(ai_ep)&g_urg&esnf(ai_ef)&g_urg&s_umxx&g_urg&ai_sn&g_urg&g_gp&g_urg&easdmm&g_urz,11)
end if
if ew_gn=0 or ew_dj=0 or ew_pj=0 then
ealhx=0
else
ealhx=1
end if
if not ainull(ai_up) then
icdcf=eaupsh("Y_"&ai_sn,ai_nr,ai_up,ai_bt,ai_el)
elseif len(ew_pt)>3 then
icdcf=ew_pt
else
icdcf=""
end if
icdcg=""
end if
end if
end if
'1	文章系统
'3	关于我们
'14	短文系统
'15	单页系统
'--------------------------------CONTENT 0
icdci=""
if ep_ef<>"5" and i_xkubq>2 and left(eafqh,1)<>"3" then icdci=icdci&usrqm(506,ai_us,us_xy&g_gg&us_qm&g_gg&us_up&g_gg&us_sn&g_gg&us_bt)
if ai_el=8 or ai_el=9 or ai_el=7 or ai_el=4 then
icdci=icdci&esnrgys(esnr(ai_nr),easdpur,easdpg)
else
icdci=icdci&esmm(aiint(ep_qx),esnrgys(esnr(ai_nr),easdpur,easdpg),eshref(esnk(ai_ep)&g_urg&esnf(ai_ef)&g_urg&s_umxx&g_urg&ai_sn&g_urg&g_u4&g_urg&g_gg&g_urz,11),ai_mm,aimm(g_gmm,easdmm,0))
end if

if not ainull(ai_up) and i_upxf>0 then
if ai_el=1 and instr(ai_nr,ai_up)=0 then icdcj=easpic(ai_up,ai_bt,ai_bt,ai_up,3)
end if

icdcm=""
if ew_pj>0 then icdcm=icdcm&"<div class=""c-l"">"&eshi(1,ai_id,ai_xi)&"</div>"
if not ainull(ai_eq) then
if left(eafqh,1)="7" then
icdcm=icdcm&easeq(s_umso&g_urg&d_seals,ai_eq)&"<br>"
else
icdcm=icdcm&easeq(g_u0&g_urg&g_u1&g_urg&g_u2&g_urg,ai_eq)&"<br>"
end if
end if
if i_xkyy>0 then
if len(ai_yy)<3 then
if i_xkyy>1 then icdcm=icdcm&"转载请注明："&g_u
else
if right(ai_yy,1)="#" then
if i_xkyy>1 then icdcm=icdcm&"友情转载："&left(ai_yy,len(ai_yy)-1)&"<br>"
icdcm=icdcm&"引用网址："&g_u
else
icdcm=icdcm&"转载来源："&ai_yy&"<br>"
icdcm=icdcm&"当前网址："&g_u
end if
end if
end if
icdcm=icdcm&esfx()
if ep_ef<>"5" then icdcm=icdcm&esbq(ai_ep,ai_ef,ai_sn,ai_us)
'--------------------------------CONTENT 1
icdty=9
easshow=easshow&icnr(icdty,ep_dm,icdcb,icdcc,icdcd,icdcf,icdcg,icdci,icdcj,icdcm)
if ai_el=11 then easshow=easshow&ppcartc(i_xkapp)
easshow=easshow&espl(eshref(g_ustring,11),ai_id,0,ai_xt,eabiao,"ai_xt","ai_id",esapm(1,ai_sn))
end if
End Function
'-----------------------------------
'=easeq()
'-----------------------------------
Function easeq(eafqz,eafstr)
dim easqrr,easqii
easeq=""
easqrr=split(replace(eafstr,"，",","),",")
for easqii=0 to ubound(easqrr)
if not ainull(easqrr(easqii)) then
easeq=easeq&"<a href="""&eshref(eafqz&"/0/0/0/0/2/0/"&aijia(easqrr(easqii))&g_urz,11)&""">"&easqrr(easqii)&"</a>"
end if
next
if not ainull(easeq) then easeq="目录标签："&easeq
End Function
'-----------------------------------
'ai list show
'=easlist(eafqh,eafxpms,eafuqs,eafxpur,eafpg,eafps)
'-----------------------------------
Function easlist(eafqh,eafuq,eafef,eafpg,eafps,eafph,eafqx,eafqxyz,eafity,eafuqs,eafxpur,eafxpms,eafxpum)
easlist=easlistx(ep_el,eafqh,eafuq,eafef,eafpg,eafps,eafph,eafqx,eafqxyz,eafity,eafuqs,eafxpur,eafxpms,eafxpum)
if ainull(easlist) then

if len(eafqh)=3 and left(eafqh,1)="3" then
easlist=easlist&replace(ukme(3),s_uduk&g_urg,s_umgl&g_urg&s_uduk&g_urg)
elseif len(eafqh)=3 and right(eafqh,1)<>"2" then
easlist=easlist&icmenu("","k-3","1|"&ep_sn,ef_sn,4004,0,14,28,0)&"<div class=cr></div>"
end if
'cdv 0
easlist=easlist&epfl(ep_ef,"",ep_fl,eafef,eshref(eafuq&g_urg&g_gx&g_urg&eafxpms&g_urg&g_urg&g_urg&eafph&g_urz,eafxpum))
'cdv 1

iclls="<div class=""l-tb"&estt(eafxpms,s_umlb)&"""><a href="""&eshref(eafuqs&s_umlb&g_urg&g_urg&g_urg&eafph&g_urz,eafxpum)&""">"&s_umlbs&"</a></div><div class=""l-tb"&estt(left(eafxpms,3),"hun")&"""><a href="""&eshref(eafuqs&s_umlh&g_urg&g_urg&g_urg&eafph&g_urz,eafxpum)&""">"&s_umlhs&"</a><li><a href="""&eshref(eafuqs&s_umlj&g_urg&g_urg&g_urg&eafph&g_urz,eafxpum)&""">"&s_umljs&"</a></li><li><a href="""&eshref(eafuqs&s_umlc&g_urg&g_urg&g_urg&eafph&g_urz,eafxpum)&""">"&s_umlcs&"</a></li></div><div class=""l-tb"&estt(eafxpms,s_umlp)&"""><a href="""&eshref(eafuqs&s_umlp&g_urg&g_urg&g_urg&eafph&g_urz,eafxpum)&""">"&s_umlps&"</a></div><div class=""l-tb"&estt(eafxpms,s_umyq)&"""><a href="""&eshref(eafuqs&s_umyq&g_urg&g_urg&g_urg&eafph&g_urz,eafxpum)&""">"&s_umyqs&"</a></div>"

Call aiss(ep_el,0)
easlist=easlist&icliq(iclls,eafuqs&eafxpms,eafph,eafqxyz,eafity,"ai")
Call aitj(ep_sn&"/"&eafef&"/"&eafph,ep_ef,0)

if aiint(iclapp)>0 or ew_ap<2 or (aiint(eafpg)>1 and ew_ap<4) or aiint(eafps)>0 or len(eafqh)=3 then
g_app=""
else
if aibj(eafxpms,s_umyq) then
eafps=i_nmhc
if not ainull(g_app) then g_app=g_app&"_"&s_umyq
else
eafps=i_nmlb
if not ainull(g_app) then g_app=g_app&"_"&s_umlb
end if
end if
if not ainull(g_app) then g_app=esapm(2,g_app)

if left(eafqh,1)="3" and not ainull(uk_us) then
g_app=""
eawhere=replace(eawhere,"ai_xy>0 and","")
eawhere=replace(eawhere," and ai_xy>0","")
eawhere=replace(eawhere,"ai_xy>0","")
if not ainull(eawhere) then eawhere=eawhere&" and "
eawhere=eawhere&"ai_us='"&uk_us&"'"
end if

eallies=ealie(s_umlb)
if len(eafqh)=3 or aibj(eafxpms,s_umlc) then
if aibj(eafxpms,s_umlc) then eallies=replace(eallies,"_ss","_nr")
g_app=""
end if
'_______________________________________________
if not ainull(eafuqs) and not aibj(right(eafuqs,len(g_urg)),g_urg) then eafuqs=eafuqs&g_urg
if gyslist(eabid,eallies,eabiao,eawhere,eaorder,eafxpur,eafpg,eafps,2000,g_app) then
lidti=""
'top------0
if aibj(eafxpms,s_umlb) then
if len(eafqh)=3 then lidti=lidti&"<b>管理</b>"
if (i_xkuhy>1 and instr(lcase(g_ud)&"/",s_drwap)=0) or (i_xkuhy>0 and aibj(g_u0,s_umgl)) then lidti=lidti&"<u>会员</u>"
lidti=lidti&"<u>时间</u>"
if (ew_pj>1 and instr(lcase(g_ud)&"/",s_drwap)=0) or (ew_pj>0 and aibj(g_u0,s_umgl)) then lidti=lidti&"<i>我顶</i>"
if (ew_dj>2 and instr(lcase(g_ud)&"/",s_drwap)=0) or (ew_dj>0 and aibj(g_u0,s_umgl)) then lidti=lidti&"<i>浏览</i>"
lidti=lidti&"名称"
end if
'top------1
easlist=easlist&iclisttop(eafxpms,lidti)
gysax=split(gysar,g_gx)
for gysi=0 to ubound(gysax)
lids1=""
lids2=""
lids3=""
lids4=""
gysay=split(gysax(gysi),g_gy)
if aibj(eafxpms,s_umlc) then
eallzy=esnr(gysay(8))
Call easzy(3,gysay(0),gysay(1),"0",gysay(2),eallzy,gysay(28),"")
else
eallzy=easzy(4,gysay(0),gysay(1),gysay(8),gysay(2),"",gysay(28),"")
end if
lidbt=easlic(1,0,ep_sx,gysay(9),gysay(4),gysay(14),gysay(3),gysay(7))&esto(gysay(13),gysay(2),eallzy)&easlic(1,1,ep_sx,gysay(9),gysay(4),gysay(14),gysay(3),gysay(7))
lidtt=eaalt(esto(gysay(13),gysay(2),eallzy),gysay(3),gysay(4),gysay(5),usren(gysay(6)&g_gg&gysay(12)),gysay(23))
if ainull(eafuqs) or left(eafqh,1)="5" then
lidlj=eaurl(gysay(11)&g_urg&esnf(gysay(10))&g_urg&s_umxx&g_urg&gysay(1)&g_urz,eafxpum,esnk(gysay(11)),gysay(26))
else
lidlj=eshref(eafuqs&s_umxx&g_urg&gysay(1)&g_urz,eafxpum)
end if
if len(eafqh)=3 then
lidgl=""
if  eafqx>0 or (left(eafqh,1)="3" and aibj(gysay(6),e_uer))then
lidgl=lidgl&"<b>"
if  eafqx>1 and left(eafqh,1)<>"3" then lidgl=lidgl&"<input type=""checkbox"" id=""sid"" name=""sid"" value="""&gysay(0)&""">"
lidgl=lidgl&aibuttonk(eshref(eafuqs&s_umxg&g_urg&gysay(0)&g_urz,eafxpum),"","","","f-se","Edit")&aibuttonk(eshref(eafuqs&s_umsc&g_urg&gysay(0)&g_urg&gysay(1)&g_urz,eafxpum),s_umscs&s_udeas&s_ztqr,"","","f-se","Del")&"</b>"
end if
end if

'top loop------0
if aibj(eafxpms,s_umyq) then
lids1=gysay(4)
if not ainull(gysay(7)) then lids4=easpic(gysay(7),esto(gysay(13),gysay(2),eallzy),lidtt,lidlj,10)
'list
elseif aibj(eafxpms,s_umlb) then
if (i_xkuhy>1 and instr(lcase(g_ud)&"/",s_drwap)=0) or (i_xkuhy>0 and aibj(g_u0,s_umgl)) then lids1=lids1&"<u>"&usren(gysay(6)&g_gg&gysay(12))&"</u>"
lids1=lids1&"<u>"&aitm(gysay(3),10)&"</u>"
if (ew_pj>1 and instr(lcase(g_ud)&"/",s_drwap)=0) or (ew_pj>0 and aibj(g_u0,s_umgl)) then lids1=lids1&"<i>"&aiint(gysay(5)&g_gg&"0")&"</i>"
if (ew_dj>2 and instr(lcase(g_ud)&"/",s_drwap)=0) or (ew_dj>0 and aibj(g_u0,s_umgl)) then lids1=lids1&"<i>"&aiint(gysay(4)&g_gg&"0")&"</i>"
'pic
elseif aibj(eafxpms,s_umlp) then
lids1=easpic(gysay(7),esto(gysay(13),gysay(2),eallzy),lidtt,lidlj,0)
lids2=usren(gysay(6)&g_gg&gysay(12))
if aiint(gysay(13))=2 or aiint(gysay(13))=10 or aiint(gysay(13))=12 then
if aiint(gysay(15))>0 then
lids2=lids2&"<s>"&gysay(15)&" 元</s>"
else
lids2=lids2&"<s>面议</s>"
end if
elseif aiint(gysay(13))=13 then
if aiint(gysay(15))>0 or aiint(gysay(16))>0 then
lids2=lids2&"<s>"&aiint(gysay(15))&"-"&aiint(gysay(16))&" 元</s>"
else
lids2=lids2&"<s>面议</s>"
end if
end if
'other
else
if (aibj(eafxpms,s_umlc) and not ainull(gysay(2))) or aibj(eafxpms,s_umlh) or aibj(eafxpms,s_umlj) or aibj(eafxpms,"index") or aibj(eafxpms,"default") then
lids1=gysay(24)
e_ler=usren(gysay(6)&g_gg&gysay(12))
if i_xkuhy>1 and not ainull(e_ler) then lids2=lids2&"发布："&e_ler&" "
if ew_dj>2 then lids2=lids2&"浏览："&aiint(gysay(4)&g_gg&"0")&"次 "
if isdate(gysay(3)) then lids2=lids2&"时间："&aitm(gysay(3),2)
lids2=lids2&icot(2,ep_el,ep_ot,gysay(26))
end if
if not ainull(eallzy) or not ainull(gysay(7)) then'have con
lids3=lids3&"<div class=""l-cd lh"""
if aibj(eafxpms,s_umlc) and ailen(eallzy)>i_nmzs then lids3=lids3&" style=""max-height:"&i_nmlg&"px;overflow:auto;""  onclick=""this.style.maxHeight='"&i_nmlg*5&"px';"""
lids3=lids3&">"
if not ainull(gysay(7)) then'img
if aibj(eafxpms,s_umlc) then
lids3=lids3&easpic(gysay(7),esto(gysay(13),gysay(2),eallzy),esto(gysay(13),gysay(2),eallzy),lidlj,1)
elseif aibj(eafxpms,s_umlh) then
lids3=lids3&easpic(gysay(7),esto(gysay(13),gysay(2),eallzy),esto(gysay(13),gysay(2),eallzy),lidlj,2)
end if
end if
if ainull(gysay(2)) then'only con
lids3=lids3&lidgl&"<a href="""&lidlj&""" title="""&lidtt&""">"
lids3=lids3&eallzy
lids3=lids3&"</a>"
else
if ainull(gysay(28)) or aibj(gysay(28),aimm(g_gmm,"0",0)) then
lids3=lids3&eallzy
else
lids3=lids3&s_ztmm
end if
end if
lids3=lids3&"<div class=""cr""></div></div>"
end if
if aibj(eafxpms,s_umlc) and ainull(gysay(2)) then
e_ler=usren(gysay(6)&g_gg&gysay(12))
if i_xkuhy>1 and not ainull(e_ler) then lids4=lids4&"发布："&usren(e_ler)&" "
if ew_dj>2 then lids4=lids4&"浏览："&aiint(gysay(4)&g_gg&"0")&"次 "
if isdate(gysay(3)) then lids4=lids4&"时间："&aitm(gysay(3),2)
lids4=lids4&icot(2,ep_el,ep_ot,gysay(26))
end if
end if
'top loop------1
easlist=easlist&iclist(eafxpms,lidti,gysi,lidbt,lidtt,lidlj,lidgl,lids1,lids2,lids3,lids4)
next

easlist=easlist&iclistend(eafxpms,"")
else
easlist=easlist&"<div class=""l-tc"">"&s_ztkl&"</div>"
end if
'_______________________________________________
if ainull(eafuqs) then
easlist=easlist&iclih(gyspage,eafqxyz,eafity,eshref(s_umsc&"-x"&g_urz,eafxpum),"ai")
else
easlist=easlist&iclih(gyspage,eafqxyz,eafity,eshref(eafuqs&s_umsc&"-x"&g_urz,eafxpum),"ai")
end if
end if
End Function
'-----------------------------------
'=easlp("")
'-----------------------------------
Function easlp(eafstr,eafty)
if not ainull(eafstr) and not aibj(eafstr,"0") then
easlp=esups(eafstr,1)
elseif not ainull(ef_up) and not aibj(ef_up,"0") then
easlp=esups(ef_up,1)
elseif len(eafty)=2 then
easlp=esups("",eafty)
end if
End Function
'-----------------------------------
'=easpic()
'-----------------------------------
Function easpic(eafstr,eafbt,eafbx,eaflj,eafty)
if eafty=0 then
eafstr=easlp(eafstr,11)
else
eafstr=easlp(eafstr,1)
end if
if eafty=10 then
if not ainull(eafstr) then
easpic="<img src="""&eafstr&""">"
else
easpic=""
end if
else
if not ainull(eafstr) then
dim eslbta,eslbts,eslbtx
if not ainull(eafbt) then
eslbta=" alt="""&eafbt&""""
eslbtx=" title="""&eafbt&""""
if eafty=2 then
eslbts="<span>"&eafbt&"</span>"
elseif eafty>0 then
eslbts="<font>"&eafbt&"</font>"
end if
end if

if ainull(eslbtx) and not ainull(eafbx) then eslbtx=" title="""&eafbx&""""
if eafty=0 then
easpic=easpic&"<img src="""&eafstr&""""&eslbta&">"
elseif eafty<3 then
easpic=easpic&"<a href="""&eaflj&""""&eslbtx&"><img src="""&eafstr&""""&eslbta&"></a>"
elseif eafty=3 or eafty=4 then'show
if left(eaflj,1)<>"/" and not aibj(left(eaflj,7),"http://") then
if not ainull(eaflj) then eaflj=esups(eaflj,1)
end if
if eafty=3 then easpic="<div class=""c-u"">"
if not ainull(eaflj) then easpic=easpic&"<a href="""&eaflj&""""&eslbtx&">"
easpic=easpic&"<img src="""&eafstr&""""&eslbta&">"
if eafty=3 then easpic=easpic&"<br>"&eslbts
if not ainull(eaflj) then easpic=easpic&"</a>"
if eafty=3 then easpic=easpic&"</div>"
end if
end if
end if
End Function
'-----------------------------------
'=easlic(1,"")
'-----------------------------------
Function easlic(eafkg,eafty,eafsx,eafxy,eafhi,eafpx,eaftm,eafup)
easlic=""
eafsx=aiint(eafsx)
if eafkg=1 and eafty=0 then
easlic=easlic&icqz(1,eafxy,eafpx)
elseif eafkg=1 and eafty=1 then
easlic=easlic&ichz(1,eaftm,eafhi,eafup)
end if
End Function
%>