Mensajes

quizas sea el modulo de hoykeys, o el fusion, pero, ya pase el code, ahi esta todo lo que necesitais saber, ademas que lo podeis correr desde el interprete de vb, que funcionara

el fix, es el que esta fixeado con el fusion, ami el unfix no me da ningun problema desde novirusthanks

Aunque me es raro el porque me crashea el visualbasic al abrir el proyecto fuente.

P.D.: Igual abro de uno en uno cada elemento del proyecto para verlo

Dulces Lunas!¡.

hola a todo a asi como dice el asunto  como puedo tener los cambios que hago en la aplicacion que me muestre en una tabla de base de datos

si es ajeno con un hook... si es tuyo metes una función donde actué como lo de eventos.

Dulces Lunas!¡.

[Clip Manage 1.0 Unfix.exe]

Dramatismo:
Publico: "No no lo subas hay nOOoo"
BlackZeroX: "Me vale se supone que no es un malware, ademas este foro no con dedicación a esto ni a Lamerías, cayese ya".

No se que aya en el EXe de Clip Manage 1.0 Unfix.exe de 544 kb, pero esto me salio desde el VIRUSTOTAL [Solo por corroborar lo que dicen arriba lo he subido].

Código [Seleccionar] Expandir


a-squared 4.5.0.50 2010.02.28 -
AhnLab-V3 5.0.0.2 2010.02.28 -
AntiVir 8.2.1.176 2010.02.28 -
Antiy-AVL 2.0.3.7 2010.02.26 -
Authentium 5.2.0.5 2010.02.28 -
Avast 4.8.1351.0 2010.03.01 -
AVG 9.0.0.730 2010.02.28 -
BitDefender 7.2 2010.03.01 -
CAT-QuickHeal 10.00 2010.02.27 (Suspicious) - DNAScan
ClamAV 0.96.0.0-git 2010.03.01 -
Comodo 4091 2010.02.28 -
DrWeb 5.0.1.12222 2010.03.01 -
eSafe 7.0.17.0 2010.02.28 -
eTrust-Vet 35.2.7331 2010.02.26 -
F-Prot 4.5.1.85 2010.02.28 -
F-Secure 9.0.15370.0 2010.03.01 -
Fortinet 4.0.14.0 2010.02.28 -
GData 19 2010.03.01 -
Ikarus T3.1.1.80.0 2010.02.28 -
Jiangmin 13.0.900 2010.02.28 -
K7AntiVirus 7.10.984 2010.02.26 -
Kaspersky 7.0.0.125 2010.03.01 -
McAfee 5906 2010.02.28 -
McAfee+Artemis 5906 2010.02.28 -
McAfee-GW-Edition 6.8.5 2010.02.28 -
Microsoft 1.5502 2010.02.28 -
NOD32 4903 2010.02.28 -
Norman 6.04.08 2010.02.28 -
nProtect 2009.1.8.0 2010.02.28 -
Panda 10.0.2.2 2010.02.28 -
PCTools 7.0.3.5 2010.02.28 -
Prevx 3.0 2010.03.01 -
Rising 22.37.00.01 2010.03.01 -
Sophos 4.50.0 2010.02.28 -
Sunbelt 5712 2010.03.01 -
Symantec 20091.2.0.41 2010.03.01 Suspicious.Insight
TheHacker 6.5.1.7.215 2010.03.01 -
TrendMicro 9.120.0.1004 2010.02.28 -
VBA32 3.12.12.2 2010.02.26 -
ViRobot 2010.2.27.2206 2010.02.27 -
VirusBuster 5.0.27.0 2010.02.28 -


y esto del archivo "Clip Manage 1.0 Fix.exe"

Código (Vb) [Seleccionar] Expandir



a-squared 4.5.0.50 2010.03.01 -
AhnLab-V3 5.0.0.2 2010.02.28 -
AntiVir 8.2.1.176 2010.03.01 TR/Crypt.FKM.Gen
Antiy-AVL 2.0.3.7 2010.03.01 -
Authentium 5.2.0.5 2010.03.01 -
Avast 4.8.1351.0 2010.03.01 -
Avast5 5.0.332.0 2010.03.01 -
AVG 9.0.0.730 2010.03.01 -
BitDefender 7.2 2010.03.01 -
CAT-QuickHeal 10.00 2010.03.01 -
ClamAV 0.96.0.0-git 2010.03.01 -
Comodo 4091 2010.02.28 TrojWare.Win32.Refroso.~d6
eSafe 7.0.17.0 2010.03.01 Win32.MoSucker.30.f
eTrust-Vet 35.2.7334 2010.03.01 -
F-Prot 4.5.1.85 2010.03.01 -
F-Secure 9.0.15370.0 2010.03.01 -
Fortinet 4.0.14.0 2010.02.28 -
GData 19 2010.03.01 -
Ikarus T3.1.1.80.0 2010.03.01 -
Jiangmin 13.0.900 2010.03.01 Backdoor/VB.wc
K7AntiVirus 7.10.986 2010.03.01 -
Kaspersky 7.0.0.125 2010.03.01 -
McAfee 5907 2010.03.01 Suspect-02!F226983B929F
McAfee+Artemis 5907 2010.03.01 Suspect-02!F226983B929F
McAfee-GW-Edition 6.8.5 2010.03.01 Trojan.Crypt.FKM.Gen
Microsoft 1.5502 2010.03.01 -
NOD32 4906 2010.03.01 -
Norman 6.04.08 2010.03.01 -
nProtect 2009.1.8.0 2010.03.01 -
Panda 10.0.2.2 2010.02.28 -
PCTools 7.0.3.5 2010.02.28 -
Prevx 3.0 2010.03.01 -
Rising 22.37.00.04 2010.03.01 -
Sophos 4.50.0 2010.03.01 -
Sunbelt 5716 2010.03.01 -
Symantec 20091.2.0.41 2010.03.01 Suspicious.Insight
TheHacker 6.5.1.7.216 2010.03.01 -
TrendMicro 9.120.0.1004 2010.03.01 -
VBA32 3.12.12.2 2010.03.01 -
ViRobot 2010.2.27.2206 2010.02.27 -
VirusBuster 5.0.27.0 2010.03.01 Packed/BitArts



50l3r: Nada mas Abrí el proyecto y se me crasheo el VisualBasic jajaja, ya te copeare la idea de recrear el porta papeles del Office xP, pero después ahorita no, o quizás nunca.

Dulces Lunas!¡.

[no debe pasarse una api que devuelve cosas inestables directamente en otra]

Ese código esta mal, en primera] no debe pasarse una api que devuelve cosas inestables  directamente en otra  en este caso findwindow dentro de Enablewindow

creo que te referis a esto :
Private Sub Command1_Click()
  Call EnableWindow(FindWindow("SciCalc", vbNullString), 1)
End Sub

Es solo una puerta de escape para que no tenga que usar el administrador de tareas para cerrar la calculadora,  y si vamos a hilar fino que nay que usar de hwnd en Enablewindow ?, una variable como devuelve FindWindows  en este caso ? ... si no es asi entonces estas diciendo que en hwnd de Enablewindow o de cualquier API van Constantes  ? ...  bueno, si es así no lo sabia, me estoy enterando en este momente que la variable hwnd as Long es una constante.

1. KarCrack ya te respondió por mi.
2. Me reservo gran parte {Drinky no hace mucho que inicio con el uso de las APIS tengo entendido}, aun que se tiene razón con buscar por la clase de form, solo que es la segunda vez que lo veo de tu parte {la 1era fue en un off en un tema nada q ver}.

Por que B0X ... Maldito SharKI, me puso el diminutivo y ya se expandió.

Dulces Lunas!¡.

Dinky, solo son errores que si no lo cometes es mejor, por ejemplo (ya te lo habia dicho en otro post) usas mal FindWindow

handle = FindWindow (vbNullString, "Calculadora")' solo para un windows en castellano

handle = FindWindow("SciCalc", vbNullString) ' para windows con cualquier idioma

No te enojes, que tal si Clausuramos esa calculadora ???

Código [Seleccionar] Expandir


Option Explicit

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function EnableWindow Lib "user32" (ByVal hwnd As Long, ByVal fEnable As Long) As Long

Private Sub Command1_Click()
  Call EnableWindow(FindWindow("SciCalc", vbNullString), 1)
End Sub

Private Sub Form_Load()
  Shell "calc"
  Dim handle  As Long
  handle = FindWindow("SciCalc", vbNullString)
  Call SendMessage(handle, &HC, 0, ByVal "CLAUSURADO")
  Call EnableWindow(handle, 0)
  Dim handle2  As Long
  handle2 = FindWindowEx(handle, 0, "Edit", vbNullString)
  Call SendMessage(handle2, &HC, 0, ByVal "POR EH")
End Sub



Ese código esta mal, en primera no debe pasarse una api que devuelve cosas inestables directamente en otra en este caso findwindow dentro de Enablewindow
NI TAMPOCO directamente pasar el handle devuelto, directamente a procesar en la siguiente linea.
En pocas palabras debe verificarse que se a obtenido lo deseado y evitar jaladas de pelos posteriores.

P.D.: No es necesario que Drinky use a huevo findwindow pero con la clase de ventana... así que... dejen que aprende a su modo, tampoco es de recalcarse lo en cada post...

Sangrientas Lunas!¡.

[black xerox]

http://planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=69162&lngWId=1

este es el codigo de la pagian que estoy usando, (este es el de la vista)

bueno hay varias cosas, la primera es que trate de crear las dos cosas integradas el codigo fuente de la vista y mi formulario y me da error

fatal error C1083: Cannot open compiler generated file: 'C:\DOCUME~1\Amanda\MISDOC~1\programa\THE_RE~1\VISTAF~1\VistaFOrm\Release\OsenVistaForm.OBJ': No such file or directory

entonces a mi se me ocurrio creo el ocx por separado y despues se lo añado a un formulario y problema resuelto(todo hiba mas o menos bien) hasta que al tratar de cerrar me da ese mensaje de error, el unload me me da el mismo problema. voy a probar lo que dijo black xerox y cobein y despues aviso como me fue.

BlackZeroX

Haber prueba lo así tal vez sea... el UAC el que no te deja...

http://infrangelux.sytes.net/ftp/BlackZeroX/Programacion/vb6/Ajenos/OsenVistaForm.rar

Sangrientas Lunas!¡.

yo lo decia similar a esto, solo que con un hook para verificar en cada mensaje a el form verificar el tiempo que a transcurrido en los paquetes que aun se siguen recibiendo o enviando.

http://foro.elhacker.net/programacion_vb/listview_item_and_elapse_time-t284947.0.html

o lo aplico en mi Explorador Remoto para validar conexiones  procesos de lo contrario cancelo y reinicio ese socket, hasta ahora no me causa un retardo en otras conexiones o similares.

Sangrientas Lunas!¡.

"error en tiempo de ejecucion el cliente no esta disponible"

Es un .ctl vdd, bueno intenta poniendo en esto proceso donde da error { Solo si dispones el SourceCode del OCX  }

If Extender.Visible = False Then exit sub/function/property'   //  segun sea el caso

Ejemplos:

Código (vb) [Seleccionar] Expandir



' Esto me ha quitado de este error y otro entre variables con parámetros de procesos...

Private Sub ProcesoQueDaError()
    If Extender.Visible = False Then Exit Sub
    '...
    '...
End Sub
Private Function ProcesoQueDaError()
    If Extender.Visible = False Then Exit Function
    '...
    '...
End Function
Private Property Get ProcesoQueDaError()
    If Extender.Visible = False Then Exit Property
    '...
    '...
End Property
Private Property Let ProcesoQueDaError(vdata As String)
    If Extender.Visible = False Then Exit Property
    '...
    '...
End Property



De lo contrario si no dispones el SourceCode Del OCX, inicia liza en tiempo de ejecución uno de sus componentes.

P.D.: Vendría bien poner las OCX, o el Codigo/Diseño que llevas hasta ahora.

Sangrientas Lunas!¡.

a facil un "temporalizador" en ese socket y ya, si no llega el ese caracter en X tiemo desues del ultimo paquete recibido se cancela todo. con un hook al form podría ser, ara evitar usar el procesador con un timer

Sangrientas Lunas!¡.

Dije el OCX por que ya esta creado .

Igual puede aprender sobre el formato de MP3 y donde se alojan los TAG ID3 versiones 1, 1.1 y 2 y crear todo desde 0

http://es.wikipedia.org/wiki/ID3

Saludos

http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/zip/145-modulo-para-manipular-tag-id3v1-e-id3v2.zip.

Esa liga muestra esas dos versiones en puro código... sin el OCX.

Sangrientas Lunas!¡