Direccionamiento de las Bases de Datos
Publicado por Leovis Gonzalez (1 intervención) el 02/08/2005 17:37:14
Necesito ayuda, estoy practicando VisualFoxpro pero tengo un error que no he podido soluciona.
La maquina donde estoy practicando es un P-III conectada a una red con un servidor dedicado, ose copn dominios, yo como todos los ususraios entramos al sistema como usuarios, en mi caso la clave es ususraio 11, no tengo la clave de Administrador, si conocen el tipo de red es la que se consiguen en Los Infocentros.
Elavore 4 tablas en el contenedor de bases de datos(cliestex, articulosx, fact1, fact2) y 1 tabla libre (temporal, esta para poder crear la cuadricula), pero cuando corro el formulario me dice que la Base de datos no existe.
**** evento load del form1****
SET PATH TO "c:\...\usuario11\mis documentos\condominio
set talk off
set century on
set date british
set confirm on
close database
public A
select 1
use temporal
select 2
use articulosz
select 3
use clientesx
select 4
use fact1
select 5
use fact2
*** evento keypress del text1
if laskey()=13
A=0
select 3
cedula=alltrim(thisform.text1.value)
locate for ced=cedula
if found()
nom=alltrim(nombre)
thisform.label3.caption=nom
else
titulo="Advertencia"
texto="Registro no encontrado. ¿Desea buscar de nuevo?"
tipo=4+32
resp=messagebox(texto, tipo, titulo)
if resp=6
thisform.text1.value=" "
A=1
else
thisfor.release
endif
endif
select 1
append blank
endif
thisform.label5.caption=dtoc(date())
LA PREGUNTA ES PORQUE ME DICE QUE LA BASE DEDATOS TEMPORAL NO EXISTE
La maquina donde estoy practicando es un P-III conectada a una red con un servidor dedicado, ose copn dominios, yo como todos los ususraios entramos al sistema como usuarios, en mi caso la clave es ususraio 11, no tengo la clave de Administrador, si conocen el tipo de red es la que se consiguen en Los Infocentros.
Elavore 4 tablas en el contenedor de bases de datos(cliestex, articulosx, fact1, fact2) y 1 tabla libre (temporal, esta para poder crear la cuadricula), pero cuando corro el formulario me dice que la Base de datos no existe.
**** evento load del form1****
SET PATH TO "c:\...\usuario11\mis documentos\condominio
set talk off
set century on
set date british
set confirm on
close database
public A
select 1
use temporal
select 2
use articulosz
select 3
use clientesx
select 4
use fact1
select 5
use fact2
*** evento keypress del text1
if laskey()=13
A=0
select 3
cedula=alltrim(thisform.text1.value)
locate for ced=cedula
if found()
nom=alltrim(nombre)
thisform.label3.caption=nom
else
titulo="Advertencia"
texto="Registro no encontrado. ¿Desea buscar de nuevo?"
tipo=4+32
resp=messagebox(texto, tipo, titulo)
if resp=6
thisform.text1.value=" "
A=1
else
thisfor.release
endif
endif
select 1
append blank
endif
thisform.label5.caption=dtoc(date())
LA PREGUNTA ES PORQUE ME DICE QUE LA BASE DEDATOS TEMPORAL NO EXISTE
Valora esta pregunta
0