BOORRAR REGISTROS DBF

04/06/2004 - 18:23 por Ximena Machicao | Informe spam
hOLA:

AMIGOS Les cuento que me conecte a un archivo dbf y puedo insertar un
registro, pero antes de insertar quiero que se borre todo lo que hay en la
tabla, lo inente con el siguiente codigo pero me sigue pidiendo en la linea
de PACK que e archivo debe estar en modo exclusivo, pero donde mas lo
bloque? o como se hace? una ayudita por favor!!! se los ruego. Muchas
Gracias, Xime

set oConn=server.CreateObject("ADODB.Connection")
oConn.Open "Driver={Microsoft Visual FoxPro Driver};" & _
"SourceTypeÛF;" & _
"SourceDB=c:\Poliza\;" & _
"Exclusive=Yes"

oconn.execute "delete from poliza.dbf"
oconn.execute "PACK"

oconn.execute "INSERT INTO poliza.dbf VALUES('" & rstr.fields("num_cli") &
"','" & rstr.fields("cod_cli") & "'," & rstr.fields("pol_prim") & ",'" &
rstr.fields("pol_cod") & "')"

oconn.close

Preguntas similare

Leer las respuestas

#1 Franco Figún
04/06/2004 - 21:56 | Informe spam
Hola
No conozco DBF, pero sql es casi universal, y yo particularmente probaría
primero de hacer la primera consulta ya sea con un boton, o como sea, y
luego hacer el segundo query, en una pagina diferente, o un boton diferente,
o sino directamente te convendria hacer un store procedure que primero haga
un drop, y luego tome los parametros que le pases y haga el insert

FF
www.francofigun.com.ar
www.microsofties.com.ar
MSN:
UIN: 314408886
Yahoo MSN:
"Ximena Machicao" wrote in message
news:#
hOLA:

AMIGOS Les cuento que me conecte a un archivo dbf y puedo insertar un
registro, pero antes de insertar quiero que se borre todo lo que hay en la
tabla, lo inente con el siguiente codigo pero me sigue pidiendo en la


linea
de PACK que e archivo debe estar en modo exclusivo, pero donde mas lo
bloque? o como se hace? una ayudita por favor!!! se los ruego. Muchas
Gracias, Xime

set oConn=server.CreateObject("ADODB.Connection")
oConn.Open "Driver={Microsoft Visual FoxPro Driver};" & _
"SourceTypeÛF;" & _
"SourceDB=c:\Poliza\;" & _
"Exclusive=Yes"

oconn.execute "delete from poliza.dbf"
oconn.execute "PACK"

oconn.execute "INSERT INTO poliza.dbf VALUES('" & rstr.fields("num_cli") &
"','" & rstr.fields("cod_cli") & "'," & rstr.fields("pol_prim") & ",'" &
rstr.fields("pol_cod") & "')"

oconn.close


Respuesta Responder a este mensaje
#2 Ximena Machicao
04/06/2004 - 23:01 | Informe spam
Gracias Franco, pero lo que pasa es que mi archivo dbf que necesito llenar
ya estaba lleno por eso quiero que siempre borre antes de añadir algun
registro!!

saludos
Xime
"Franco Figún" wrote in message
news:
Hola
No conozco DBF, pero sql es casi universal, y yo particularmente probaría
primero de hacer la primera consulta ya sea con un boton, o como sea, y
luego hacer el segundo query, en una pagina diferente, o un boton


diferente,
o sino directamente te convendria hacer un store procedure que primero


haga
un drop, y luego tome los parametros que le pases y haga el insert

FF
www.francofigun.com.ar
www.microsofties.com.ar
MSN:
UIN: 314408886
Yahoo MSN:
"Ximena Machicao" wrote in message
news:#
> hOLA:
>
> AMIGOS Les cuento que me conecte a un archivo dbf y puedo insertar un
> registro, pero antes de insertar quiero que se borre todo lo que hay en


la
> tabla, lo inente con el siguiente codigo pero me sigue pidiendo en la
linea
> de PACK que e archivo debe estar en modo exclusivo, pero donde mas lo
> bloque? o como se hace? una ayudita por favor!!! se los ruego. Muchas
> Gracias, Xime
>
> set oConn=server.CreateObject("ADODB.Connection")
> oConn.Open "Driver={Microsoft Visual FoxPro Driver};" & _
> "SourceTypeÛF;" & _
> "SourceDB=c:\Poliza\;" & _
> "Exclusive=Yes"
>
> oconn.execute "delete from poliza.dbf"
> oconn.execute "PACK"
>
> oconn.execute "INSERT INTO poliza.dbf VALUES('" & rstr.fields("num_cli")


&
> "','" & rstr.fields("cod_cli") & "'," & rstr.fields("pol_prim") & ",'" &
> rstr.fields("pol_cod") & "')"
>
> oconn.close
>
>


Respuesta Responder a este mensaje
#3 Carlos Rojas
05/06/2004 - 08:14 | Informe spam
Hola yo trabajo ASP con tablas dbf y contenedor DBC, creo que deberias
eliminar la linea
oconn.execute "PACK"
y reemplazar:
oconn.execute "delete from poliza.dbf"
por :
oconn.execute "delete from poliza where .t."
para que borre todo, no es necesario el pack, prueba que un set
rsPrueba=con1.execute("select count(*) as cantidad from poliza ") te debe de
devolver 0 en rsPrueba("Cantidad")
fijate utilizando fox si logras borrarlos (poner marca para borrado) , si
pese a estar borrado los registros te los muestra en el select de prueba
pues tienes que ajustar tu cadena de conexion , yo por ahora he usado solo
el odbc para tablass dbf y ahi configuro que no tome a los borrados.

Saludos
Carlos Rojas
www.ProgramoTuWeb.Com

"Ximena Machicao" escribió en el mensaje
news:%
Gracias Franco, pero lo que pasa es que mi archivo dbf que necesito llenar
ya estaba lleno por eso quiero que siempre borre antes de añadir algun
registro!!

saludos
Xime
"Franco Figún" wrote in message
news:
> Hola
> No conozco DBF, pero sql es casi universal, y yo particularmente


probaría
> primero de hacer la primera consulta ya sea con un boton, o como sea, y
> luego hacer el segundo query, en una pagina diferente, o un boton
diferente,
> o sino directamente te convendria hacer un store procedure que primero
haga
> un drop, y luego tome los parametros que le pases y haga el insert
>
> FF
> www.francofigun.com.ar
> www.microsofties.com.ar
> MSN:
> UIN: 314408886
> Yahoo MSN:
> "Ximena Machicao" wrote in message
> news:#
> > hOLA:
> >
> > AMIGOS Les cuento que me conecte a un archivo dbf y puedo insertar un
> > registro, pero antes de insertar quiero que se borre todo lo que hay


en
la
> > tabla, lo inente con el siguiente codigo pero me sigue pidiendo en la
> linea
> > de PACK que e archivo debe estar en modo exclusivo, pero donde mas lo
> > bloque? o como se hace? una ayudita por favor!!! se los ruego. Muchas
> > Gracias, Xime
> >
> > set oConn=server.CreateObject("ADODB.Connection")
> > oConn.Open "Driver={Microsoft Visual FoxPro Driver};" & _
> > "SourceTypeÛF;" & _
> > "SourceDB=c:\Poliza\;" & _
> > "Exclusive=Yes"
> >
> > oconn.execute "delete from poliza.dbf"
> > oconn.execute "PACK"
> >
> > oconn.execute "INSERT INTO poliza.dbf VALUES('" &


rstr.fields("num_cli")
&
> > "','" & rstr.fields("cod_cli") & "'," & rstr.fields("pol_prim") & ",'"


&
> > rstr.fields("pol_cod") & "')"
> >
> > oconn.close
> >
> >
>
>


email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida