% Set DBConnection = Server.CreateObject("ADODB.Connection") DBConnection.Open Micnt Randomize RandNum = Int(Rnd * 5) + 1 sql = "Select * from Guest_Book where ID_sucursal='1' and ID_book ='" & RandNum & "'" Set BuscaP = DBconnection.execute(sql) texto_esp = buscaP("Texto_esp") texto_ing = buscaP("Texto_ing") cliente = buscaP("Nombre_Cliente") buscaP.CLOSE %>
![]() |
|
|||||||
|
||||||||
| Powered by DATA LOGICA | ||||||||