Foros del Web » Programando para Internet » ASP Clásico »

Duda entre connection y recordset

Estas en el tema de Duda entre connection y recordset en el foro de ASP Clásico en Foros del Web. Una pequeña duda, cuando de usa en asp el objeto connection y cuando se usa el objeto recordset. Yo la pagina que tengo lo uso ...
  #1 (permalink)  
Antiguo 05/05/2005, 00:40
 
Fecha de Ingreso: abril-2005
Ubicación: Santiago Compostela
Mensajes: 213
Antigüedad: 19 años, 1 mes
Puntos: 0
Duda entre connection y recordset

Una pequeña duda, cuando de usa en asp el objeto connection y cuando se usa el objeto recordset.
Yo la pagina que tengo lo uso para listar consultas, añadir usuarios y actualizar datos y lo que creo es usar el recordset.

Que diferencias hay entre ambos.
Un saludo a todos.
  #2 (permalink)  
Antiguo 05/05/2005, 00:44
 
Fecha de Ingreso: abril-2005
Ubicación: Santiago Compostela
Mensajes: 213
Antigüedad: 19 años, 1 mes
Puntos: 0
ejemplo de mi pagina

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<!--#include file="../adovbs.inc"-->
<html>
<head>
<title>Documento sin t&iacute;tulo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
.TextoResul {
font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: 10px;
font-weight: bold;
}
.CabezaTabla {
font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: 9px;
color: #003399;
background-position: center center;
font-weight: bold;
background-color: #99cdff;
}
.DetalleTabla {
background-color: #e1f5ff;
background-position: left center;
font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: 9px;
font-style: normal;
color: #000000;
}
-->
</style>
</head>

<body>
<br>
<%
Set RstCofra = Server.CreateObject("ADODB.Recordset")
RstCofra.source="SELECT Confraria.Nome FROM Confraria WHERE (((Confraria.Id)='"& request.Form("cboConf") &"'))"
RstCofra.Cursortype=adOpenStatic
RstCofra.ActiveConnection="DSN=master;'';'';"
RstCofra.Open%>
<table width="737" border="0" cellpadding="0" cellspacing="0" >
<!--DWLayoutTable-->
<tr>
<td width="277" height="24" align="left" valign="middle" class="CabezaTabla">LISTADO DE EMBARCACI&Oacute;NS DA CONFRARIA DE:</td>
<td width="396" align="center" valign="middle" class="TextoResul"><div align="left"><%=RstCofra("Nome")%></div></td>
<td width="64">&nbsp;</td>
</table>
<% RstCofra.Close%>
<br>
<%
Set RstEmbar = Server.CreateObject("ADODB.Recordset")
RstEmbar.source="SELECT PersoasConfrarias.IdConfraria, Embarcacions.[NOME DA EMBARCACION], Embarcacions.MATRICULA, Embarcacions.FOLIO, Personas.Apelidos, Personas.Nome FROM (Personas INNER JOIN (Embarcacions INNER JOIN EmbarcacionTitular ON (Embarcacions.FOLIO = EmbarcacionTitular.FOLIO) AND (Embarcacions.MATRICULA = EmbarcacionTitular.MATRICULA)) ON Personas.DNI = EmbarcacionTitular.DNI) INNER JOIN PersoasConfrarias ON Personas.DNI = PersoasConfrarias.DNI WHERE (((PersoasConfrarias.IdConfraria)='"& request.Form("cboConf") &"'))ORDER BY Embarcacions.[NOME DA EMBARCACION]"
RstEmbar.Cursortype=adOpenStatic
RstEmbar.ActiveConnection="DSN=master;'';'';"
RstEmbar.Open%>
<table width="737" border="0" cellpadding="0" cellspacing="0" >
<!--DWLayoutTable-->
<tr>
<td width="276" height="24" align="left" valign="middle" class="CabezaTabla">NUMERO DE EMBARCACIÓNS:</td>
<td width="205" align="left" valign="middle" class="TextoResul"><% = RstEmbar.RecordCount %>
<td width="250">&nbsp;</td>
</table>

<br>
<table width="737" border="0" cellpadding="0" cellspacing="0" >
<!--DWLayoutTable-->
<tr class="CabezaTabla">
<td width="192" height="20" align="center" valign="middle">Nome</td>
<td width="80" align="center" valign="middle">Matricula</td>
<td width="93" align="center" valign="middle">Folio</td>
<td width="236" align="center" valign="middle">Apelidos</td>
<td width="136" align="center" valign="middle">Nome</td>
</tr>
<% while not RstEmbar.EOF%>
<tr class="DetalleTabla">
<td height="18" align="left" valign="middle"> <%=RstEmbar("NOME DA EMBARCACION")%></td>
<td align="left" valign="middle"> <%=RstEmbar("MATRICULA")%></td>
<td align="left" valign="middle"> <%=RstEmbar("FOLIO")%></td>
<td align="left" valign="middle"> <%=RstEmbar("Apelidos")%></td>
<td align="left" valign="middle"> <%=RstEmbar("Nome")%></td>
</tr>
<tr>
<td height="0"></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<% RstEmbar.MoveNext
wend
RstEmbar.Close%>
</table>
</body>
</html>


Esto es la forma en que me conecto a la base de datos, estaria bien asi o me recomendais otra forma.

Otra cosilla en esta pagina con vbscript puedo usar los javascript??
un saludo a todos.
  #3 (permalink)  
Antiguo 05/05/2005, 01:12
 
Fecha de Ingreso: mayo-2005
Mensajes: 156
Antigüedad: 19 años, 1 mes
Puntos: 0
Set Conexion = Server.CreateObject("ADODB.Connection")
Ruta = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../cs/bbdd.mdb")
sql = "select * from nombre_tabla"
rs.Open sql, Conn
if not rs.eof then ' si mo hay registros en el Rs
pintamos datos
rs("nombre de la campo")

end
__________________
Programador & Diseñador Web
www.ascariz.es
www.ascariz.com
www.telefonica.net/web/tiempoderol
  #4 (permalink)  
Antiguo 05/05/2005, 08:11
 
Fecha de Ingreso: abril-2005
Mensajes: 137
Antigüedad: 19 años, 2 meses
Puntos: 0
Sonrisa

Cita:
Iniciado por Rodri_Ascariz
Set Conexion = Server.CreateObject("ADODB.Connection")
Ruta = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../cs/bbdd.mdb")
sql = "select * from nombre_tabla"
rs.Open sql, Conn
if not rs.eof then ' si mo hay registros en el Rs
pintamos datos
rs("nombre de la campo")

end
odio decirlo pero es un ejemplo muy mesquino
Set Conexion = Server.CreateObject("ADODB.Connection")
Conexion.Open ("Ruta de conexion o DSN")
Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "Select * " & _
"From tabla"
rs.Open SQL, Conexion, 3
'listas tus datos
If Not rs.EOF Then
Do Until rs.EOF
Response.Write(rs("campo"))
rs.MoveNext
Loop
End If
'Para añadir datos
SQL = "Insert into tabla " & _
"(campo1, campo2,....) " & _
"Values (valor1, valor2,.....)"
Conexion.Execute SQL
'Para modificar datos
SQL = "Update tabla " & _
"Set campo1 = valor1, " & _
"campo2 = valor2,.... " & _
"Where (condicion de llave principal)"
Conexion.Execute SQL

Creo que asi podrás trabajar mejor, además de esta forma podrás diferencia el trabajo entre el listado de registros con Recordsets y la ejecución de querys de adición y edición de registros
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 12:37.