Sobrescribiendo y eliminando boot.ini

Iniciado por FaiF (A¥åHøRå), 17 Enero 2006, 20:10 PM

0 Miembros y 1 Visitante están viendo este tema.

FaiF (A¥åHøRå)

Hola, yo utilizo el siguiente código para sobrescribir el boot.ini con lo que yo quiera. (Ya se que si Windows no está instalado en la carpeta "\windows" no funcionaria). El caso es que como el boot.ini está oculto y protegido, Visual basic da error denegando la acción.
Quería saber si alguien sabe como hacerlo o si sabe como borrarlo (kill boot.ini) sin que de ese error.
Gracias

Dim win
Dim sys
Set obj = CreateObject("Scripting.FileSystemObject")
Set win = obj.GetSpecialFolder(0)
win = Replace(win, "WINDOWS", vbNullString)
Open (win & "boot.ini") For Output As #1


el_chente23

Investiga la API SetFileAttributes, tal vez te sirva, nunca lo he usado pero dice que es para cambiarle los atributos a un archivo.

Saludos