<% Session.Codepage=65001 %> <% lan=request.QueryString("lg") if (request.QueryString("lg") = "") or (instr(1, "ENITFRRUESDEGRRO", request.QueryString("lg"), 1) = 0) then lan="EN" end if Set lgRS = Server.CreateObject("ADODB.Recordset") lgRS.Open "Select * FROM lang_home where lang='"&lan&"'",xDb_Conn_Str %> Untitled Document
en en en en en
<%=lgRS("lg1")%>
<%=lgRS("lg2")%>
" class="button" />
<%=lgRS("lg4")%> <%Set hrs = Server.CreateObject("ADODB.Recordset") hrs.open "Select * from hotel ", xDb_Conn_Str response.Write(hrs("min_nights"))%> <%=lgRS("lg5")%>
<%=lgRS("lg6")%> <% Set ccrs = Server.CreateObject("ADODB.Recordset") ccrs.open "Select * from cc", xDb_Conn_Str If Not ccrs.Eof Then Do While Not ccrs.EOF response.Write(ccrs("cc")) response.Write(" :: ") ccrs.MoveNext Loop Else response.Write("0") End if ccrs.Close %>

<%=lgRS("lg7")%> :: <%=lgRS("lg8")%> :: <%=lgRS("lg9")%> :: <%=lgRS("lg10")%>
Booking System by Bookingscripts