<! version 2.24July46 by burin rujjanapan from yonok.ac.th>
<%
ip1 = "10.7.4.31"
ip2 = "202.29.78.31"
if Request.ServerVariables("LOCAL_ADDR") = ip1 or Request.ServerVariables("LOCAL_ADDR") = ip2 then
connect.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=f:\iftpsvc\lampang-server\users\lampang\dbnews.mdb"
else
if mid(Request.ServerVariables("URL"),1,9) = "/_private" or mid(Request.ServerVariables("URL"),1,8) = "/lampang" then
connect.open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &_
Server.MapPath("dbnews.mdb"))
else
connect.open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &_
Server.MapPath("\thaiprovince\db\dbnews.mdb"))
end if
end if
%>
จำนวน : 16 บรรทัด