% Dim RSrecados Set RSrecados = Server.CreateObject("ADODB.Recordset") RSrecados.ActiveConnection = con RSrecados.Source = "SELECT * FROM recados order by id desc" RSrecados.CursorType = 0 RSrecados.CursorLocation = 2 RSrecados.LockType = 1 RSrecados.Open() %>
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||