Ver Mensaje Individual
  #3 (permalink)  
Antiguo 07/08/2004, 14:12
kittaragon
 
Fecha de Ingreso: julio-2004
Mensajes: 109
Antigüedad: 20 años, 9 meses
Puntos: 0
pero ya lo he intentado asi y no funciona...

dazuga:

ya lo he intentado asi y no me funciona....

me lo puedes revisar porfa...

<%
Set conec= Server.CreateObject("ADODB.Connection")
set registro = Server.CreateObject("ADODB.Recordset")
set registro1 = Server.CreateObject("ADODB.Recordset")
set registro2 = Server.CreateObject("ADODB.Recordset")
conec.open "Driver={SQL Server};SERVER=127.0.0.1; UID=cvivanco;PWD=cvivanco;DATABASE=moises"
if Request.Form("cbonum_pedido") <>" " then
numero=Request.Form("cbonum_pedido")
set registro= conec.Execute("SELECT Pedidos.*,usuarios.*,aduanas.*,inventario.*,modelo .*,servicio.* FROM Pedidos,usuarios,aduanas,inventario,modelo,servici o WHERE Pedidos.nro_pedido=convert(int,'"&numero&"') and Pedidos.nro_inv=inventario.nro_inv and inventario.rut_usr=usuarios.rut_usr and inventario.cod_modelo=modelo.cod_modelo and usuarios.cod_aduana=aduanas.cod_aduana and modelo.cod_serv=servicio.cod_serv")
if registro.BOF = true AND registro.EOF = true then

else%>
<tr bgcolor="#FFFFFF">
<td width="9%" height="21"><%response.write(registro.fields ("nombre_aduana"))%>&nbsp;</td>
<td width="26%"><%response.write(registro.fields("Nomb re_usr"))%><%response.write(registro.fields("ap_pa terno"))%><%response.write(registro.fields("ap_mat erno"))%>&nbsp;</td>
<td width="11%"><%response.write(registro.fields("marc a_modelo"))%>&nbsp;</td>
<td width="22%"><%response.write(registro.fields("desc rip_modelo"))%>&nbsp;</td>
<td width="6%"><input name="txtinv" type="text" id="txtinv" value="<%response.write(registro.fields("nro_inv") )%>" size="10" maxlength="10"></td>
<td width="8%"><%response.write(registro.fields("nro_s erie"))%></td>
<td width="18%"><%response.write(registro.fields("nomb re_serv"))%><input type="hidden" value="<%response.write(registro.fields("fecha_ped ido"))%>" name="valor"></td>
</tr>
</table>
<%end if
conec.close
set conec = nothing
end if
%>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="105">
<textarea name="txtdetalle" <%response.write(registro.fields("nombre_serv")) %> cols="122" id="txtdetalle"></textarea>


si quieres te mando el archivo .asp a ver si puedes hecharme una mano con esa pagina...

me das algun correo y la envio....

gracias-....