 
			
				21/05/2002, 16:59
			
			
			     |  
      |    |    |    Fecha de Ingreso: agosto-2001  
						Mensajes: 15
					  Antigüedad: 24 años, 2 meses Puntos: 0     |        |  
  |      Re: Procedimiento - Variable en SQL        Prueba esto: 
Sub CuentaRegistros (Tablas) 
  Dim rutaBD, connBD, rs, cantreg 
  rutaBD = Server.MapPath("database\bbdd.mdb") 
  set connBD = Server.CreateObject("ADODB.Connection") 
  set rs=Server.CreateObject("ADODB.Recordset"  ) 
 connBD.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & rutaBD & ";" 
SQL = "SELECT * FROM" & Tablas rs.Open SQL, connBD, adOpenStatic, adLockReadOnly, adCmdText   
cantreg = rs.RecordCount 
Response.Write cantreg  
rs.close  
connBD.close 
End Sub             |