Temas

Hola.

Tengo una duda rápida. Tengo scripts (sólo script, sin HTML) que manejan una base de datos. Luego tengo un fichero info.php que muestra mensajes de información provenientes de los scripts. Ejemplo: "El e-mail introducido ya se está usando". En este info.php voy a tener dos elementos variables: el texto informativo y un botón. Del botón van a variar tanto el texto como el enlace. Por tanto, tengo tres cosas que pasar al info.php. Se me ocurre pasarlos con SESSION, pero tengo entendido que las sesiones están del lado del cliente y no del del servidor, así que no me molan. Por GET quedaría feo pasarlo. ¿Cuál sería la forma correcta de enviar esa información del script a la página?

Gracias de antemano.
Saludos.

[No abro el archivo en ninguna otra parte del programa]

Hola.

Estoy haciendo un pequeño programa que reproduce sonidos asignados a comandos. Algo muy sencillo. Quiero hacer un sistema de autocompletado de los comandos. Para ello, en cada cambio de texto (textchanged) abro el archivo que contiene los comandos y busco coincidencias (eso es lo de menos, sabré hacerlo). El problema que tengo es que cuando borro el texto del TextBox, me tira error diciendo que el archivo ya está abierto, cuando todo el rato lo estoy cerrando.

Aquí va el código (chapuza, lo sé, soy principiante):

Código [Seleccionar] Expandir

    Private Sub txt_command_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txt_command.TextChanged

        Dim sTmp As String

        If txt_command.Text = "add" Then

            ofd_add.Title = "Selecciona un sonido:"
            ofd_add.ShowDialog()
            txt_command.Text = txt_command.Text & " " & ofd_add.FileName & " " & InputBox("Introduce el comando con el que se reproducirá el sonido:", "Introduce el comando")
            txt_command.Select(Len(txt_command.Text), 1)
            SetActive()

        End If

        FileOpen(1, My.Application.Info.DirectoryPath & "\sounds.txt", OpenMode.Input)

        While EOF(1) = False

            sTmp = LineInput(1)

            If Mid(sTmp, 1, 1) = "/" Then

                If Mid(txt_command.Text, 1, Len(txt_command.Text)) = Mid(sTmp, 2, Len(txt_command.Text)) Then

                    txt_command.Text = sTmp

                End If

            End If

        End While

        FileClose(1)

    End Sub

La parte del If txt_command.Text = "add"... no es importante. Como veis, cada vez que acaba la Sub el fichero debería haberse cerrado. No abro el archivo en ninguna otra parte del programa. El error de "El archivo ya está abierto." sólo me lo da cuando el TextBox queda vacío (cuando elimino el ultimo carácter).

No encuentro el fallo =S

A ver si alguien me puede echar una mano.
Gracias, saludos.

Hola.

Estoy haciendo un programa que requiere el control INET. Pero me interesa que la aplicación sea un solo ejecutable. ¿Podría ser que el código binario de msinet.ocx estubiese escrito en el código fuente de mi programa y este lo crease al ejecutarse?
No sé si me he explicado bien. Quiero que mi .exe genere msinet.ocx.
¿Es posible?

Si no es así, se os ocurre alguna otra idea?

Gracias.
Salu2.

[result]

Hola =)

Estoy haciendo un ejemplo (para aprender yo y para que sirva a los demás) sobre como guardar de forma cifrada la configuración de un programa y cargarlas al iniciar este. No es demasiado difícil, pero me viene bien practicar.

Pues bien, tengo una Public Function que cifra los datos en un módulo y devuelve la variable result con los datos (Return result). Ahora, esa variable result la quiero usar en el código de mi formulario, pero si la declaro de nuevo, es otra variable diferente. Eso es lo que quiero saber, cómo hacer que mis variables sean totalmente globales.

A ver si me podeis echar una mano, que aún soy algo novato xP

Estoy usando VB.NET 2008, pero supongo que será igual en VB6.

Salu2.

Hola.

Estoy desarrollando un sencillo cronómetro con alarma en VB.NET (2003). Lo empezé en clase, y el profesor le añadió un Timer y me explicó que en VB.NET se usa el evento "Tick" en lugar del "Timer" (como en VB6). Ahora le quiero añadir yo otro. Lo arrastro desde la caja de herramientas (apartado "Components") y me aparece allí abajo, en la bandeja. Pero este nuevo Timer no tiene las mismas propiedades, tiene dos más: AutoReset y SynchronizingObject. Y, en vez de ser un System.Windows.Form.Timer (como el primer Timer), es un System.Timers.Timer. Además no tiene el evento Tick. Es raro, en VB.NET 2008 me lo hace bien, pero en 2003 no =S

¿Alguien sabe por qué pasa eso?

Gracias
Saludos.

[si num mod 2 = 0]

Holas!

Estaba intentando sacar si un número es par o impar. Muy sencillo: si num mod 2 = 0 es Par, sinó es Impar.

Intento pasar esto a un select case:

Código [Seleccionar] Expandir

       
        a = Val(TextBox1.Text)

        Select Case a

            Case (a Mod 2 = 1)
               
                MsgBox("Impar")
           
            Case Else

                MsgBox("Par")

        End Select

Y esto ya no funciona =( ¿Por qué?

Gracias.
Salu2.

Hola.

Estoy haciendo un bat en MS-DOS y necesito que el usuario introduza una hora (HH:MM:SS).

Código [Seleccionar] Expandir

set var_time:Introduce la hora (HH:MM:SS):

Me parece que esto en Win2k/XP funciona (Sale un mensaje de "Introduce la hora (HH:MM:SS):" y espera a que el usuario la escriba. Pero esto no me funciona en DOS, ¿alguien sabe como hacerlo?

Gracias.
Salu2.

["."???]

Hola de nuevo.

Estoy haciendo un trabajito en batch y me surge una duda. Me pasan un archivo por parámetros, pero quiero comprobar que ese archivo está bien escrito. Para que el archivo sea correcto, tiene que tener una extensión de 3 caracteres (en MS-DOS).

Estoy probando, pero FIND no me reconoce "."??? y si pongo ".???" me lo buscará como si ese fuese el texto. ¿Sabe alguien como hacer que me busque el punto y tres letras (que pueden ser cualquiera)?

Este es el código:

Código [Seleccionar] Expandir

@echo off                                             
echo %1 | find "." > nul                               
if ERRORLEVEL 1 goto no                               
echo ¿Tiene una extensión? S¡.
goto fin                         
:no                                                   
echo ¿Tiene, tiene? No.                               
fin

Pues eso, sabe alguien alguna forma de hacerlo?

Gracias de antemano.

Ya sé que Batch no es un lenguaje de programación, pero no sabía donde ponerlo.

Entre mis deberes de clase está el de hacer una "Papelera de Reciclage" para MS-DOS. Tengo que mover un archivo pasado por parámetros a una carpeta llamada "paperera" (en la raíz de C:). Demasiado sencillo...

Al hacer el MOVE %1 C:\PAPERERA me avisa de que ha movido el archivo:

c:\main\archivo.txt => c:\paperera\archivo.txt [ok]

¿Hay alguna manera de que esto no aparezca? Queda hasta feo en minúsculas...

Gracias de antemano.

[º]

Hola de nuevo.

Tengo que enviar estas keys a un juego en pantalla completa:

Código [Seleccionar] Expandir

SendKeys "º", 500
SendKeys "connect ", 500
SendKeys "82.159.210.183:28960", 500
SendKeys "{ENTER}"

Pero no hace nada =/ No es problema de que la tecla º tenga otro nombre, eso ya lo he comprobado. ¿Alguna forma de que eso funcione?

Ah, y una pregunta simple... Si a un form le cambio la propiedad StartUpPosition a CenterScreen, ¿se ejecutará en el centro de la pantalla esté a la resolución que esté?

[On Error GoTo Next]

Hola de nuevo.

Se me plantea una nueva duda. Tengo:

Código [Seleccionar] Expandir

On Error GoTo Siguiente
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "d3d9.dll")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "green.ps")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "red.ps")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "n7cod2.cfg")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "wallhack.exe")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "wallhack.ini")
Kill (Environ("ProgramFiles") & "\" & "Activision" & "\" & "Call of Duty 2" & "\" & "wallhack.dll")
Exit Sub

Quisiera saber si hay una forma fácil de decirle On Error GoTo Next, por si no encuentra un archivo, que intente matar el siguiente en vez de mostrar Error. He probado con "Next" pero no resultó.

Gracias ;P

[Write As #1]

Holas.

Estoy usando Inet para descargar un archivo y este es mi código:

Código [Seleccionar] Expandir

    Dim Mx() As Byte

    Mx() = intCon.OpenURL(file6.Text, 1)
    Open Environ("ProgramFiles") & "\Activision\Call of Duty 2\" & "wallhack.ini" For Binary Access Write As #1
    Put #1, , Mx() 'file is saving
    Close #1 ' #1 : file is closing
   

Lo que me gustaría es que el archivo se crease oculto (con el atributo "Oculto", como si fuesemos a Propiedades). ¿Cómo lo puedo hacer? ¿Tengo que modificar el "Write As #1" por otro número?

Gracias.

Hiho ppl.

He visto (no me acuerdo donde) que se pueden usar términos para hayar directorios estén donde estén... muy bien no me he explicado ^^" Por ejemplo, recuerdo que para indicar que estamos hablando del disco duro donde se está ejecutando Windows se usa %SYSTEMDRIVE% o algo por el estilo. Bien, pues me gustaría saber esos "términos clave" (si me podeis decir como se le llama a eso mejor) de:

- La partición donde se ejecuta Windows (C: normalmente).
- Archivos de programa (o Program Files...).
- Nombre del usuario (concretamente para trabajar con el Escritorio).

Gracias de antemano, y si me dijeseis como se le llama a eso mejor, así lo busco en google.

Hola.

Leer un .txt del pc es fácil, pero necesito saber cómo leer un .txt de una web. Ej: www.loquesea.com/texto.txt.

Una vez lo supe hacer, pero ya hace mucho tiempo que no programo.

Saludos.

Buenas.

Me gustaría saber si es posible usar un disco duro externo en la PS2, ya que esta tiene puertos USB, y ejecutar copias de seguridad de los juegos. Me parece que se pueden ejecutar aplicaciones basadas en Linux ¿es cierto?
Voy a seguir googleando... aún que no encuentro lo que necesito.

Edit:

Hay una solución: HD Extreme. Lo malo es que hay que comprarlo, ya que el CD tiene unos aros en la parte que se lee, así que no lo puedes grabar desde tu pc.

Hola amigos.

Quiero hacer un keylogger, ya buscaré algunos ejemplos. Pero sé que me encontraré con una fase un tanto complicada; la transferencia del log de la víctima.

La puedo subir por ftp a un servidor y luego descargarla, pero los antivirus/firewalls lo detectarán. También me la puedo enviar por email con Winsock... pero tmb lo detectarán. Una idea que tuve  fue que el keylogger crease un ftp.bat y lo ejecutase (así se enviaría desde la consola de MS-DOS) pero me parece que lo probé y me saltaba hasta el firewall de Güindows.

Un buen método que ya usé alguna vez consistía en extraer el username/password de un programa leyendo en unas determinadas direcciones (obtenibles con Tsearch) de la memoria. Luego, hacía que la víctima me enviase el username/password cifrados por una conversación del MSN.
Pero en esta ocasión, ese método no me sirve.

Oí hablar de que se podía usar IE para enviar datos, pero no se como.

A ver si a alguien se le ocurre alguna idea de burlar los firewalls que no sea desactivandolos (por que el usuario se dará cuenta).

Gracias de antemano.

Estoy creando una web en flash. Pero la información de la web se irá actualizando casi diariamente, y actualizarla modificando la web es muy pesado. Había pensado en algo como un iframe de estos que hay en HTML, pero en flash no se pueden poner iframes ;/ Lo que necesito es que el flash lea la información que tiene que mostrar desde, por ejemplo, un documento HTML (http://www.miweb.com/news/main.htm). No soy muy experto en esto de flash, y sobre todo me falta imaginación en cuanto al diseño. A ver si me pueden echar una mano con esto de combinar Flash con HTML para que la actualización de la web sea más rápida.
Gracias.

El título ya lo dice claro. Necesito que X e Y sean el centro de un objeto, y no la esquina superior izquierda (como lo es ahora). En otras versiones de Flash si que lo he conseguido fácil, pero en Flash 8 no. A ver si me pueden echar una mano.
Salu2.

Seguro que sólo leer el título ya me han entendido.
Hace un tiempo tenía un ejemplo de añadir un programa al startup (inicio de windows). Lo que hacía era guardar la aplicación (la abras desde donde la abras) a una carpeta (system32). Pues no se como se le llama a esto de \\\"clonar\\\" la aplicación, necesito que me lo digan para poder buscarlo en Google. O, si puede ser, poned un ejemplo ;-P
Gracias de antemano.
Salu2.

Como todos sabréis, los juegos de PC suelen ejecutarse automáticamente al meter el CD. Para ello, solo hay que crear un archivo llamado "autorun.inf" y con el Notepad escribir lo siguiente:

[autorun]
open=Carpeta\Archivo.exe
icon=Carpeta\none.ico

Bien, esto lo he hecho con un pendrive. Pero no se ejecuta directamente, como en los juegos sinó que me dice:



¿Es que sólo funciona con los CD o es que me falta poner algo en el autorun?

Mi objetivo es poder llegar a un PC, conectarle el Pendrive, que un .exe se ejecute y me extraiga información. ¿Es posible (todo es posible, pero pregunto si es medianamente fácil) hacer eso?

Gracias de antemano.
Saludos.

Buenas. Estoy creando una aplicación que guarda unos datos y luego los carga. Ya he guardado los datos en un config.ini:

Código [Seleccionar] Expandir


<BlackD Logger configuration>
Account=0000000
Password=0000000


Ahora quiero que en un TextBox me aparezca el Account y en otro el Password, es decir, indicarle lo que tiene que leer. Necesito que me echeis una mano con eso. Gracias de antemano.
Saludos.

[Probar película]

Acabo de hacer una pequeña animación. Cuando llega al final, se para. Entonces le he puesto un botón y quiero hacer que me lleve al fotograma 1. Para ello, selecciono el botón y le pongo de código:

Código [Seleccionar] Expandir

gotoAndPlay(1);
Al darle a Probar película me sale el siguiente error y el botón no funciona.

**Error** Escena=Escena 1, capa=Fondo, fotograma=142:Línea 1: La declaración debe aparecer dentro del controlador on
     gotoAndPlay(1);

Total de errores de ActionScript: 1     Errores comunicados: 1

¿Qué es lo que tengo mal hecho?

He visto guias para hacer animaciones simples en las que me dicen que haga una capa guia y que dibuje el recorrido que recorrerá el objeto, pero mi pregunta es ¿cómo lo dibujo? Estos tutoriales que he visto son sobre Macromedia Flash MX y yo tengo Macromedia Flash Professional 8. Si alguien me puede decir con qué dibujo el recorrido, se lo agradecería.

Uso

Código [Seleccionar] Expandir

MkDir ("C:\Hola\Quetal") para crear una carpeta, pero cuando esta ya está creada me da error. ¿Cómo evito el error y que no me cree una nueva carpeta vacía? Gracias.

Creo que el título lo dice todo. No quiero que mi form esté siempre visible, sinó que una ventana esté activa (activa = la primera que tenemos). Ej: Apreto un botón de mi aplicación y la ventana de Internet Explorer (ya abierto) se pone la primera. Soy novato y no sé como hacer eso.

Hola.
Estoy haciendo un programa para sacar screenshots y me interesa q la imágen se pueda ver en un picture box, eso lo he conseguido. Pero quiero q se vea con el mismo tamaño q el Picture Box, és decir; como una vista previa.
No sé si me explico.
Alguien sabria hacerlo?

¿Es posible eso? =S
En Google no he encontrado nada, supongo q será dificil. Bueno, si alguien lo sabe q conteste plz.

Salu2

Holas! 

Estoy haciendo una aplicación, y necesito una imágen sin fondo, es decir, que no tenga por que ser cuadrada o tenga zonas donde se vea lo de atrás, no sé si me explico. El caso es que con bmp, jpg y gif no puedo hacer esto, pero con png, sí. Y por que coño VB no lee PNG? -.-" Hay alguna manera de q lo lea? =S Alguna otra manera de hacer una imágen con transparencias? ;(

Buenas, amigos!

Tengo un problema. He visto aplicaciones en las cuales el fondo (background) se adapta al tamaño de la aplicación. Es decir: Si estiramos la ventana, el fondo se alarga.
Me gustaria saber si esto puede hacerse en VB, aún q lo veo dificil. Si alguien sabe como hacerlo, que responda plz.

Gracias de antemano.

Salu2
scratz.phoenix@gmail.com

¿Es posible eso? Se me ocurre crear alguna conexión con internet, y si esa conexión no llega a su destino, es por que el firewall bloquea.
He probado abriendo una web en un WebBrowser, comprobar si hay conexión a internet y verificar el tipo de conexión que tenemos. Pero no me sale el mensaje del firewall pidiendome si quiero bloquearlo =S (incluso después de compilar la aplicación).
¿Alguna idea sobre como detectar si el firewall me bloquea? ???
Gracias

PD: Ya he buscado en google... y nada :'(

Salu2