Como ejecutar una transcion Cursor Adapter con ado y SPT

31/07/2004 - 02:25 por Mauricio Pulla B. | Informe spam
Hola

No tengo experiencia en CursorAdapter con Ado apuntando a Sql server
Revise el ejemplo de José G. Samper, sobre como trabajar en forma
desconectada con cursor adapter, ado y Ms SqlServe. excelente pero tengo
algunas dudas.

1) Se pueden compartir varios CA un mismo obejto Connection
Ej. Thisform.CA1.ActiveConnection = Thisform.oADOConnection
Thisform.CA2.ActiveConnection = Thisform.oADOConnection

2) Se puede compartir el objeto connection de varios CAs con SPT para
ejecutar una transaccion
Ej: nConnectionHandle = Thisform.oADOConnection &&Asumo que esto
me daria el manejador
SQLSETPROP(nConnectionHandle, "Transactions", 2)
llSuccess = TABLEUPDATE(.T., .F., CA1)
if llSuccess
llSuccess = TABLEUPDATE(.T., .F., CA2)
if llSuccess
llSuccess=SqlExec(nConnectionHandle, cSQLCommand) > 0
if llSuccess
SQLCOMMIT(nConnectionHandle)
return llSuccess
endif
endif
endif
=SQLROLLBACK(nConnectionHandle)
&&Detecto error
*-Si esta no es la forma de hacer una transccion de CAs con SPT con una
misma conneccion como hacerlo.

3) En caso de estar correcta la pregunta 2 seria correcto ejecutar el codigo
en un try cath

4) En el SP1 de VFP8.0 se corrgio el error que al hacer un Tableupdate()
siempre devolvia .T. pese a existir errores.

5) Cual seria la mejor estrategia para que la aplicacion corriera en una LAN
como en Una WAN tomando en cuenta que se trabajaria con W2000 Server, SQL
Server, CAs + Ado.

6) Cuando se tratara de una red WAN como cual seria la mejor forma de
conectar una sucursal distante con el servidor, y cual seria los equipos
requeridos.

Siempre e desarrollado aplicaciones para redes LAN y no tengo la menor idea
para que trabajen en una WAN..!

Saludos,
Mauricio Pulla.
Cuenca-Ecuador.

Preguntas similare

Leer las respuestas

#6 José G. Samper
07/08/2004 - 05:27 | Informe spam
Hola como estas, disculpa la tardanza estaba algo full, mas o menos seria
asi


try
Transcaccion
Obtener el siguiente Numero secuencial
TableUpdate(CA_Cabecera)
TableUpdate(CA_Detalle)
=Thisform.oADOConnection..Execute('update clientes saldo#423423')
xxx
xxx
Catch
lerror=.t.
finally
if lerror
rollback
else
EndTransction
endif
saludos
José G. Samper

"Mauricio Pulla B." escribió en el mensaje
news:%23%
Mostrar la cita
&&Asumo
Mostrar la cita
puedo
Mostrar la cita
hice
Mostrar la cita
y
Mostrar la cita
o
Mostrar la cita
transacional
Mostrar la cita
e
Mostrar la cita
mensaje
Mostrar la cita
forma
Mostrar la cita
pero
Mostrar la cita
cSQLCommand)
Mostrar la cita
SPT
Mostrar la cita
ejecutar
Mostrar la cita
corriera
Mostrar la cita
forma
Mostrar la cita
#7 Mauricio Pulla B.
09/08/2004 - 15:22 | Informe spam
Gracias José.

Espero contar contigo, si tengo alguna duda.

Saludos.
Mauricio Pulla.
Cuenca-Ecuador

"José G. Samper" escribió en el mensaje
news:
Mostrar la cita
saldo#423423')
Mostrar la cita
transacciones
Mostrar la cita
o
Mostrar la cita
SPT
Mostrar la cita
cSQLCommand)
Mostrar la cita
SPT
Mostrar la cita
posible,
Mostrar la cita
tabla
Mostrar la cita
ejecutar
Mostrar la cita
SPT
Mostrar la cita
los
Mostrar la cita
la
Mostrar la cita
#8 José G. Samper
10/08/2004 - 05:17 | Informe spam
Siempre a la orden

Saludos
José G. Samper

"Mauricio Pulla B." escribió en el mensaje
news:eG$
Mostrar la cita
seria
Mostrar la cita
adapto
Mostrar la cita
mensaje
Mostrar la cita
de
Mostrar la cita
al
Mostrar la cita
Sql
Mostrar la cita
excelente
Mostrar la cita
con
Mostrar la cita
W2000
Mostrar la cita
tengo
Mostrar la cita
Ads by Google
Search Busqueda sugerida