FiveTech Support Forums

Actualmente tengo funcionando una aplicación en una red. La aplicación se encuentra en el cliente y todos leen del servidor. Necesitaria abrir una ventana D.O.S. y poder cambiar la unidad y el directorio donde se encuentran los datos. He probado WinExec y si abre una ventana dos pero no se donde indicarle que lo abra en una unidad y carpeta específica. Alguien Sabe ???. desde ya muchas gracias !!

Talbéz:

drive:=curdrive()
directorio:=curdir()
msginfo(drive+":\"+diretorio)

Talbéz:

LOCAL cKomanda := ""

cKomanda := "command.com /c "+"NET USE "+sDisk+": "+"\"+ALLTRIM(sPat)+"\"+ALLTRIM(sName)+" /yes"
WinExec(cKomanda,0)

// Your code here

cKomanda := "command.com /c "+"NET USE "+sDisk+": "+"/DELETE /YES"
WinExec(cKomanda,0)

ó

cPathdbf = "c:\wineqa32\datos*.dbf "
cPathRun = "c:\respaldo\sistema\viernes "
cComando := "command.com /c c:\windows\system32\xcopy.exe " + cPathdbf + cPathRun + " / y >>Infor.log"
WaitRun(cComando, 0)

Gracias karinha por responder, probaré tus sugerencias. Saludos

Puedes usar la funcion dirchange devuelve 0 si cambio el directorio.

DirChange( cDirectorio )

Slds

Olvide,

Para cambiar la unidad actual usa la funcion diskchange

DiskChange()

Slds

Para terminar este hilo les comento que use la funcion ShellExecute() ya que con ella puedo cambiar unidad y directorios. Gracias a todos los que me respondieron