Mensajes

Para ti y cualquier programador humano Existen PoC sobre infecciones de BIOS... el problema es que cada BIOS es un mundo... y tiene que programarse específicamente para la elegida. No existe ninguna forma genérica para hacer esto (Al menos no una pública y documentada )

Y que estás esperando para darnos material de lectura?

Te juro que busco en google y no encuentro nada relevante, o sea, encuentro puras soluciones a virus especificos pero no encuentro nada relacionado al dark side del asunto.

Perdonen mi ignorancia, pero más que flashear un bios o hacer overclocking jamás experimente mayor experiencia con estos, ¿en que lenguaje están programados? ¿assembler o que? y más importante aún, el software para flashear la bios ¿en que lenguaje está programado? ¿hay códigos de ejemplo de esto?

El objetivo no es en realidad para un virus, sino para un programa que estoy haciendo en el que necesito que no importa si se formatea el equipo siempre se ejecute el programa al inicio de windows, en realidad ni windows necesito, con un cmd soy más que felíz.

No sé, pensaba en algo como el MBR del disco, o no sé... alguna idea o estoy divagando demasiado?

Bueno, lo terminé haciendo chequeando el filesize.

Usé un código que encontré acá:

http://www.computing.net/answers/programming/closing-an-application-in-vb6/7174.html

Y lo modifiqué para que haga lo que quiero guardando el último tamaño del archivo en un .txt y luego cada X segundos comparo el filesize con el contenido del .txt y si son iguales es porke terminó de crearse el archivo ^^

Saludos y muchas gracias!

No lo puedo hacer con el proceso porque justamente tengo que saber cuando terminó de crearse el archivo para cerrar la aplicación que lo crea.

Raúl, no me está funcionando, tampoco entiendo mucho que hace el code, y ahora q lo pienso voy a tener que usar un timer de todas formas, quizás medir y comparar el tamaño sea lo más fácil en resumidas cuentas, o se te ocurre el motivo por el cual no me está funcionando?

Quizás estoy haciendo algo mal yo.

Código [Seleccionar] Expandir


Private Sub Form_Load()
ArchivoEnUso ("D:\AAAAA - Clientes\final_comp_29.avi")
EndSub

Private Declare Function CreateFile Lib "kernel32" Alias _
   "CreateFileA" (ByVal lpFileName As String, _
   ByVal dwDesiredAccess As Long, _
   ByVal dwShareMode As Long, _
   ByVal lpSecurityAttributes As Long, _
   ByVal dwCreationDisposition As Long, _
   ByVal dwFlagsAndAttributes As Long, _
   ByVal hTemplateFile As Long) As Long

Private Declare Function CloseHandle Lib "kernel32" _
   (ByVal hObject As Long) As Long

Private Const FILE_SHARE_READ = &H1
Private Const FILE_SHARE_WRITE = &H2
Private Const OPEN_EXISTING = &H3
Private Const GENERIC_WRITE = &H40000000
Private Const INVALID_HANDLE_VALUE = -1


Public Function ArchivoEnUso(ByVal sFileName As String) As Boolean

   Dim hFile As Long

   On Error GoTo ExitGetFileInfo

   ' Obtenemos el manipulador del archivo. Para ello indicamos
   ' que vamos a permitir el acceso de lectura
   hFile = CreateFile(sFileName, GENERIC_WRITE, _
       FILE_SHARE_READ Or FILE_SHARE_WRITE, ByVal 0&, OPEN_EXISTING, 0&, 0&)

   ' Si hay un error es porque el archivo está siendo utilizado
   If hFile = INVALID_HANDLE_VALUE Then
       ArchivoEnUso = True
   End If

   If ArchivoEnUso = True Then
   MsgBox "Está en uso"
   Else
   MsgBox "NO está en uso"
   End If

ExitGetFileInfo:
   ' Cerramos el manipulador del archivo
   hFile = CloseHandle(hFile)
End Function

No uses un botón, usá una imagen con la propiedad BorderStyle 0, le hacés 2 clicks a la imagen y escribis el código q iba dentro del botón.

Private Sub Picture1_Click()

msgbox "funciona"

End Sub

Hola, sigo con mi proyecto y tengo más y más inconvenientes a cada rato.

Tengo que detectar si un archivo está en uso, y detallo...

El archivo es generado lentamente por otra aplicacion, este archivo puede llegar a pesar 10gb y tengo que detectar lo antes posible sin generar conflictos cuando terminó de generarse.

A lo bestia, se me ocurrió usar un timer y chequear el peso del archivo cada X segundos, si no cambia de tamaño en X tiempo entonces sigue con las tareas, pero esto no me resulta práctico, me consume muchos recursos y no me convence para nada la idea de usar un timer durante 10 o más minutos.

Googleando alguna alternativa, me encontré con un código en bigresource q postió un tal "plenderj".

Código [Seleccionar] Expandir

Private Function isFileLocked(ByVal strFilePath As String) As Boolean
   On Error GoTo errHandle
   isFileLocked = False
   Open strFilePath For Binary Access Read Write Lock Read Write As #1
       
   Close #1
   Exit Function
errHandle:
   isFileLocked = True
msgbox "Está siendo usado por otra aplicación"
End Function

Le agrego un msgbox para ver q me devuelve, se lo agrego debajo de "isFileLocked = True" de manera que si el archivo está ocupado me lo diga, pero me dice que está ocupado incluso cuando no lo está :S

Sugerencias?

Los adoro! ^^

Pensar que hace unos meses no sabía setear una variable en vb, y ahora no sabía sacar las líneas de un .txt ajajaj pero por lo menos hice cosas bastante/muy copadas, y siempre que me tranco con algo ustedes son mi última parada, pero es seguro obtener una respuesta acertada con gente como ustedes.

Gracias por existir y compartir conocimientos, realmente es apreciado.

Ni se imaginan lo que está programando este script kiddie ^^

Hay algún subforo de javascript?

.
while lineas<3 and Not EOF(1)

Dulces Lunas!¡.

Hola black, gracias pero el texto va a tener siempre al menos 3 lineas, no sería innecesario poner el and Not EOF(1) ?

Ya lo tengo funcionando, pregunto de curioso nomás.

Gracias a ambos por la respuesta tan rápida

El código de Raúl funciona bien.

El de Elemental Code supongo que funciona también, sólo le cambié el while en vez de q sea hasta q se termine el texto que sea mientras lineas es menor a 3.

Código (vb) [Seleccionar] Expandir


Dim Cadenas() As String
Dim lineas As Long
       Open "C:\separar.txt" For Input As #1
           While lineas < 3
               ReDim Preserve Cadenas(lineas)
               Line Input #1, Cadenas(lineas)
               lineas = lineas + 1
           Wend
       Close #1

Como tomo la data de cada linea después? supongamos para hacerle un msgbox del valor de cada línea por separado, pregunto en el caso que propone elemental code.

edit: listo, funciona precioso.

MsgBox Cadenas(1)
MsgBox Cadenas(2)
MsgBox Cadenas(3)

Gracias elemental code, sin querer queriendo me quedó clarisimo el concepto de las arrays por primera vez

Tengo un archivo .txt que va cambiando la información cada X cantidad de segundos.

Tengo que guardar las primeras 3 lineas de texto por separado, cada linea de texto en una variable.

Algún ejemplo sería apreciado.