<% strQuery = "select * from [petitelindb]..[offline_banner] order by sunser" execOrder = "list" set adoRs = SetDatabaseByblank(oConn, strQuery, execOrder) do while not adoRs.eof %>

"/>

<% adoRs.movenext loop %>

<% '// id, store_name, addr, tel, location_url, img1, img2, img3, region, type, wdate strQuery = "select * from [petitelindb]..[offline_store] where display='y' order by case when region = 0 then 99 else region end, type, sunser" execOrder = "list" set storeRs = SetDatabaseByblank(oConn, strQuery, execOrder) off_region = 0 off_type = 0 off_region_val = "" endTag = "" Do While Not storeRs.eof If storeRs("region") <> 0 Then If off_region_val <> storeRs("region") Then If off_region_val <> "" Then endTag = "

" End If response.write (endTag & "") End If response.write("

") response.write("

") ' response.write("") response.write("") off_type= storeRs("type") End If If InStr(storeRs("addr"), "http") > 0 Then store_addr = " 매장안내 바로가기 " '//링크 Else store_addr = replace(storeRs("addr") ,"^","
") End If response.write (" ") response.write (" ") If storeRs("tel") = "" Then response.write (" ") Else response.write (" ") response.write (" ") End if response.write (" ") End If storeRs.movenext loop response.write ("

매장	매장 주소	매장 연락처
"& replace(storeRs("store_name"),"^"," ") &"	"& store_addr &"		"& store_addr &"	"& storeRs("tel") &"

") %>