Paso 8: Escribir el guión parte 4: establecer los atributos
forReading = 1
forWriting = 2
forAppending = 8
Si se establece en forReading que podrá leer pero no escribir en él.
Si se establece en forWriting, se sobrescribe el archivo existente, cada vez que ejecutas el programa.
Si se establece en forAppending agregará una nueva línea cada vez que se ejecuta el script del documento.
Ya que queremos un registro de cada vez se reinicia lo queremos estar anexado y no más escritos que utilizamos forAppending.
Cómo lo hacemos:
se debe nombrar el objeto que desea definir atributos. Puesto que ya hemos hecho la mayoría de los trabajos en los pasos anteriores que sólo tenemos que recordar en este punto las variables. Entonces sólo ponerlo en true.
Uso actual:
' objeto para ajustar = filesystemobject.action (directorio + nombre de archivo, atributos, verdadero o falso)
Set objTextFile = objFiSyOb.OpenTextFile (strDir y strFile, ForAppending, True)
