%'@ Language=VBScript %> <% 'Set objConn = Server.CreateObject("ADODB.Connection") ' objConn.Open "reserad" 'Set objRS = Server.CreateObject("ADODB.Recordset") ' View = "SELECT * FROM Country ORDER BY Country_link" ' objRS.Open View, objConn ',adOpenKeyset,adLockOptimistic 'Set objRSHalsa = Server.CreateObject("ADODB.Recordset") ' Viewhalsa = "SELECT * FROM Halsa ORDER BY Halsa_order" ' objRSHalsa.Open Viewhalsa, objConn ',adOpenKeyset,adLockOptimistic %>
![]() |
|
|