<% cnpath="DBQ=" & Server.MapPath("tarifas.mdb") DataSource = "Driver={Microsoft Access Driver (*.mdb)}; " & cnpath Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open DataSource 'Abre o Recordset Set RS = Server.CreateObject( "ADODB.Recordset" ) RS.ActiveConnection = conn set rs=conn.execute("select*from tarifas where id="&request.querystring("id")&"") %>

Acomodação: Flor de Lis

Frigobar, Ventilador de Teto e Interfone.