Ver Mensaje Individual
  #1 (permalink)  
Antiguo 06/11/2007, 08:22
rezocrew
 
Fecha de Ingreso: octubre-2007
Ubicación: Santiago ,Chile
Mensajes: 146
Antigüedad: 16 años, 7 meses
Puntos: 0
problemas de conexion

hola estoy haciendo una pagina web en asp y en cierta parte del codigo necesito extraer unos datos de una tabla que esta en oracle :

a continuacion esta el combo box donde quiero colocar los datos de la tabla


<select name="ch_<%=tr + 29 %>" class="label" >

<% call Dtr_llena_combos("1","Seleccione "& my_tds(tr,0),Cmbx11_cat,Cmbx11_y,v_cam(tr),0,1)%>

despues viene la qry donde llamo los datos

QRY = " Select PERF_DESCRIP as cap_1 "_
&" FROM USPRIWEB.PRIV_PERFILES "_
&" Order by 2 "


Call dtr_get_rows(rs_get,qry,M_x,M_y,dtr_err)

Call chk_datos_tbl(dtr_err,"HOLA")

dim Cmbx11_cat
Cmbx11_cat = rs_get
Cmbx11_x = M_x :' nro_campos N
Cmbx11_y = M_y :' nro registros 9


y a continuacion el archivo de conexion a la base de datos
<%
'===========>ABRE LA CONECCION ODBC =================
'
' parametros Coneccion a la Base de datos
'
dsn_sys = "FADE"
dsn_use = "acu"
dsn_pas = "acu"
'dsn_tbl = "gen34s2k7"
'dsn_tbl = ""
my_tpcn = "0"

Set Sys_conn = Server.CreateObject("ADODB.Connection")

select case my_tpcn

case "0" : ' String de Coneccion ODBC ( Oracle -- Sql )

Sys_conn.Open "DSN="& dsn_sys &";", dsn_use , dsn_pas

case "1" : ' String de Coneccion Coneccion Oledb Oracle

Sys_conn.Open "Provider=MSDAORA.1;Data Source="& dsn_sys &";User Id="& dsn_use &";Password="& dsn_pas

case "2" : ' String de Coneccion Coneccion Oledb SQL

Sys_conn.Open "Provider=SQLOLEDB;Data Source="& dsn_sys &";Initial Catalog="& dsn_tbl &";User Id="& dsn_use &";Password="& dsn_pas

end select

'================================================= =======================

Set CmdTemp = Server.CreateObject("ADODB.Command")
Set Reg = Server.CreateObject("ADODB.Recordset")

Set CmdTemp1 = Server.CreateObject("ADODB.Command")
Set Reg1 = Server.CreateObject("ADODB.Recordset")

Set CmdTemp2 = Server.CreateObject("ADODB.Command")
Set Reg2 = Server.CreateObject("ADODB.Recordset")

Set CmdTemp3 = Server.CreateObject("ADODB.Command")
Set Reg3 = Server.CreateObject("ADODB.Recordset")

'================================================= ==============

%>


el problema es que cuando ejecuto la pagina no me carga y me sale un mensaje que dice ke no puedo procesar sus datos y no se que sera, ya hize las configuraciones correspondientes en el pc por lo que creo que debe ser un error de programacion, cabe señalar que en mi codigo de la pagina tb hago una llamada a una base de datos en sql server de esta misma forma y hasta antes de colocar el codigo para hacer la llamada a oracle corria perfectamente entonces no se que sera ...porfavor ayudenme muchas gracias