Interrogante

28/07/2004 - 22:35 por Carlos Andres | Informe spam
Agradezco a las personas que me ayudaron con el form de
login, no se si deba escribir los nombres pero se que
ellos saben.

Mi interrogante es al crear el archivo con STRTOFILE hay
alguna forma que por VFP se le pueda poner ese archivo
como solo lectura y oculto?

Agradezco la ayuda que me puedan brindar.

Preguntas similare

Leer las respuestas

#1 Alex Feldstein
29/07/2004 - 00:37 | Informe spam
On Wed, 28 Jul 2004 13:35:44 -0700, "Carlos Andres"
wrote:

Agradezco a las personas que me ayudaron con el form de
login, no se si deba escribir los nombres pero se que
ellos saben.

Mi interrogante es al crear el archivo con STRTOFILE hay
alguna forma que por VFP se le pueda poner ese archivo
como solo lectura y oculto?



Para cambiar los atributos del archivo en Windows tienes varias
formas. Aqui tienes una, usando WSH:

#define READONLY 1
#define HIDDEN 2
#define SYSTEM 4
#define ARCHIVE 32
oFSO = CreateObject("Scripting.FileSystemObject")
oFile = oFSO.GetFile("c:\dummy.txt")
oFile.Attributes = READONLY



Alex Feldstein
________________________________
Microsoft Visual FoxPro MVP
Please respond in the public groups so that everybody
can benefit from the exchange.
Favor de responder en los foros públicos asi todos se benefician.
(Address scrambled with ROT-13)
Respuesta Responder a este mensaje
#2 Carlos Andres
29/07/2004 - 01:11 | Informe spam
Muchas Gracias Alex me sirvio mucho!!!

On Wed, 28 Jul 2004 13:35:44 -0700, "Carlos Andres"
wrote:

Agradezco a las personas que me ayudaron con el form de
login, no se si deba escribir los nombres pero se que
ellos saben.

Mi interrogante es al crear el archivo con STRTOFILE




hay
alguna forma que por VFP se le pueda poner ese archivo
como solo lectura y oculto?



Para cambiar los atributos del archivo en Windows tienes


varias
formas. Aqui tienes una, usando WSH:

#define READONLY 1
#define HIDDEN 2
#define SYSTEM 4
#define ARCHIVE 32
oFSO = CreateObject("Scripting.FileSystemObject")
oFile = oFSO.GetFile("c:\dummy.txt")
oFile.Attributes = READONLY



Alex Feldstein
________________________________
Microsoft Visual FoxPro MVP
Please respond in the public groups so that everybody
can benefit from the exchange.
Favor de responder en los foros públicos asi todos se


benefician.
(Address scrambled with ROT-13)
.

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