%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Set objConn = Server.CreateObject( "ADODB.Connection" ) Set villaRS = Server.CreateObject( "ADODB.Recordset" ) objConn.Open "MenorcaVillas" villaRS.ActiveConnection = objConn Villa= TRIM(Request ("Villa") ) sqlString = "SELECT * FROM Villas " sqlString = sqlString & "Where villaID = " & Villa villaRS.Open sqlString %>
|
|||||||||||||||||||||||||||||||||||||||||||||||