%if dev="yes" then response.Write "contact_us.asp"%>
|
<%
Set MyConnSC = Server.CreateObject("ADODB.Connection")
MyConnSC.Open "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=" & connn & ";"
'--------- List events----------- start
if request("ztitle") <> "" then
sqll1="Select * from tbl_contact_us where "&_
" level_1_link = '"& request("ztitle") &"'"
else
end if
q1 = "&ztitle=contact_us"
if sqll1 <> "" then
if dev = "yes" then response.write " sqll1"& sqll1 '@ Set rsl1=MyConnSC.Execute(sqll1) If rsl1.eof = false then response.Write "
| |||||||||||||||||||||||||||||||||
|
Minamoto Battery (Hong Kong) |