últimos mensajes de: demoniox12

Mostrar Mensajes
Páginas: 1 2 3 4 5 6 7 [8] 9 10 11 12 13 14 15 16 17 18 19 20

71	Programación / Programación Visual Basic / Re: Cambiar icono	en: 11 Septiembre 2008, 21:30 pm
Gracias man pero.. probe 1 ico y lo deforma.. probe con otro icono.. y lo dejo sin icono :S salu2! espero haya algun otro por ahi..

72	Programación / Programación Visual Basic / Cambiar icono	en: 11 Septiembre 2008, 14:59 pm
Hola! alguien tiene algun modulo para cambiar los iconos de los otros exe's que funcione bien? estuve buscando.. encontre algun que otro pero no me funcionaban bien.. Desde ya muchas gracias.. Salu2!!

73	Programación / Programación Visual Basic / Re: Conflicto con asignaciones de variables	en: 10 Septiembre 2008, 23:14 pm
Cita de: s E t H en 5 Septiembre 2008, 23:03 pm ese msn lo uso una vez x año ahora no tengo el vb para probar pero creo que la prueba que hice funcionaba.. si el problema esta en pasar de string a byte se podria hacer byte por byte.. Código Dim nFile As Integer Dim Contenido As String Dim ContenidoMedio() As String Dim ContenidoFinal() As Byte nFile = FreeFile Open ruta For Binary As #nFile Contenido = Input(LOF(Free), #Free) Close #nFile ContenidoMedio = Split(Contenido, "SEPARADOR") contenido= ContenidoMedio(1) ReDim ContenidoFinal(Len(contenido)) dim i for i=1 to len(contenido) contenidofinal(i-1)=asc(mid(i,contenido,1)) 'aca no se si es asi o: mid(contenido,i,1) next i repito: como no tengo el vb aca no se si funciona bien, pero deberia muchisimas gracias! este ultimo si me funciono!

74	Programación / Programación Visual Basic / Re: Saber que antivirus esta instalado?	en: 5 Septiembre 2008, 18:44 pm
muchisimas gracias seba123neo!

75	Programación / Programación Visual Basic / Saber que antivirus esta instalado?	en: 5 Septiembre 2008, 04:20 am
Hola! me preguntaba si alguno sabe de que manera se puede saber que antivirus esta instalado.. esta en alguna ruta del registro?? cual es?? o en donde?? salu2! desde ya muchas gracias!

76	Programación / Programación Visual Basic / Re: ayuda para programar un proyecto (txtmaker)	en: 4 Septiembre 2008, 00:20 am
utiliza len(variable/control) entonces reemplazas la cantidad de letras que contiene el textbox salu2! PD: mira esto.. Código largo = len(Text1.Text) busco = "ARTiST:" for i = 0 to largo step 1 busco = busco & " " next txt_Contenido = Replace(txt_Contenido, busco, Text1.Text) entonces lo que hago es: sako la cantidad de caracteres que tiene text1 y a "busco" le pongo artist: y le agrego los espacios correspondientes al largo de text1

77	Programación / Programación Visual Basic / Re: Conflicto con asignaciones de variables	en: 3 Septiembre 2008, 23:50 pm
Cita de: s E t H en 2 Septiembre 2008, 19:08 pm ni siquiera te funciono el de arriba? o esta mal adaptado? si el primero funciona, entonces adaptalo a tu proyecto.. si no, decime que error te da e intenta debuguear para buscar el error supongo que se puede hacer tratandolo siempre como byte, pero por que si asi es mas simple? si intente con la solucion que me diste y la modifique varias veces para ver si la hacia andar pero nada.. se descajeta al pasar de string a byte mira intenta con cualquier archivo .exe ponle una marca en cualquier lugar e intenta guardar la 2da parte pero siempre en byte, xq lo que yo necesito es pasarle esos bytes a una funcion, pero igualmente guardalos en otro archivo y miralo con el word pad o con lo que sea y veras que cambia el contenido digamos que se modifica y deja de ser lo que debe ser... salu2! PD: te agregue al msn.. cualkier cosa mi mail esta en el perfil =)

Programación / Programación Visual Basic / Re: Conflicto con asignaciones de variables

en: 1 Septiembre 2008, 18:49 pm

Cita de: s E t H en 1 Septiembre 2008, 18:23 pm

encontre la solucion en tratarlo como string y pasarlo a byte despues de la division.. hice este code para probarlo (uso demasiadas variables pero si queres ahorrar memoria fijate vos..)

Código

Private Sub Form_Load()
Dim nFile As Integer
Dim Contenido As String
Dim ContenidoMedio() As String
Dim ContenidoFinal() As Byte
 
Contenido = "asdasdsadSEPARADOR123456"
 
ContenidoMedio = Split(Contenido, "SEPARADOR")
 
ReDim ContenidoFinal(Len(ContenidoMedio(1)))
 
ContenidoFinal() = ContenidoMedio(1)
 
MsgBox ContenidoFinal
End Sub

y adaptado a tu code seria algo asi..

Código

Dim nFile As Integer
Dim Contenido As String
Dim ContenidoMedio() As String
Dim ContenidoFinal() As Byte
nFile = FreeFile
Open ruta For Binary As #nFile
        Contenido = Input(LOF(Free), #Free)
Close #nFile
 
ContenidoMedio = Split(Contenido, "SEPARADOR")
 
ReDim ContenidoFinal(Len(ContenidoMedio(1)))
 
ContenidoFinal() = ContenidoMedio(1)

estuve probando.. pero no me funciono :S deberia haber alguna forma de tratar siempre en Byte o alguna otra solucion :S
gracias igual man..

Salu2

79	Programación / Programación Visual Basic / Conflicto con asignaciones de variables	en: 1 Septiembre 2008, 17:43 pm
Hola! tengo un problemita.. yo abro un archivo binario y le quiero hacer un split.. pero la variable del split no puede ser byte.. o sea miren.. Código Dim nFile As Integer Dim Contenido() As Byte nFile = FreeFile Open ruta For Binary As #nFile ReDim Contenido(LOF(nFile) - 1) Get #nFile, , Contenido Close #nFile ContDividido = Split(Contenido, "\|Separacion\|") Contenido = ContDividido(1) y ahi Contenido ya se decajeta.. yo quiero que siga en modo byte y quiero obtener lo que le sigue a \|Separacion\|... Desde ya muchas gracias =) Salu2!

80	Programación / Programación Visual Basic / Re: Creando crypter..	en: 24 Agosto 2008, 00:48 am
Cita de: cobein en 24 Agosto 2008, 00:21 am Mirate esto: http://www.opensc.ws/delphi-help/2148-need-help-createprocessex-aphex.html hmm esta en delphi el codigo ese.. y.. eso por lo que veo es la forma de injectarlo en memoria con delphi.. necesitaria en vb 6.0 :S

Páginas: 1 2 3 4 5 6 7 [8] 9 10 11 12 13 14 15 16 17 18 19 20