No puedo crear tablas ( DbCreate )

Post Reply
VitalJavier
Posts: 188
Joined: Mon Jun 10, 2013 6:40 pm

No puedo crear tablas ( DbCreate )

Post by VitalJavier »

Que tal, buenas tardes
Tengo este problema
Si mi ruta para accesar a mis tablas es: "\\server\sistema\"
y quiero crear un archivo temporal
en la maquina local (misma ruta donde esta el exe)
no me lo crea, alguien ya le paso eso.

Code: Select all

        cMi_ := DiskName()+":"+CurDir()
        IF !Empty(CurDir())
            cMi_ := DiskName()+":\"+CurDir()    
        ENDIF   
        cMi_ := cMi_+"\TEMPORAL"
        IF !FILE( cMi_ )
            lMkDir(cMi_)
        ENDIF
        cCreate := cMi_+"\"+cCrea
        IF !dbCreate( cCreate, aTempora, DbSetDriver())
           ?"No se pudo crear el archivo temporal local..."
           RETURN ""
       ENDIF
Pero si mi ruta es sobre una unidad de red ( w:\ )
y el exe se ejecuta desde esta unidad
entonces si crea el temporal.

Alguien podria darme un tip de como hacerlo.

Gracias.
VitalJavier
Posts: 188
Joined: Mon Jun 10, 2013 6:40 pm

Re: No puedo crear tablas ( DbCreate )

Post by VitalJavier »

ADSConnect // ADS
Se puede tener 2 conecciones ?
y como abro las tablas ?
VitalJavier
Posts: 188
Joined: Mon Jun 10, 2013 6:40 pm

Re: No puedo crear tablas ( DbCreate )

Post by VitalJavier »

Solamente teniendo 2 conecciones

una al servidor "\\server\sistema\
y otra a la pc local "c:\sistema\temporal"

asi pude crear y abrir el temporal.
User avatar
Rick Lipkin
Posts: 2397
Joined: Fri Oct 07, 2005 1:50 pm
Location: Columbia, South Carolina USA

Re: No puedo crear tablas ( DbCreate )

Post by Rick Lipkin »

Vita

Consider these suggestions ...

Rick Lipkin

Code: Select all

cLOCATION := GetEnv( "TEMP" )                          \\ c:\users\rick lipkin\appdata\local\temp

cLocation := GetEnv( "SYSTEMROOT" )+"\Temp"      \\ c:\Windows\Temp

Location of Executable .. returns unc or logical drive

// where .exe started from is default directory //
cFILE := GetModuleFileName( GetInstance() )

nSTART := RAT( "\", cFILE )
cDEFA  := SUBSTR(cFILE,1,nSTART-1)

SET DEFA to ( cDEFA ) 

Post Reply