Mensajes

Usas muchos brushes en tus diseños..! o por lo menos eso demuestras...

Me explico mejor:

Si yo abro el archivo de forma binaria y le introduzco el codigo de un msgbox en vb al crearlo y ejecutarlo no lo hace... simplemente sale la linea de comandos y un error...

Hola esto es algo que nunca he entendido. y que creo que no podre explicar muy bien.. pero ahi voy a ver que tal :

He visto programas que encryptan... y yo quisiera hacer el mio ...

Pero lo que no entiendo es como modificar un exe desde vb para que se ejecuta a si mismo, para que mate procesos en fin para que tenga ciertas funciones...

Porque si abro un archivo.exe y coloco esto:

Código (vb) [Seleccionar] Expandir


Private sub Form_Load()
MsgBox "hola"
End Sub


Obviamente no lo va a ejecutar...

Tambien seria otra pregunta como se "traduce" (por decirlo de alguna manera) de VB a Exe o ejecutable (el llamado proceso de compilar)....

Salu2..!!

Hola hoy les enseñare a usar la funcion Environ

Por decirlo de alguna manera esta funcion nos facilitara algunas rutas o informaciones  mas comunes...

Código (vb) [Seleccionar] Expandir


Private sub Form_Load
MsgBox Environ("tmp")
End sub


Para usar esta funcion colocamos entre comillas algun texto preestablecido, no se como mas llamarle pero es algo asi...

Esa cadena de caracteres (tmp) nos devolvera la ruta de los Archivos Temporales:

C:\DOCUME~1\Eduardo\CONFIG~1\Temp

Eso en mi caso...

Y En WINDOWS obviamente

Aqui otras rutas o informaciones que podremos obtener con esta funcion:

ALLUSERSPROFILE:
C:\Documents and Settings\All Users

APPDATA:
C:\Documents and Settings\Eduardo\Datos de programa

CLIENTNAME:
Console

CommonProgramFiles:
C:\Archivos de programa\Archivos comunes

COMPUTERNAME:
COMPUTADOR

ComSpec:
C:\WINDOWS\system32\cmd.exe

FP_NO_HOST_CHECK:
NO

HOMEDRIVE:
C:

HOMEPATH:
\Documents and Settings\Eduardo

LOGONSERVER:
\\COMPUTADOR

NUMBER_OF_PROCESSORS:
1

OS:
Windows_NT

Path:
C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32
\Wbem;C:\Archivos de programa\Archivos comunes\Adobe\AGL;

PATHEXT:
.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH

PROCESSOR_ARCHITECTURE:
x86

PROCESSOR_IDENTIFIER:
x86 Family 15 Model 4 Stepping 9, GenuineIntel

PROCESSOR_LEVEL:
15

PROCESSOR_REVISION:
0409

ProgramFiles:
C:\Archivos de programa

PROMPT:
$P$G

SESSIONNAME:
Console

SystemDrive:
C:

SystemRoot:
C:\WINDOWS

TEMP:
C:\DOCUME~1\Eduardo\CONFIG~1\Temp

TMP:
C:\DOCUME~1\Eduardo\CONFIG~1\Temp

tvdumpflags:
8

USERDOMAIN:
COMPUTADOR

USERNAME:
Eduardo

USERPROFILE:
C:\Documents and Settings\Eduardo

windir:
C:\WINDOWS

WLNumDLLsProt:
0

Y eso es todo....

NOTAS:

-Siempre encerrar entre comillas
-No siempre encerrar entre parentesis
-Todos esos ejemplos son en mi caso, no se asusten si les sale diferente

Salu2.!!!

1- Las letras no se ven...

2- Esta muy cargado

3- Esta muy desordenado

4- Parece un juego...

eso es todo... Mejorao

Si a esto te refieres a mi me funciona estupendamente

Código [Seleccionar] Expandir


Public Function suma(v1 As Long, v2 As Long)
suma = v1 + v2
End Function
Private Sub Form_Load()
Text1.Text = suma(1, 2)
End Sub


Código [Seleccionar] Expandir


Private Sub Command1_Click()
Text2.Text = Replace(Text1.Text, "hola", "", , 1)
End Sub

El text1 contiene= "hola hola como como"

Y como veras al final de replace hay un 1 que quiere decir que remplazara el primero que encuentre...

PD: ¿Ves todo el code que tienes?

Yo pense lo mismo pero eso tira solamente 0...

Explicanos mas...!!

Aun no consigo nada sobre como convertir videos a ningun formato...