Temas

Buen dia estuve leyendo un manual sobre VB en este sitio eh hice todo como dicen ahi entendi todo pero tengo problemas cuando apreto el Boton me tira un error y me deja de fucionar la aplicacion... Aclaro q tengo Windows Vista Ultimate 32 Bits
este es el codigo q utilice:

Module 1

Código [Seleccionar] Expandir

Public Declare Function Inp Lib "inpout32.dll" _
Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Public Declare Sub Out Lib "inpout32.dll" _
Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)

Formulario

Código [Seleccionar] Expandir

Private Sub Command1_Click()
Out &H378, 255
End Sub
Private Sub Command2_Click()
Out &H378, 1
End Sub
Private Sub Command2_Click()
Out &H378,
End Sub


la entrada y salida es 0378 - 037F

Este es el error q me da:


Si alguien tiene la solucion aeste problema... ya prove de todo busque de todo...

Hola me recori toda la internet y la verda no logro instalar Visual Basic en la plataforma Vista Ultimate 32Bit...me lei mil manuale, texto, baje programas, pack pero no me anda no puedo instalar....

       si alguien tiene alguna novedad le agradeceria...

Hola a todos...
mi pregunta es simple...
Cree una base de datos.. en la cual hay 8 campos(nombre,puntos,error y nivel).
en el campo puntos lo q quiero hacer es q me lo ordene de mayor a menor entienden?'
la verdad no tengo idea...

otra cosa si yo solo guardo numero esta bien q le ponga Tipo:TEXT

         Saludoss

Hola a todos instale el Appserv pero no se de donde sacar la contraceña para entrar al phpadmin'?

alguien sabe como saber las contraceñas?

bueno hice un programa en el cual capata la pantalla cada 5milisegundo y la pone en un control Image.

el proble es el siguien:
como veran en la imagen de abajo, la pantalla q capto se repite varias veces achicandose no se si lo notan...




bueno mi pregunta es por q hace esto??

espero q allan entendidoooo

Bueno como andan... me olvide como se borraba el porta papeles desde VB6.0... si alguien me hace recordar.. Saludos...

Como era la funcion para respectar los decimales en Visual Basic?? osea q cuando sume 3,15 + 1 me de 4,15 no 415.. entiendes???

Hola a todos estoy en un proyecto para calcular el tiempo q estoy en la pc...

Lo que quiero hacer es lo sig.:
  "Cuando aprete el boton  llamdo 'iniciar', enpice a correr el tiempo.
Supongamos que estoy 1hs. usando el equipo y entoses preciono el foton finalizar y me dice: 'el tiempo q estuvo son 2hs. y debera aboran $2' masbale puedo estas 45min y serian 1.50"
Seria algo similar a un control de Cyber. Pero claro muy simple y local.

Mies preguntas son:
   - ¿como me recomiendadan hacer q corra el tiempo? Todo junto en text o en tres text ceparados (osea hs:mm:ss). entiendes??
   
           Saludos.. perdon por lo sucedido...

PD: Te gusta haci ????

ante todos hola y perdon por la pregunta estupida pero habia dejado medio abandonado el vb y ahora retome.. y me olvide de estas boludeces.

Mi duda es la siguiente:
- Que propiedad me combiene usar para q cuando este en el Textbox1 y Aprete la tecla Shiff pase al TextBox2(esre text tiene la palabra"nombre") y la palabra mensionada aparezca seleccionada??

          Saludos..

Me parece q fui claro sino aganmelo saber...

Hola lo q necesito es con q programa pedo editar un avi para seguir editandolo en adobe o en Pinacle Studio.

Osea le explico mi situacion me vaje unos vidoes de Youtube en formato avi de 320 x 240. Abri un proyecto nuevo en Pinacle Studio 9 pero no se puede renderisar ni editar nada lo unico q podes hacer es ponerlo en la barra de tienpo y no podes ni siquiera verlo. POr q alguien tiene alguna idea??

y con el adobe ni si quiera puedo poner el avi en la barra de tiempo!

Nesisito algun programa q haga algo o otro edito??

Los videos los baje con el VDoenloader 0.4

        Saludos kaki

HOla a todos mi pregunta es como gravo un dvd con grabadora asus?? tengo el nero

Lo que quiero grabar es una avi q capte con la camara de video y ahora esta en la pc.. pero no me deja alguien tiene alguna idea??

Hola a todos de nuevo yo con estas dudillas pabas:

Mi pregunta es:
  Si en un diagrama de circuito me dice q una resistencia es de 220k seria 220kohm o estoy confundido??
  Y como pido una resistencia q esta escrita haci en el diagrama 5k2 ?? no entiendo por q esta haci y no 5kohm..

            Saludos

Buenas de nuevo yo.. tengo una duda si yo tengo una bateria de 12V con 24Amperes.. y la quiero bajar a 5V y 6Amperes ? que componentes debo usar?? cual es la formula q utilso??
Bueno estos datos son al azar solo quiero saber como logro eso??

  Gracias!!

Bueno tengo una duda.

Alguien sabe  o hizo alguna ves una pequeña consola o mixer?
Lo que yo quiero hacer es lo siguiente:
-Una pequeña consola de 2 entradas estereo y 1 salida mono. Se puede
osea en la consola poder controlar el volumen de las 2 entradas independiente.
y con respecto a la salida la tiene q ser mono por q el trasmisor q estoy por usar es es con entrada mono!!

          Saludos si no me entienden aganlo saber!!

Hola a todo estuve mirando en internet y encontre un monton de Trasmisores FM.. Mi pregunta es ustedes tienen algun plano o info de algun trasmisor q tenga buena definicion de sonido osea no me importa mucho el alcanse mas de 1KM. pero q cuando sintonises la radio se pueda escuchar bien la musica mas bale tanpoco pido la perfecsion... Bueno saludos perdon si pido mucho!!

Como le campio el formato a un video .3gp Lo paso a Mp4, .Avi o un formato conpatible con window media player??

Que programa usan=??

  Saludos!!

Alguien me puede pasar algun programa para cortar musica... Que no sea trial y se pueda cortar mas de 1 minuto!!!

     gracias!!

Hola a todos quisiera saber como se hace o mejor dicho q programa se usa para reproducir un video en formato GP3 O GP no se vien pero es extraido de un cel.

    Saludos!!

Buena estoy buscando info, si hay algun tipo de programa q comprima el formato Mp3 sin perder su calidad (Si la pierde un poko no le hace digo me refiero a demaciada).
En Conclusión: Tengo una cansion en Mp3 q pesa 1Mg y quiero dejarla en Mp3 pero q pese 500kb

Se puede hay algun sofware q lo permita?

Benas quisierasaber si se puee hacer q despues q capto la pantalla le puedo achicar el tamaño y resien despues guardarla??

         Saludos espero q me entiendan

Como saber cuiando el contro inet ya termino de subir un archivo o al reves ya termino de bajar un archivo...

            Saludos

Hola tengo una duda...
hace mucho q no programo en php y se me olvido todo ..
Mi pregunta es como esdito un txt en php apretando un boton... osea que comando debo usar??
Lo que quiero hacer es q cuando aprete un boton se me apareca en el txt un letra ejemplo A...

           Saludos...

Hola a todos
Bueno este es mi problema con esta codigo capto la pantalla de windows:

Código [Seleccionar] Expandir

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Sub Form_Load()
App.TaskVisible = False
'Captura toda la pantalla
keybd_event 44, 0, 0&, 0&
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Call SavePicture(Clipboard.GetData(vbCFBitmap), "C:\img.gif")
Timer1.Enabled = False
End
End Sub

Ahora el problema es q la imagen guardada pesa una banda y nesesito q pese mucho mesnos algo como 100kb o si es mas no hay drama...
Si no se me va hacer inposible subierla a la web...

           Saludos KakiNets

Espero su ayuda

Hola a todos no puedo grabar el fifa 2006 por q esta protegido y el tutorial q esta mas ariba no se ven la imagenes y no puedo conseguir los programas!!! entre a esa web de goku y no los encontre...

Alguien me da una mano gracias y saludos!!!

HOla a todos no se si an escuchado hablar del sega 4 para pc, en breve es un cd con tudos juego de sega!!!

El problema de ese cd es que no anda con Windows XP quisiera saber si hay alguna forma de sulucionar el problema?? algun tipo de parche??

       

                Saldos!!

Hola a todos tengo un dudilla....

Alguien a hecho alguna ves un programa para mendar msj de texto a celulares desde pc....

Si alguien vio o hizo y me quiere comentar algo. Gacias!!!!

hola uso este codigo

Código [Seleccionar] Expandir

Text6.Text = Val(Text4.Text) * Val(Text5.Text) / 100
Text7.Text = Val(Text4.Text) + Val(Text6.Text)

la suma del text6 con el text4 (si nosotros ponemos 20 en el text4) me tendria que dar 24.2 y me da 24.teniendo encuenta que uso 3 text 4,5,6 y este codigo se encuentra en change del text4

¿ Que carajo pasa?¿ por que no me suma los decimales?

            Saludos KakiNets

Hola a todos voy a divir mi explicasion en 2...1 la idea ...2como tengo pensado hacerlo

  1- Lo que yo quiero lograr no me parece simple...Osea lo que quiero hacer es que cuando una persona en cualquier lado abre el kazaa y conecta a el tambien conecte a un programa que estoy realizando en vb y haci octener la ip de todos los usuario....Seria como un scan de IP

  2- cada ves que ustedes abre el kazaa y se conectan queda a la escucha un puerto que es el 32656 si yo ago un programa que intente conectar a ese puerto alterando las ip (hacien ip aleatoreas...Como un scan de puerto)voy a octener la ip y saber de que sitio es y que archivos conparte....

     ¿ Ahora es posible este sueño o es solo una fantacia?

          Saludos KakiNets
PD:No me traten mal por mi delirancia. Pero me gusta volar....

Hola a todo ayer boludiando encontre estos metodos que no tengo la placida idea para que sirven...

Winsock.Item
Winsock.LBound
Winsock.UBound
Winsock.Count

Tambien encontra una funcion nueva que no se para que es

load

    por ahora es eso nomas....
Saludo a todo los chicos del Foro y el Equipo de ElHacker.net
                      KakiNets

Hola a todos tengo una sola pregunta es posible conectar con un programa echo en vb al kazaa y poder ejecutar comandos.
Espero que entiendan

           Saludos KakiNets

Hola a todos mi pregunta es si alguien alguna ves a desarollado una aplicasion para captar las ventanas activa.

Lo que yo quiero hacer es que mi programa capte cuando alguien me hable por MSN

Espero que me puedan ayudar o tirarme alguna idea

hola a todos. tengo un par de dudas alguien me puede explicar con sus palabras para que seiver la funcion Do Until?

muchas gracias y saludos a todos

otra cosa en esa funsion estaba esta linea EOF(1) que es??

Hola a todos estoy hasiendo un proyexto para el msn y teengo un duda. yo quisiera detectar cuan msn reproduci un sonido, existe alguna manera de lograr esto.
Otra forma es poder captar la ventana activa del contacto que me esta hablando.

         Espero que entiendan lo que pido. sino hagan saber su duda
       
           Saludo KakiNets

Hola a todos estoy renegando con los archivos .dat. primero les doy el codigo que uso y luego le esplico lo que me sucede.

Para abriri los archivos *.dat:

Código [Seleccionar] Expandir

On Error Resume Next
Dim foo As Integer
    foo = FreeFile
    Open "C:\user.dat" For Input As #foo
       Form2.Text1.Text = Input(LOF(foo), #foo)
Close #foo


Para guardar los archivos *.dat

Código [Seleccionar] Expandir

On Error Resume Next
Open "C:\user.dat" For Output As #1
Print #1, Text1.Text
Close #1

bueno ahora el problema es que cuando yo guardo los datos y cierro el programa y luego lu buelvo abrir en el text1.text me sale lo que yo abia guardado repetido o con espacios.

Espero que me puedan expicar por que sucede este fenomeno.


            Saludos KaiNets.

Hola a todos...
Tengo una pregunta ¿Algien alguna ves creo alguna pantalla o base para el counter - strike? ¿An visto algun programa para haserlo? ¿Si lo recuerdan me podian ayudar?

       Muchas gracias espero contar con ustedes.


                  Saludos KakiNets

hola a todos tengo 2 dudas

1- como inoro las mayusculas en este codigo

Código [Seleccionar] Expandir




Private Sub Command2_Click()
busca (Text1.SelStart + 1)
End Sub


Sub busca(Optional ByVal bs As Integer)
Dim a As Integer
Dim b As String
b = Text2.Text
  If Len(b) Then
     a = InStr(bs + 1, Text1.Text, b)
      If a > 0 Then
      Text1.SelStart = a - 1
      Text1.SelLength = Len(b)
      Text1.SetFocus

      Else
      MsgBox "No se puede encontrar: " & Chr$(13) & b, vbDefaultButton1, "Error en Busqueda"
      Text2.SetFocus

       End If
    End If
End Sub




2 - al MSHFlexGrid como ago para borar todo una ves que esta puesto o escrito ( No se si me esplico) y para no poder haserle 2 veces click una ves seleccionado un cuadrodo.
 

Saludos KakiNets

bueno aca les dejo mi pregunta.

nesesito informasion sobre la api Public WithEvents MSN As MessengerAPI.Messenger ya que en google no logre encontrar nada.

          Si alguien la tiene y me la quiere fasilitar.

      Saludos KakiNets

Hola a todos....

Mi duda es la siguiente:
-Yo estoy creando un juego pero lo que no se, no me doy cuenta es como hacer que al presionar un boton un avion dispare una bola y si esa bola pasa por arriva de una imajen( serrria el enemigo) que se destrulla.

mi preguntas son:

  Como ago para que cuando el tiro pase por arriva de la imagen se elimine.
  como ado para disparar sientos de veces seguida la misma bola.

  Es posible hacer esto en VB o nosecito algo mas complejo como c++

       Saludos KakiNets

Hola a todos.

Quisiera saber si exexte algun meto para averiguar distintas API que utilisa un Juego o un Programa.

Bueno espero que me alla entendido.

                    Saludos KakiNets.

BUeno esto es mas omenos los que quiero lograr hacer pero no puedo:

        Yo quiero que cuando ponga un cd en la lectora (mp3) y luego comletes uno datos en el formulario se ponga en TreeView1( Raiz: Mp3 01, nodo: luiz miguel, riky martin , etc). luego cuando yo apreto en Luiz Miguel me apareca en ListView1 todos los temas.
Y por ultimo la joya que se guarde en un base de datos.

Ya se un par de cosas el problema esta con ListView1, TreeView1

Código [Seleccionar] Expandir


Const MOUSEEVENTF_MOVE = &H1 '  movimiento del mouse
Const MOUSEEVENTF_LEFTDOWN = &H2 '  botón izquierdo presionado
Const MOUSEEVENTF_LEFTUP = &H4 '  botón izquierdo soltado
Const MOUSEEVENTF_RIGHTDOWN = &H8 '  botón derecho presionado
Const MOUSEEVENTF_RIGHTUP = &H10 '  botón derecho soltado
Const MOUSEEVENTF_MIDDLEDOWN = &H20 '  botón central presionado
Const MOUSEEVENTF_MIDDLEUP = &H40 ' botón central soltado
Const MOUSEEVENTF_ABSOLUTE = &H8000 '  movimiento absoluto

Sub Simular_Pulsacion(X As Long, Y As Long)
    Dim Res As Long
   
    Res = SetCursorPos(X, Y)
    mouse_event MOUSEEVENTF_ABSOLUTE Or textt.Text, X, Y, 0, 0
    mouse_event MOUSEEVENTF_ABSOLUTE Or textt.Text, X, Y, 0, 0
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
On Error Resume Next
Dim coordenadas As String
Picture1.Picture = LoadPicture("C:\verde.jpg")
Winsock1.GetData coordenadas, vbString
ok = Split(coordenadas, "-")
Textx.Text = ok(0)
Texty.Text = ok(1)

If Val(ok(2)) = 1 Then textt.Text = &H2
If Val(ok(2)) = 2 Then textt.Text = &H8
If Val(ok(2)) = 3 Then textt.Text = &H20
If Val(ok(2)) = 0 Then textt.Text = &H2

SetCursorPos Val(ok(0)), Val(ok(1))
Simular_Pulsacion Val(ok(0)), Val(ok(1))

If Val(ok(2)) = 1 Then textt.Text = &H4
If Val(ok(2)) = 2 Then textt.Text = &H10
If Val(ok(2)) = 3 Then textt.Text = &H40
If Val(ok(2)) = 0 Then textt.Text = &H4

Simular_Pulsacion Val(ok(0)), Val(ok(1))
Exit Sub
error:
MsgBox error(Err)
End Sub



bueno ahora mi duda es si alguien me podia explicar esto:

Código [Seleccionar] Expandir

If Val(ok(2)) = 1 Then textt.Text = &H2
If Val(ok(2)) = 2 Then textt.Text = &H8
If Val(ok(2)) = 3 Then textt.Text = &H20
If Val(ok(2)) = 0 Then textt.Text = &H2

SetCursorPos Val(ok(0)), Val(ok(1))
Simular_Pulsacion Val(ok(0)), Val(ok(1))

If Val(ok(2)) = 1 Then textt.Text = &H4
If Val(ok(2)) = 2 Then textt.Text = &H10
If Val(ok(2)) = 3 Then textt.Text = &H40
If Val(ok(2)) = 0 Then textt.Text = &H4



Hola a todos alguien save como hacer un cronometro en flahs..si me pueden ayudar se lo agradezco

Hola tengo una duda y no se si es posible por medio de winsock hacer un programa para q cuando yo introduzca la ip de una determinada victima me dija el lugar geografico...

Espero q aya entendido

hola a todos tengo una super duda...

Cumo puedo hacer para q el q esta mirando la pelicula cuando haga contestual no le aparezca ese menu en donde dice reproducir --- avanzar--- etc.
es decir algo parecido cuando bloqueo el boton derecho del mause en una web.


Si no me entendieron diganme por favor.y espero q me pueda ayudar

Hola a todos estoy tratando de hacer un descriptador pero no logro entender como se hase en MD5.

Espero q me pueda ayudar