Copiar archivo al escritorio

Post Reply
User avatar
RodolfoRBG
Posts: 257
Joined: Tue May 16, 2006 4:46 pm
Location: San Luis Potosi, SLP, Mexico
Contact:

Copiar archivo al escritorio

Post by RodolfoRBG »

Alguien sabe como copiar desde mi aplicacion un archivo al escritorio de windows sin importar el idioma o la version de windows?

O en otras palabras, como obtengo la ruta del escritorio de cualquier maquina?

Salu2 y gracias
RodolfoRBG
FWH 1307, xHarbour123 BCC582
rodolfoerbg@gmail.com
hgarcia
Posts: 33
Joined: Thu Aug 10, 2006 12:23 pm
Location: México D.F
Contact:

Re: Copiar archivo al escritorio

Post by hgarcia »

Hola Rodolfo:

No es tan fácil ya que el escritorio depende del usuario que ingrese a la computadora y creo que también depende del idioma de tu windows ypopr si fuera poco también de la unidad donde se instaló el SO, así las cosas

para Windows XP y suponiendo que estuviera en español y en la unidad C la ruta es:

"c:\documents and settings\%username%\escritorio"

para win 7 y vista
"C:\users\%username%\desktop"

al parecer en las nuevas versiones no importa el idioma que hayas instalado


Saludos y espero sea de utilidad
Héctor García
México, D.F.
User avatar
andresreyes_mzt
Posts: 71
Joined: Fri Jan 11, 2008 6:55 am
Location: Mexico
Contact:

Re: Copiar archivo al escritorio

Post by andresreyes_mzt »

Rodolfo,

Encontre la siguiente informacion esta en ingles pero es facil de comprender,

http://msdn.microsoft.com/en-us/library/bb762181(VS.85).aspx

Saludos,
Andres Reyes
{{{ ---- xharbour + Borland C --- }}}
User avatar
acuellar
Posts: 1645
Joined: Tue Oct 28, 2008 6:26 pm
Location: Santa Cruz-Bolivia

Re: Copiar archivo al escritorio

Post by acuellar »

Rodolfo

Intenta asi:

Code: Select all | Expand


   cUsuario:= GetEnv( "USERPROFILE" )
    If Left(cUsuario,8)="C:\Users"  
            cEscritorio:=cUsuario+"\desktop\ARCHIVO.XYZ"
    Else
          cEscritorio:=cUsuario+"\escritorio\ARCHIVO.XYZ"
    Endif

   COPY FILE C:\SISTEMAS\ARCHIVO.XYZ TO (cEscritorio)

 


Saludos,

Adhemar
Saludos,

Adhemar C.
User avatar
Carles
Posts: 1149
Joined: Fri Feb 10, 2006 2:34 pm
Location: Barcelona
Been thanked: 6 times
Contact:

Re: Copiar archivo al escritorio

Post by Carles »

Salutacions, saludos, regards

"...programar es fácil, hacer programas es difícil..."

UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
Skype -> https://join.skype.com/cnzQg3Kr1dnk
Post Reply