ayuda con una conexcion no ejecuta mi consulta
Publicado por Marco (31 intervenciones) el 02/02/2008 18:23:19
hola amigos nesecito una ayuda ahora tengo una duda
ya tengo las dos conecciones salen ok esta es
y ahora como puedo hacer para hacer que ni consulta funcione el ejemplo esta abajo ojala me puedan ayudar
// Profile ADMISION
// Profile EMPRESA
SQLCA = Create Transaction
SQLCA.DBMS = "MSS Microsoft SQL Server"
SQLCA.Database = "empresa"
SQLCA.ServerName = "."
SQLCA.LogId = "SA"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
CONNECT USING SQLCA;
if SQLCA.SQLCODE=0 then
MESSAGEBOX("CONEXION 1 OK",SQLCA.SQLERRTEXT)
Else
MESSAGEBOX("ERROR",SQLCA.SQLERRTEXT)
End If
//open(w1)
Transaction SQLCB
// Profile ADMISION
SQLCB = Create Transaction
SQLCB.DBMS = "MSS Microsoft SQL Server"
SQLCB.Database = "admision_bk"
SQLCB.ServerName = "."
SQLCB.LogId = "SA"
SQLCB.AutoCommit = False
SQLCB.DBParm = ""
CONNECT USING SQLCB;
if SQLCB.SQLCODE=0 then
MESSAGEBOX("CONEXION 2 OK",SQLCB.SQLERRTEXT)
open(w1)
Else
MESSAGEBOX("ERROR",SQLCB.SQLERRTEXT)
End If
ahora quiero hacer una consulta y no me funciona o como puedo hace este es el ejemplo
if keydown(keyenter!) then
string yy
string yy1
string yy2
select XAPELLIDOP,XAPELLIDOM,XAPELLIDON into: yy,:yy1,:yy2 from historias where CHCL=:sle_1.text;// using sqlcb;
sle_4.text=yy
sle_3.text=yy1
sle_2.text=yy2
else
end if
pero si hago la consulta con la conexxion sqlca si funciona y no con la conexxion del sqlcb
si pudieran ayudarme te lo agredeceria mucho es para mi tesis
ya tengo las dos conecciones salen ok esta es
y ahora como puedo hacer para hacer que ni consulta funcione el ejemplo esta abajo ojala me puedan ayudar
// Profile ADMISION
// Profile EMPRESA
SQLCA = Create Transaction
SQLCA.DBMS = "MSS Microsoft SQL Server"
SQLCA.Database = "empresa"
SQLCA.ServerName = "."
SQLCA.LogId = "SA"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
CONNECT USING SQLCA;
if SQLCA.SQLCODE=0 then
MESSAGEBOX("CONEXION 1 OK",SQLCA.SQLERRTEXT)
Else
MESSAGEBOX("ERROR",SQLCA.SQLERRTEXT)
End If
//open(w1)
Transaction SQLCB
// Profile ADMISION
SQLCB = Create Transaction
SQLCB.DBMS = "MSS Microsoft SQL Server"
SQLCB.Database = "admision_bk"
SQLCB.ServerName = "."
SQLCB.LogId = "SA"
SQLCB.AutoCommit = False
SQLCB.DBParm = ""
CONNECT USING SQLCB;
if SQLCB.SQLCODE=0 then
MESSAGEBOX("CONEXION 2 OK",SQLCB.SQLERRTEXT)
open(w1)
Else
MESSAGEBOX("ERROR",SQLCB.SQLERRTEXT)
End If
ahora quiero hacer una consulta y no me funciona o como puedo hace este es el ejemplo
if keydown(keyenter!) then
string yy
string yy1
string yy2
select XAPELLIDOP,XAPELLIDOM,XAPELLIDON into: yy,:yy1,:yy2 from historias where CHCL=:sle_1.text;// using sqlcb;
sle_4.text=yy
sle_3.text=yy1
sle_2.text=yy2
else
end if
pero si hago la consulta con la conexxion sqlca si funciona y no con la conexxion del sqlcb
si pudieran ayudarme te lo agredeceria mucho es para mi tesis
Valora esta pregunta
0