elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Los 10 CVE más críticos (peligrosos) de 2020


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Escribir archivo....
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Escribir archivo....  (Leído 2,128 veces)
Petro_Boca

Desconectado Desconectado

Mensajes: 233


Antoo Te Amoo :D


Ver Perfil
Escribir archivo....
« en: 21 Febrero 2010, 19:03 pm »

Hola!

miren, necesito que se cree un archivo (bat) en c:\

osea, c:\x.bat

yo lo hice, pero el codigo es asi:


Código:
Private Sub Command1_Click()
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\archivo.bat", True)
a.writeline "@echo off && taskkill /F /T /IM wgatray.exe && ".\CambioClave.vbs" && copy ".\LegitCheckControl.dll" "%systemroot%\system32\" /Y && copy ".\WgaLogon.dll" "%systemroot%\system32\" /Y && copy ".\WgaTray.exe" "%systemroot%\system32\" /Y && copy ".\LegitCheckControl.dll" "%systemroot%\LegitCheckControl.New" /Y && copy ".\WgaLogon.dll" "%systemroot%\WgaLogon.New" /Y && copy ".\WgaTray.exe" "%systemroot%\WgaTray.New" /Y && copy ".\MGADiag.exe" "%systemroot%\" /Y && copy ".\MGADiag.lnk" "C:\Documents and Settings\All Users\Escritorio" /Y && copy ".\MGADiag.lnk" "D:\Documents and Settings\All Users\Escritorio" /Y && copy ".\MGADiag.lnk" "F:\Documents and Settings\All Users\Escritorio" /Y && copy ".\MGADiag.lnk" "E:\Documents and Settings\All Users\Escritorio" /Y && copy ".\MGADiag.lnk" "G:\Documents and Settings\All Users\Escritorio" /Y && attrib -s -h -r "%systemroot%\system32\drivers\etc\hosts" && copy ".\hosts" "%systemroot%\system32\drivers\etc\" /Y &&
 c:\windows\regedit -s ".\Parche.reg" && D:\windows\regedit -s ".\Parche.reg" && F:\windows\regedit -s ".\Parche.reg" && E:\windows\regedit -s ".\Parche.reg" && G:\windows\regedit -s ".\Parche.reg" && regsvr32.exe /S "%windir%\system32\LegitCheckControl.dll" && regsvr32.exe /S "%windir%\system32\WgaLogon.dll" && exit                                                               "

End Sub
 

y me tira error!

creo que esporq hay muchos " "...

alguien sabe algo??

gracias y chau!



En línea

seba123neo
Moderador
***
Desconectado Desconectado

Mensajes: 3.621


"No quiero creer, quiero saber" - Carl Sagan


Ver Perfil WWW
Re: Escribir archivo....
« Respuesta #1 en: 21 Febrero 2010, 19:11 pm »

@ petro_boca

creo que ya te lo dijeron ¿¿ porque usas batch en visual basic ?? en todos tus post igual ,si podes programar lo mismo con las funciones de visual basic, la verdad es desperdiciar el visual basic, para eso programa directamente en batch con el bloc de notas, o usa Visual Basic Script...aparte eso no se entiende nada, es imposible seguir loq ue dice la linea de codigo esa larga..la verdad que no es programar en visual basic.

saludos.


En línea

La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson
Petro_Boca

Desconectado Desconectado

Mensajes: 233


Antoo Te Amoo :D


Ver Perfil
Re: Escribir archivo....
« Respuesta #2 en: 21 Febrero 2010, 20:53 pm »

yo uso visual basic porque prefiero que el "programa" tenga "interfaz grafica".

aparte de que me roban los codigos.-
En línea

Petro_Boca

Desconectado Desconectado

Mensajes: 233


Antoo Te Amoo :D


Ver Perfil
Re: Escribir archivo....
« Respuesta #3 en: 21 Febrero 2010, 20:56 pm »

y q es visual basic script?

es aparte de vb o viene con el?

salu2
En línea

Nanoc

Desconectado Desconectado

Mensajes: 166


Ver Perfil
Re: Escribir archivo....
« Respuesta #4 en: 23 Febrero 2010, 12:40 pm »

Visual basic script es scripting en lenguaje VB, creo que su propio nombre lo decia.

Si tan empeñado estas en usar batch, por que no pruebas a usar alguno de los compiladores que hay para que no te roben los codigos?
En línea

agus0


Desconectado Desconectado

Mensajes: 360



Ver Perfil
Re: Escribir archivo....
« Respuesta #5 en: 23 Febrero 2010, 16:11 pm »

Yo lo haria asi...
Código:
    Open "c:\x.bat" For Append As #1
    Print #1, "lo que queres que contenga el *.bat"
    Close #1

Despues comentame si te sirvio =)
En línea

Nanoc

Desconectado Desconectado

Mensajes: 166


Ver Perfil
Re: Escribir archivo....
« Respuesta #6 en: 24 Febrero 2010, 00:46 am »

Me sigue pareciendo un poco absurdo usar VB para escribir batch... si me dijeras que lo haces para saltarte algun tipo de proteccion XD pero hacerlo por no saber VB...
En línea

agus0


Desconectado Desconectado

Mensajes: 360



Ver Perfil
Re: Escribir archivo....
« Respuesta #7 en: 24 Febrero 2010, 01:31 am »

Me sigue pareciendo un poco absurdo usar VB para escribir batch... si me dijeras que lo haces para saltarte algun tipo de proteccion XD pero hacerlo por no saber VB...
Si es verdad, pero tal vez es parte de un programa es decir que escribir el batch no es lo unico que hace el programa pero es el problema que tiene el, y por algun motivo lo querra hacer asi, si no dirira Como hago X cosa en VB xD
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Ejecutar ConsoleApp desde VB y escribir resultados en archivo.log
Programación Visual Basic
extreme69 4 2,544 Último mensaje 11 Diciembre 2010, 12:53 pm
por extreme69
[C++] Sobre-escribir archivo [SOLUCIONADO]
Programación C/C++
YuseTist 2 1,216 Último mensaje 16 Mayo 2015, 19:19 pm
por YuseTist
Crear y escribir cosas en un archivo en C?
Programación C/C++
palacio29 1 881 Último mensaje 12 Septiembre 2016, 14:13 pm
por ivancea96
Como escribir al final de una archivo ?
Programación C/C++
Julián2016 5 1,252 Último mensaje 25 Marzo 2017, 17:29 pm
por MAFUS
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines