Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Temas - soru13

#46
hola,uso la última versión de Ubuntu,lo que pasa que cuando estoy en la consola y realizo alguna tarea que me pide la contraseña para hacer alguna accion,no me deja escribir la contraseña,es mas no me deja escribir ningun caracter tanto letras como numeros y si le doy a enter y cancelo el introducir la contraseña ya si que me deja escribir.¿Porque me pasa esto? gracias
#47
PHP / ayudita include
17 Febrero 2010, 14:24 PM
hola,tengo el siguiente problema,tengo una web modular,utilizando el siguiente codigo

Citar<?
switch ($_GET["sección"]){
  case 'enviar';
    $incluir = 'upload/envio.php';
    $titulo = 'Envianos Tus Archivos - Discos,Maquetas,Bases,Mixtapes....';
    break;
  case 'noticias';
    $incluir = 'noticias2/noticias2.php';
    $titulo = ' Noticias';
    break;
     case 'eventos';
    $incluir = 'eventos.php';
    $titulo = ' Eventos';
    break;
        case 'lista_de_grupos';
    $incluir = 'lista_grupos.php';
    $titulo = ' Lista de grupos';
    break;

  // Haremos tentos casos cómo páginas
  // tenga nuestra web

  default:

  // Este es el caso que mostrará el indice
  // funcionara si no se da ninguno de los
  // casos anteriores

    $incluir = 'noticias.php';
    $titulo = ' - Rapmadridradio.com';
}
?>

y en la zona donde quiero hacer el include este codigo

Citar<? include $incluir; ?>

el problema no es este codigo,ya que me funciona perfectamente,sino que al querer hacer un include a un archivo de otra carpeta (los archivos que estan incluidos en el codigo estan en la raiz junto con el index.php que tiene estos codigos puestos) no me deja o me sale la principal por defecto "noticias.php"

como hago para que me la incluya?? yo lo que hago es lo siguiente

Citarcase 'grupos';
    $incluir = 'grupos/index.php';
    $titulo = ' Grupos';
    break;

y no me deja,ayuda porfavor
#48
hola,la verdad es que no se mucho de php,pero bueno hago pequeñas pruebas y aveces me salen bien,pero no consigo hacer lo siguiente,tengo dos codigos,estos:

Citar<?php 
    function listar_ficheros ($tipos, $carpeta){ 
      //Comprobamos que la carpeta existe 
       if (is_dir ($carpeta)){ 
           //Escaneamos la carpeta usando scandir 
            $scanarray = scandir ($carpeta); 
            for ($i = 0; $i < count ($scanarray); $i++){ 
              //Eliminamos  "." and ".." del listado de ficheros 
               if ($scanarray[$i] != "." && $scanarray[$i] != ".."){ 
           //No mostramos los subdirectorios 
           if (is_file ($carpeta . "/" . $scanarray[$i])){ 
                          //Verificamos que la extension se encuentre en $tipos 
              $thepath = pathinfo ($carpeta . "/" . $scanarray[$i]); 
               if (in_array ($thepath['extension'], $tipos)){ 
                  echo $scanarray[$i] . "<br>"; 
               } 
                   } 
               } 
          } 
     } else { 
         echo "La carpeta no existe"; 
      } 
  } 
   ?>
Citar<?php 
    $tipos = array ("rar"); 
    echo listar_ficheros ($tipos, "./"); 
?>
y este ultimo
Citar<? link_counter_nosql("a.rar", "Descargar archivo"); ?>

el caso es que estos codigos me funcionan perfectamente,pero este ultimo lo que hace es contar las descargas,pero como veis hay que poner la ruta del archivo,y el codigo de arriba lo que hace es buscar todos los archivos .rar que hay en la carpeta,lo que yo he hecho es lo siguiente

Citar<?php 
    $tipos = array ("rar"); 
    echo listar_ficheros ($tipos, "./"); 
   link_counter_nosql($tipos, "Descargar archivo");
    ?> 

me funciona el codigo pero no me saca bien la url del archivo,lo que yo quiero es saber que hago mal para que no me salga bien la url que saca el primer codigo de resultado (que lo saca bien) y lo meta directamente en el otro codigo,para que sea todo automatico.

si alguien sabe que cual es el fallo se lo agradeceria mucho  ;)
#49
Hola,estuve trabajando en un robot actualizador para mi web de juegos,y como muchos usuarios me ayudaron ha hacerlo,pues voy a poner aqui el codigo fuente.

Se puede modificar perfectamente para adaptarlo a otros scripts y que busque otro contenido.

El que yo publico usa esta programacion de juegos flash gratuita y extrae los juegos de la web de minijuegos,para que funcione yo hice que en la caja de texto de la derecha del boton extraer,pongo la ID del juego y automaticamente me los va sacando de esa web y cuando acaba con un juego extrae el siguiente y me lo añade en mi pagina automaticamente.

Todo esto se tiene que configurar,pero no es muy complicado,solo cambiar el nombre de los formularios,la direccion de la web y poco mas.

La programacion tiene algunos pequeños fallos,si consiguen arreglarlos o hacen alguno modificacion del script pido que lo publiquen para compartirla entre todos.

Bueno,aqui os dejo el Codigo Fuente para Descargar:

http://www.pinpoyo.com/archivos/876586


En muy poco tiempo,dejas puesto el robot y puedes tener muchos juegos.

Un Saludo
#50
PHP / Otro Problemilla... ayuda !!
27 Noviembre 2007, 19:37 PM
bien,tengo este codigo, pero quiero que las ultimas 3 lineas de codigo me tienen que salir cuando acabe de copiar todos los archivos,pero me sale al principio,aunque no ponga nada en el formulario, porque es eso???

miren como sale:



    <?
if(!isset($_POST['Submit'])){
?>
</p>
<form name="form1" method="post" action="index.php">
  <p>Nombre de Usuario:
      <input name="textarea" type="text" value="">
</p>
  <p>Valor inicial del Contador:
    <input name="textarea2" type="text" value="0">
    <span class="style2">(No dejar en blanco)</span></p>
  <p>
    <input type="submit" name="Submit" value="Aceptar">
  </p>
</form>
<?
}else{
$textarea = $_POST['textarea'];
mkdir($textarea,0777);

$v = $_POST['textarea2'];
$archivo = '1/numero.dat';
$fp = fopen($archivo, "a");
$string = "$v";
$write = fputs($fp, $string);
fclose($fp);

   print("Creando contador.<br>");
   print("Espere Porfavor...<br><br>");
$file = '1/0.gif';
$newfile = $textarea."/0.gif";
if (!copy($file, $newfile)) {
    echo "Error al copiar el archivo $file...\n";
}
$file1 = '1/1.gif';
$newfile1 = $textarea."/1.gif";
if (!copy($file1, $newfile1)) {
    echo "Error al copiar el archivo $file...\n";
}
$file2 = '1/2.gif';
$newfile2 = $textarea.'/2.gif';
if (!copy($file2, $newfile2)) {
    echo "Error al copiar el archivo $file...\n";
}
$file3 = '1/3.gif';
$newfile3 = $textarea.'/3.gif';
if (!copy($file3, $newfile3)) {
    echo "Error al copiar el archivo $file...\n";
}
$file4 = '1/4.gif';
$newfile4 = $textarea.'/4.gif';
if (!copy($file4, $newfile4)) {
    echo "Error al copiar el archivo $file...\n";
}
$file5 = '1/5.gif';
$newfile5 = $textarea.'/5.gif';
if (!copy($file5, $newfile5)) {
    echo "Error al copiar el archivo $file...\n";
}
$file6 = '1/6.gif';
$newfile6 = $textarea.'/6.gif';
if (!copy($file6, $newfile6)) {
    echo "Error al copiar el archivo $file...\n";
}
$file7 = '1/7.gif';
$newfile7 = $textarea.'/7.gif';
if (!copy($file7, $newfile7)) {
    echo "Error al copiar el archivo $file...\n";
}
$file8 = '1/8.gif';
$newfile8 = $textarea.'/8.gif';
if (!copy($file8, $newfile8)) {
    echo "Error al copiar el archivo $file...\n";
}
$file9 = '1/9.gif';
$newfile9 = $textarea.'/9.gif';
if (!copy($file9, $newfile9)) {
    echo "Error al copiar el archivo $file...\n";
}
$file10 = '1/contador.php';
$newfile10 = $textarea.'/contador.php';
if (!copy($file10, $newfile10)) {
    echo "Error al copiar el archivo $file...\n";
}
$file11 = '1/numero.dat';
$newfile11 = $textarea.'/numero.dat';
if (!copy($file11, $newfile11)) {
    echo "Error al copiar el archivo $file...\n";
}
$file12 = 'numero.dat';
$newfile12 = '1/numero.dat';
if (!copy($file12, $newfile12)) {
    echo "Error al copiar el archivo $file...\n";
print("<b>Finalizado</b><br><br>");
print("<br><hr><br>");
print("<b>Previsualizacion del Contador:</b><br>");
}
echo '<iframe src="http://www.pinpoyo.com/contador/'.$textarea.'/contador.php" width="150" height="50" scrolling="no" frameborder="0"><p>Tu explorador no acepta Iframes.</p></iframe><br>';}
print ("<br><br><b>Copie este codigo e insertelo en su pagina web:</b><br>");
print htmlentities('<iframe src="http://www.pinpoyo.com/contador/'.$textarea.'/contador.php" width="400" height="500" scrolling="auto" frameborder="1"><p>Tu explorador no acepta Iframes.</p></iframe>');
?>
#51
PHP / Pequeño problema con codigo, ayuda
22 Noviembre 2007, 09:59 AM
bien, pues tengo este codigo:

    <?
if(!isset($_POST['Submit'])){
?>
</p>
<form name="form1" method="post" action="index.php">
  <p>Nombre de Usuario:
      <input name="textarea" type="text" value="">
</p>
  <p>Valor inicial del Contador:
    <input name="textarea2" type="text" value="0">
    <span class="style2">(No dejar en blanco)</span></p>
  <p>
    <input type="submit" name="Submit" value="Aceptar">
  </p>
</form>
<?
}else{
$textarea = $_POST['textarea'];
mkdir($textarea,0777);
}

$v = $_POST['textarea2'];
$archivo = '1/numero.dat';
$fp = fopen($archivo, "a");
$string = "$v";
$write = fputs($fp, $string);
fclose($fp);

   print("Creando contador.<br>");
   print("Espere Porfavor...<br><br>");
$file = '1/0.gif';
$newfile = '$textarea/0.gif';
if (!copy($file, $newfile)) {
    echo "Error al copiar el archivo $file...\n";
}
$file1 = '1/1.gif';
$newfile1 = '$textarea/1.gif';
if (!copy($file1, $newfile1)) {
    echo "Error al copiar el archivo $file...\n";
}
$file2 = '1/2.gif';
$newfile2 = 'pepe/2.gif';
if (!copy($file2, $newfile2)) {
    echo "Error al copiar el archivo $file...\n";
}
$file3 = '1/3.gif';
$newfile3 = 'pepe/3.gif';
if (!copy($file3, $newfile3)) {
    echo "Error al copiar el archivo $file...\n";
}
$file4 = '1/4.gif';
$newfile4 = 'pepe/4.gif';
if (!copy($file4, $newfile4)) {
    echo "Error al copiar el archivo $file...\n";
}
$file5 = '1/5.gif';
$newfile5 = 'pepe/5.gif';
if (!copy($file5, $newfile5)) {
    echo "Error al copiar el archivo $file...\n";
}
$file6 = '1/6.gif';
$newfile6 = 'pepe/6.gif';
if (!copy($file6, $newfile6)) {
    echo "Error al copiar el archivo $file...\n";
}
$file7 = '1/7.gif';
$newfile7 = 'pepe/7.gif';
if (!copy($file7, $newfile7)) {
    echo "Error al copiar el archivo $file...\n";
}
$file8 = '1/8.gif';
$newfile8 = 'pepe/8.gif';
if (!copy($file8, $newfile8)) {
    echo "Error al copiar el archivo $file...\n";
}
$file9 = '1/9.gif';
$newfile9 = 'pepe/9.gif';
if (!copy($file9, $newfile9)) {
    echo "Error al copiar el archivo $file...\n";
}
$file10 = '1/contador.php';
$newfile10 = 'pepe/contador.php';
if (!copy($file10, $newfile10)) {
    echo "Error al copiar el archivo $file...\n";
}
$file11 = '1/numero.dat';
$newfile11 = 'pepe/numero.dat';
if (!copy($file11, $newfile11)) {
    echo "Error al copiar el archivo $file...\n";
}
$file12 = 'numero.dat';
$newfile12 = '1/numero.dat';
if (!copy($file12, $newfile12)) {
    echo "Error al copiar el archivo $file...\n";
}
print("<b>Finalizado</b>");

?>


me da error aqui:

$file = '1/0.gif';
$newfile = '$textarea/0.gif';
if (!copy($file, $newfile)) {
    echo "Error al copiar el archivo $file...\n";
}
$file1 = '1/1.gif';
$newfile1 = '$textarea/1.gif';
if (!copy($file1, $newfile1)) {
    echo "Error al copiar el archivo $file...\n";
}


Warning: copy($textarea/0.gif) [function.copy]: failed to open stream: No such file or directory in /home/web/public_html/contador/index.php on line 49
Error al copiar el archivo 1/0.gif...
Warning: copy($textarea/1.gif) [function.copy]: failed to open stream: No such file or directory in /home/web/public_html/contador/index.php on line 54
Error al copiar el archivo 1/0.gif... Finalizado


como podeis ver yo lo k quiero k al copiar el archivo la ruta sea lo k se escribio en el textarea + el archivo .gif, pero me tira error, como se pondria?

gracias
#52
hola, necesito vuestra ayuda urgentemente, estoy haciendo un robot actualizador para paginas webs, y lo que hago es extraer el codigo fuente de la pagina que lo extrae,pero lo que me hace falta es que me busque en el textbox que extrae el codigo fuente una direccion que varia en cada juego, es decir, necesito que me busque entre bastante texto lo siguiente:

viene asi en el codigo fuente:

<embed src="http://es.minijuegosgratis.com/miniswf/no_hotlink/zombiegolfriot.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="550" height="413" class="FlashGame">                        </embed>

Pues necesito que me copie la url del juego, es decir;: http://es.minijuegosgratis.com/miniswf/no_hotlink/zombiegolfriot.swf

pero claro esta url va a variar, y por ejemplo en otro juego sera
http://es.minijuegosgratis.com/miniswf/no_hotlink/otrojuego.swf

necesito que me buske ese enlace aunque cambie el nombre del swf, alguien lo sabe como podria hacerlo??? es muy importante, kien me ayude le podre reconpensar con algo.

gracias
#53
hola, miren estoy haciendo un soft y he hecho una pagina php que me saca los datos del espacio web restante, transferencia etc... y cargo la pagina con un webbrowser y necesito capturar ese texto y cargarlo en un Text box o en labels, como podria extraerlo?
#54
hola, tengo un problema, he hecho como la ventana que sale en msn alguien inicia sesion, que se enseña y luego se esconde, lo que pasa que en mi pc se ve bien, muevo el formulario hacia arriba, y luego se baja hasta que no se ve, pero en otros pcs que tienen diferente resolucion les aparece la ventanita en la mitad de la pantalla y luego no se esconde, como puedo hacer que sea valido para todas las resoluciones?

Asi es como lo tengo.

#55
hola, estoy haciendo una programacion de webs porno, tengo ya hecho un script que carga todas las fotos que hay en una carpeta en thumbail y luego puedes ampliarla, pero necesito un pequeño codigo que en la index me carge la imagen 0001.jpg de cada una de las ultimas X carpetas subidas, ¿alguien sabe como puedo hacerlo?
#56
hola, queria ver como podria hacer que mi programa no se vaya al fondo aunque haya otro programa abierto, es decir, que se puedan ver los 2 al mismo tiempo y que se puedan utilizar los 2 cuando esten abiertos. como lo podria hacer???
#57
hola

Como podria conocer el estado de un programa, por ejemplo, si este esta minimizado,maximizado, cerrado etc'????

gracias
#58
hola, queria ver como podria acoplar un pequeño exe hecho en VB a un programa cualquiera que tenga instalado en mi pc, lo que quiero es hacer un toolbar y que cuando carge Internet explorer tambien cargue mi toolbar acoplado al Internet explorer, vamos, que si se disminuye este tambien, si se cierra este tambien,
#59
hola, se podria hacer una toolbar para diferentes navegadore en visual basic???

como, una ayuda por favor
#60
hola, ya acabe el codigo para poder poner a tus programas un tiempo de prueba y luego activarlo con el serial, dejo aqui el enlace, espero comentarios

http://sorucreations.gratishost.com/
#61
hola, queria ver si se podia hacer en visual basic como un minicortafuegos automatico que bloquee programas que modifican las propiedades de otros, como por ejemplo los trainers en los juegos, que por ejemplo cuando estes jugando si tienes un trainer que mi programa lo bloquee o que lo cierre cuando el trainer va a modificar alguna propiedad.

gracias
#62
hola, como puedo meter 2 formularios en un midi form??? solo consigo meter 1, hago lo mismo que hice en el 1º con el 2º pero el 2º no me aparece en el midi form

ayuda, gracias
#63
Programación Visual Basic / crear acceso directo...
28 Diciembre 2006, 03:13 AM
como creo un acceso directo al escritorio mediante VB6??
#64
Programación Visual Basic / obtener IP
2 Octubre 2006, 20:39 PM
hola, quisiera saber como puedo obtener la IP de mi pc en Visual Basic 6, gracias
#65
hola, a mi programa le he echo un form con varias opciones para poder cambiar cosas del programa y tal, lo que yo quiero es que cuando lo vuelva a iniciar le carge la configuracion que puso, es decir, como una pequeña base de datos que guarde su configuracion

como podria hacer eso?
#66
hola, quisiera saber como puedo hacer una imagen de Dvd pero seleccionandolo directamente del disco duro, porque si lo grabo a un dvd para tener que hacer luego la imagen de dvd no me vale para nada, ya que cuando lo grabo me lo graba en multisesion y lo que yo quiero es hacer la imagen de dvd desde el disco duro para luego que al grabar la imagen asi no me lo graba en multisesion sino todo junto, e provado con el Alcohol 120 pero solo me vale cogiendolo del dvd y ya he dicho arriba que eso no me vale, alguien sabe o conoce algun programa para hacer esto?
#67
tengo un problema en mi programa, lo que hace es capturar la pantalla y guardar la imagen, pero si esta ya existe la sobrescribe y no quiero que haga eso, si por ejemplo existe ya uno que se llama captura1 pues que haga otra nueva k sea captura2 asi sucesivamente

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
'Api para generar un evento de tecla
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const KEYEVENTF_KEYUP = 2
'Api para generar una pausa
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

------------------------

Private Sub copiar_Y_Guardar()
On Local Error Resume Next
'Variable para la imagen
Dim imagen As IPictureDisp
keybd_event 44, 0, 0, 0
'mediante Keyevent accionamos la tecla Alt+Printscreen
Set imagen = Clipboard.GetData
DoEvents
'Guardamos la imagen en el directorio especificado
SavePicture imagen, "c:\documents and settings\All users\Escritorio\captura1.bmp"
'eliminamos la imagen de la memoria
Set imagen = Nothing
End Sub
#68
Programación Visual Basic / todo en un exe
18 Agosto 2006, 16:28 PM
hola, si por ejemplo yo hago un proyecto en VB y tengo otros archivos vinculados, pero en la carpeta donde tengo el proyecto, como puedo hacer que al hacer el exe,me guarde los archivos dentro del exe?
#69
Programación Visual Basic / Putator v1
17 Agosto 2006, 23:32 PM
bueno, aqui le traigo el codigo fuente de un programa mio, que es hace una buena putada a la victima....

Bien, hay 2 proyectos, el 1º se debe ejecutar entonces lo que hace es que aloja el programa que "putea" a la victima en una carpeta del Disco duro, entonces cuando arranca windows carga este programa, lo que hace es ocultar el boton inicio,bloquear el administrador de tareas, y ocultar todos los iconos del escritorio,cuando lo carga al arrancar windows hay una opcion de desactivarlo metiendo una clave.... la predeterminada que yo puse es QAZWSX (en minusculas)....

http://files.filefront.com/putatorrar/;5418509;;/fileinfo.html

espero que les sirva, lo pueden personalizar y modificar...
#70
como podria hacer que cuando arranque windows se inicie mi programa?
#71
hola, como puedo crear mis propios ocx para visual basic 6?
#72
bueno, cogi este codigo de esta web, pero hay cosas que me dan error

Leer y escribir un fichero Ini:


Declaraciones generales en un módulo:

Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA"_
(ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As_
String ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As_
String) As Long
Declare Function WritePrivateProfileString Lib "kernel32" Alias_
"WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As_
Any, ByVal lpString As Any, ByVal lpFileName As String) As Long

Leer en "Ejemplo.Ini":

Private Sub Form_Load()
    Dim I As Integer
    Dim Est As String
    Est = String$(50, " ")
    I = GetPrivateProfileString("Ejemplo", "Nombre", "", Est, Len(Est), "Ejemplo.ini")
    If I > 0 Then
        MsgBox "Tu Nombre es: " & Est
    End If
End Sub

Escribir en "Prueba.Ini":

Private Sub Form_Unload(Cancel As Integer)
    Dim I As Integer
    Dim Est As String
    Est = "Ejemplo - Apartado"
    I = WritePrivateProfileString("Ejemplo", "Nombre", Est, "Ejemplo.ini")
End Sub


las declaraciones del modulo me da todas por malas

y luego

    I = GetPrivateProfileString("Ejemplo", "Nombre", "", Est, Len(Est), "Ejemplo.ini")

esto tambien me da error
#73
Programación Visual Basic / splash de carga
10 Julio 2006, 22:17 PM
hola, aver si me podeis decir como hacer un splash o imagen de carga, es decir, cuando ejecutas el programa, te sale una ventanita que por ejemplo pone, Visual Basic 6, (como en VB en realidad) y empieza a cargar todos los componentes, pues aver como puedo hacer eso
#74
hola, tengo 1 drivelistbox , 1 dirlistbox y un Textbox,

necesito que me deje elegir la unidad con el drivelistbox, y me lo carge en el dirlistbox,

como lo hago???

e provado esto, pero no anda

Drive1.Drive = Dir2.Path
#75
bueno, tengo este codigo, esta bien el codigo pero no me sube la carpeta

Private Declare Function InternetConnect Lib "wininet.dll" Alias "InternetConnectA" (ByVal hInternetSession As Long, ByVal sServerName As String, ByVal nServerPort As Integer, ByVal sUserName As String, ByVal sPassword As String, ByVal lService As Long, ByVal lFlags As Long, ByVal lContext As Long) As Long
Private Declare Function InternetOpen Lib "wininet.dll" Alias "InternetOpenA" (ByVal sAgent As String, ByVal lAccessType As Long, ByVal sProxyName As String, ByVal sProxyBypass As String, ByVal lFlags As Long) As Long
Private Declare Function FtpPutFile Lib "wininet.dll" Alias "FtpPutFileA" (ByVal hConnect As Long, ByVal lpszLocalFile As String, ByVal lpszNewRemoteFile As String, ByVal dwFlags As Long, ByVal dwContext As Long) As Boolean
Private Declare Function InternetCloseHandle Lib "wininet.dll" (ByVal hInet As Long) As Integer
Private Declare Function FtpSetCurrentDirectory Lib "wininet.dll" Alias "FtpSetCurrentDirectoryA" (ByVal hFtpSession As Long, ByVal lpszDirectory As String) As Boolean
Const INTERNET_OPEN_TYPE_PRECONFIG = 0
Const INTERNET_DEFAULT_FTP_PORT = 21
Const INTERNET_SERVICE_FTP = 1
Const PassiveConnection As Boolean = True
Const INTERNET_FLAG_PASSIVE = &H8000000
Const FTP_TRANSFER_TYPE_UNKNOWN = &H0

Dim hConnection, hOpen, Num As Long
Private Sub Command1_Click()

    hOpen = InternetOpen("IE", INTERNET_OPEN_TYPE_PRECONFIG, vbNullString, vbNullString, 0)
    DoEvents
    hConnection = InternetConnect(hOpen, "host", INTERNET_DEFAULT_FTP_PORT, "user", "pass", INTERNET_SERVICE_FTP, IIf(PassiveConnection, INTERNET_FLAG_PASSIVE, 0), 0)
    DoEvents
    FtpSetCurrentDirectory hConnection, "\"
    DoEvents
    FtpPutFile hConnection, "C:\prueba", "prueba", FTP_TRANSFER_TYPE_UNKNOWN, 0
    DoEvents
    InternetCloseHandle hConnection
    InternetCloseHandle hOpen
End Sub
Private Sub Form_Load()

End Sub
#76
ok, estoy haciendo un instalador personalizado, y necesito que me deje elegir la ruta donde se moveran unos archivos que ya tengo predeterminados o los borre. ok, mi codigo es el siguiente, solo me hace falta eso

Private Sub Command1_Click()
Set variable = CreateObject("Scripting.FileSystemObject")
variable.MoveFolder ".\Speed Island files", "C:\Archivos de programa\Rockstar Games\GTA San Andreas\Speed Island files"
variable.DeleteFile "C:\Archivos de programa\Rockstar Games\GTA San Andreas\models\txd\LOADSCS.txd"
variable.MoveFile ".\models\txd\LOADSCS.txd", "C:\Archivos de programa\Rockstar Games\GTA San Andreas\models\txd\LOADSCS.txd"
variable.DeleteFile "C:\Archivos de programa\Rockstar Games\GTA San Andreas\models\fronten2.txd"
variable.MoveFile ".\models\fronten2.txd", "C:\Archivos de programa\Rockstar Games\GTA San Andreas\models\fronten2.txd"
variable.DeleteFolder "C:\Archivos de programa\Rockstar Games\GTA San Andreas\data"
variable.MoveFolder ".\data", "C:\Archivos de programa\Rockstar Games\GTA San Andreas\data"
Form4.Show
Form2.Hide
End Sub
#77
hola, haber si alguien me podia ayudar, de como puedo abrir y guardar archivos con CommonDialog... me e visto un manual, pero no entiendo muy bien, me podrian poner un ejemplo?? gracias

se que es con ShowOpen y ShowSave, pero no me sale, me da siempre error
#78
hola, e echo un pequeño exe que te captura la pantalla, pero necesito saber como puedo hacer que despues de que la capture guarde esa captura el solo, sin necesidad de ir al paint y pegarlo.

gracias
#79
hola, aver si alguien me puede decir como puedo hacer un salvapantallas

gracias
#80
hola, yo tengo un foro smf, y ya despues de un tiempo le quiero cambiar el theme, e mirado en la pagina pero muchos son malos y los buenos dan algun problema... ya que estan en ingles, no tienen botones en español, etc etc

bueno, aver si me pueden decir que theme basico (sin modificarlo ustedes) es el de el foro de elhacker.net

gracias
#81
bueno, haber, yo quiero hacer un pequeño programa que por ejemplo, al pulsar F9 te haga un truco, pero no se como empezar, e visto en paginas de ese juego cosas que no se utilizar, aver si me podeis ayudar


SFX Files Archive
/////////////////////////////////////// GTA Vice City archive //
---------BEGINNING-OF-ARCHIVE---------
sfx00000 - sfx00007 = car horns
sfx00008 - sfx00014 = helicopter sounds
sfx00015 - sfx00020 = car doors
sfx00021 - sfx00022 = *unknown
sfx00023 = start car engine
sfx00024 = *unknown
sfx00025 = car tire spin 1
sfx00026 = *tank?
sfx00027 - sfx00028 = police sirens
sfx00029 = ambulance siren
sfx00030 = truck 'backing up' indicator
sfx00031 = mr whoopie
sfx00032 = open coach door (airbrakes)
sfx00033 - sfx00037 = tire bouncing, popping, flat, airleak
sfx00038 - sfx00039 = bullet trail
sfx00040 - sfx00041 = roller skates
sfx00042 - sfx00046 = footsteps
sfx00047 = car explosion
sfx00048 = bomb explosion
sfx00049 = molotov sound 1
sfx00050 - sfx00051 = Pistol
sfx00052 - sfx00053 = M4
sfx00054 - sfx00056 = Uzi
sfx00057 - sfx00058 = Sniper
sfx00059 - sfx00060 = Rocket Launcher
sfx00061 - sfx00063 = Rocket Fire
sfx00064 - sfx00065 = Flamethrower
sfx00066 - sfx00067 = Shotgun
sfx00068 - sfx00070 = M60
sfx00071 - sfx00073 = Tec 9
sfx00074 - sfx00076 = M4
sfx00077 = Reload Pistol
sfx00078 = Reload Uzi
sfx00079 = blank
sfx00080 = Reload Sniper Rifle
sfx00081 = bat swing
sfx00082 - sfx00084 = Minigun
sfx00085 - sfx00087 = SPAS 12
sfx00088 - sfx00089 = Colt Python
sfx00090 - sfx00091 = MP5
sfx00092 - sfx00094 = Tommy hitting regular wall
sfx00095 - sfx00096 = wood collision
sfx00097 - sfx00099 = *unknown
sfx00100 = dumpster collision
sfx00101 - sfx00106 = car collisions 1
sfx00107 - sfx00110 = metal collisions (Metal Posts)
sfx00111 - sfx00114 = fence collisions
sfx00115 - sfx00116 = *unknown
sfx00117 = *unknown (same as 097-099)
sfx00118 - sfx00121 = box collisions
sfx00122 - sfx00125 = bench collision (Wooden Lathes)
sfx00126 = *unknown (similar to 097-099 at faster rate)
sfx00127 - sfx00131 = grass collision
sfx00132 = door collision
sfx00133 - sfx00135 = box collisions 3
sfx00136 - sfx00140 = newstands/traffic light blown (Metal Sheet explosion)
sfx00141 - sfx00142 = boxes blown
sfx00143 = gate collision 1
sfx00144 = car scraping (walls, etc.)
sfx00145 = gate collision 2
sfx00146 - sfx00151 = glass breaking
sfx00152 - sfx00153 = fire
sfx00154 = rain
sfx00155 = after rain
sfx00156 - sfx00157 = bullet shells dropping
sfx00158 = bullet penetrating ped
sfx00159 - sfx00161 = bullet hitting car
sfx00162 - sfx00164 = bullet hitting ground
sfx00165 - sfx00170 = fist fighting
sfx00171 - sfx00173 = katana blade
sfx00174 - sfx00175 = brass knuckles
sfx00176 = open garage
sfx00177 = GTA3 MP3 player ped
sfx00178 = detonate
sfx00179 = SFX audio adjuster
sfx00180 - sfx00265 = police radio
sfx00266 = *bike idle or hunter blades?
sfx00267 = phone ring
sfx00268 - sfx00278 = car engine at steady rpms
sfx00279 = engine echo
sfx00280 - sfx00283 = blank
sfx00284 - sfx00287 = motorcycle egine at steady rpms
sfx00288 - sfx00298 = car idling
sfx00299 - sfx00303 = blank
sfx00304 - sfx00307 = motorcycle idling
sfx00308 - sfx00312 = airplane
sfx00313 = car tire spin 2
sfx00314 - sfx00315 = boat
sfx00316 = boat travelling through water
sfx00317 - sfx00318 = boat splashes
sfx00319 - boat engine at idle
sfx00320 - sfx00323 = rain on car
sfx00324 = fall in water
sfx00325 - sfx00326 = crushing body (squish)
sfx00327 - sfx00328 = blow up boxes
sfx00329 = rocket ammo depleted
sfx00330 = rifle ammo depleted
sfx00331 = *collision?
sfx00332 - sfx00333 = jumping
sfx00334 = car bomb's beeping timer
sfx00335 = gta3 timer
sfx00336 - sfx00337 = hydraulics
sfx00338 = sex in car
sfx00339 = keep uppy
sfx00340 = degenatron
sfx00341 - sfx00342 = dodo
sfx00343 - sfx00355 = radio tuning
sfx00356 - sfx00369 = icon noise
sfx00370 = timer
sfx00371 = blank
sfx00372 - sfx00379 = menu sound
sfx00380 - sfx00382 = radio static
sfx00383 - sfx00085 = engine sounds 1 (perennial)
sfx00386 - sfx00388 = engine sounds 2 (stinger)
sfx00389 - sfx00391 = engine sounds 3 (yankee)
sfx00392 - sfx00394 = engine sounds 4 (admiral)
sfx00395 - sfx00397 = engine sounds 5 (flatbed)
sfx00398 - sfx00400 = engine sounds 6 (bf injection)
sfx00401 - sfx00403 = engine sounds 7 (hotring racer)
sfx00404 - sfx00406 = engine sounds 8 (greenwood)
sfx00407 - sfx00409 = engine sounds 9 (oceanic)
sfx00410 - sfx00412 = engine sounds 10 (taxi)
sfx00413 - sfx00415 = engine sounds 11 (sabre)
sfx00416 = blank
sfx00417 = *ambient crowd bg noise (possibly in stadium?)
sfx00418 = blank
sfx00419 - sfx00421 = chainsaw
sfx00422 - sfx00424 = rc
sfx00425 = rc helicopter
sfx00426 - sfx00430 = blank
sfx00431 - sfx00433 = freeway engine
sfx00434 = freeway wind
sfx00435 = blank
sfx00436 - sfx00437 = faggio engine
sfx00438 = faggio wind
sfx00439 - sfx00441 = sanchez wind
sfx00443 - sfx00445 = pcj900 engine
sfx00446 = pcj900 wind
sfx00447 - sfx00452 = blank
sfx00453 - sfx00456 = hunter
sfx00457 - sfx00460 = blank
sfx00461 - sfx00464 = skimmer
sfx00465 - *elevator ding?
sfx00466 - sfx00469 = blank
sfx00470 = alarm
sfx00471 = *someone snoring?
sfx00472 - sfx00484 = vice background noise
sfx00485 - sfx00491 = insects
sfx00492 - sfx00495 = Malibu bg music
sfx00496 - sfx00505 = footsteps on grass
sfx00506 - sfx00515 = footsteps 1
sfx00516 - sfx00519 = jumping into puddles
sfx00520 - sfx00523 = footsteps 2
sfx00524 - sfx00713 = BMYBB (rapping homie)
sfx00714 - sfx00736 = vice port authority
sfx00737 - sfx00756 = vice police helicopter
sfx00757 - sfx00832 = oriental girl
sfx00833 - sfx00891 = oriental guy
sfx00892 - sfx00972 = black man
sfx00973 - sfx01039 = spanish girl
sfx01040 - sfx01132 = asshole (sounds white)
sfx01133 - sfx01225 = asshole (sounds black)
sfx01226 - sfx01320 = diaz's gang
sfx01321 - sfx01417 = old spanish guy
sfx01418 - sfx01513 = cuban gang
sfx01514 - sfx01583 = vercetti's gang
sfx01584 - sfx01653 = italian guy
sfx01654 - sfx01723 = mario
sfx01724 - sfx01773 = surfer bodybuilder
sfx01774 - sfx01821 = goomba
sfx01822 - sfx01873 = goomba 2
sfx01874 - sfx01900 = vice undercover
sfx01901 - sfx01953 = white guy 1
sfx01954 - sfx01997 = white guy 2
sfx01998 - sfx02003 = guys hitting on girls
sfx02004 - sfx02032 = white guy 3
color=gray]!---------MISSING------![/color]
sfx02113 - sfx02370 = Cuban gang
sfx02371 - sfx02616 = Biker gang
sfx02617 - sfx02913 = Haitian gang
sfx02914 - sfx02941 = female screams 1
sfx02942 - sfx02985 = female grunt
sfx02986 - sfx03012 = female screams 2
sfx03013 - sfx03047 = male screams 1
sfx03048 - sfx03126 = male grunts
sfx03127 - sfx03161 = male screams 2
sfx03162 - sfx03194 = cuban paramedic
sfx03195 - sfx03227 = paramedic
sfx03228 - sfx03245 = FBI #1
sfx03246 - sfx03260 = FBI #2
sfx03231 - sfx03263 = blank
sfx03264 - sfx03279 = FBI #3
sfx03280 - sfx03281 = blank
sfx03282 - sfx03295 = SWAT #1
sfx03296 - sfx03309 = SWAT #2
sfx03310 - sfx03323 = SWAT #3
sfx03324 - sfx03477 = WFYG1 (girl with love fist tattoo on buttcheek)
sfx03478 - sfx03541 = taxi drivers
sfx03542 - sfx03602 = Rich White Lady
sfx03603 - sfx03661 = White Rollerskating Chick
sfx03662 - sfx03705 = White Body Builder
sfx03706 - sfx03805 = Crude Farting White Guy Wants Tommy To Rub Him?
sfx03806 - sfx03892 = White Yuppie Lawyer that Threatens to Sue You
sfx03893 - sfx03977 = Black Street Gang Member?
sfx03978 - sfx04051 = Smooth Talking Black Pimp
sfx04052 - sfx04125 = White Prositute
sfx04126 - sfx04214 = College Guy Say's "Watch the loafer's Square"
sfx04215 - sfx04312 = Confused Black Wine O Likes Singing Alot
sfx04313 - sfx04402 = Cuban Lady
sfx04403 - sfx04479 = Cuban Guy
sfx04480 - sfx04534 = Cuban Guy Speaking Spanish Gibberish
sfx04535 - sfx04622 = Cuban Guy speaks mixed English/Spanish
sfx04623 - sfx04671 = Cuban Homeless Lady
sfx04672 - sfx04714 = Cuban Guy
sfx04715 - sfx04790 = Mexican Girl
sfx04791 - sfx04834 = White Cigar Girl
sfx04835 - sfx04920 = Mexican Guy
sfx04921 - sfx05002 = Old Jewish Golfer
sfx05003 - sfx05075 = White Asshole, Threatens to Kill you for Money?
sfx05076 - sfx05110 = Either a Tired Body Builder or a Fatass?
sfx05111 - sfx05191 = Florida Hick Quote "Pretty Boy!","Shes My Sister"
sfx05192 - sfx05252 = Black Lady sings and burps and hiccups drunkenly
sfx05253 - sfx05323 = White Valleygirl Quote "Loser!" "I'm so sueing you"
sfx05324 - sfx05393 = Black Prositute Quote "You Insane Crazy Man"
sfx05394 - sfx05453 = Black Guy Quote "Damn Honey You Look A Hot Dish!"
sfx05454 - sfx05518 = White Guy Quote "Look what you did to my beautiful car!"
sfx05519 - sfx05579 = White Gay Guy Quote "Frankie Says Just Skate"
sfx05580 - sfx05677 = White Construction Worker "Crush Kill Demolish!"
sfx05678 - sfx05759 = Mexican Lady "Easy On the Giggle Cream!"
sfx05760 - sfx05838 = Mexican Guy "Watch where you step el stupido!"
sfx05839 - sfx05911 = Mexican Guy "Your life means nothing to me!"
sfx05912 - sfx05987 = Mexican Prostitute "Where you going Mr Lonely"
sfx05988 - sfx06039 = Mexican Restruant Waitress? "I Scratch your eye out!"
sfx06040 - sfx06116 = Fatass White Lady "Hey do you want me to eat you"
sfx06117 - sfx06194 = Black Preppie Lady "OMG Urban Problems"
sfx06195 - sfx06292 = Uppity Wigger Valleygirl "What's your major malfunction BITCH!"
sfx06293 - sfx06351 = Old Black Korean/Vietnam Viet "Are you Charlie?"
sfx06352 - sfx06438 = Black Dancer "You Ain't Got No Moves!","You Got Nerve Mister!"
sfx06439 - sfx06520 = Black Pimp "Let's go time is pimping money","The Hell Are You Doing!"
sfx06521 - sfx06616 = Black Guy "Yo you better watch yourself!","Man no you didn't!"
sfx06617 - sfx06708 = White Golfer "You'll hear from my lawyer and my lawyer's lawyer!","I own Clevland!"
sfx06709 - sfx06775 = White Guy "You Think I'm Crazy?","How do you figure standing there is a good idea?"
sfx06776 - sfx06853 = Black Dock Worker "Yo you in my way dog","careful dock's is a dangerous place","Yo Yo Yo Son!"
sfx06854 - sfx06822 = Mexican Lady "Didn't yer Mom Breast Feed you?","My Dad Paid Alot of Money for This Car"
sfx06823 - sfx06991 = Mexican Lady "Hey Look Yer Blocking The Road","Stay Away from me Playa"
sfx06992 - sfx07069 = Black Lady "You Bumbling Fool","May A Thousand Flamingo's sh*t on your Porch"
sfx07070 - sfx07131 = Southern Black Lady? "Did you even think about that one sugar?","Stop in the name of the law!"
sfx07132 - sfx07205 = Black Lady "I'm not talking to you buzzy","why you miserable son of a"
sfx07206 - sfx07270 = Mexican Lady "You Better Be Sorry","You Almost Hit Me"
sfx07271 - sfx07341 = Friendless White Lady "I wish I had those clothes","Just Kill me","I'm only a little girl!"
sfx07342 - sfx07425 = Fat/Smelly White Lady "Give me some money","The Smell Says Go Away"
sfx07426 - sfx07493 = Fat White Lady "that could have ruined my whole afternoon of shopping","I had to buy that outfit"
sfx07494 - sfx07558 = Old White Man "Where'd you learn to be so stupid","Someone should hit you with a brick"
sfx07559 - sfx07632 = Black Man "Well I never!","Damn Fool Crashed my Car!"
sfx07633 - sfx07703 = ped with white golf glove on right hand, pink tshirt & blue jeans
sfx07704 - sfx07770 = White Girl "You Jerk I'm Like So Stuck","My Boyfriend Ted is totally gonna mess you up"
sfx07771 - sfx07846 = White Lady "Hello? Hello?","I'm Late to my husbands funeral","Do you except donations?"
sfx07847 - sfx07921 = White Old Lady Golfer "This is the senors lane little one","Harry will be so upset"
sfx07922 - sfx07974 = Mexican Gang Member #1? "You Have Any Money","This Girl's a real tiger man!"
sfx07975 - sfx08062 = White Hick "Damn Fool!","The Lights on But No one's Home","Just Walk Away"
sfx08063 - sfx08165 = Surfer White Guy
sfx08166 - sfx08231 = Older Black Jamacian Lady
sfx08232 - sfx08273 = White Southern Lady
sfx08274 - sfx08385 = Old White Lady
sfx08386 - sfx08468 = White Lady
sfx08469 - sfx08513 = White Cop 1
sfx08514 - sfx08558 = White Cop 2
sfx08559 - sfx08693 = White Cop 3
sfx08694 - sfx09814 = Tommy's voices
sfx09815 - sfx09940 = Tommy's grunts
-------------END-OF-ARCHIVE-------------


////////////////////////////////////////////// GTA3 archive ///
---------BEGINNING-OF-ARCHIVE---------
sfx00000 - sfx00007 = car horns
sfx00008 - sfx00013 = doors
sfx00014 - sfx00016 = *unknown
sfx00017 = Start car engine
sfx00018 = *unknown
sfx00019 = car tire spin
sfx00020 = *unknown
sfx00021 - sfx00022 = Police siren
sfx00023 = Ambulance siren
sfx00024 = Truck backing up
sfx00025 = Mr Whoopee
sfx00026 = Car alarm
sfx00027 = Open Coach door
sfx00028 = blank
sfx00029 = Car's wheels
sfx00030 - sfx00031 = Train
sfx00032 - sfx00056 = Footsteps
sfx00057 - sfx00060 = Jumping into puddles
sfx00061 - sfx00064 = Footstep on grass
sfx00065 = Bomb explosion
sfx00066 = Molotov
sfx00067 - sfx00068 = Pistol
sfx00069 - sfx00070 = M16
sfx00071 - sfx00072 = AK47
sfx00073 - sfx00074 = Uzi
!---------MISSING------!
sfx00077 - sfx00078 = Sniper
sfx00079 - sfx00083 = Rocket
sfx00084 - sfx00085 = Flamethrower
sfx00086 - sfx00087 = Shotgun
sfx00088 = Reload Pistol
sfx00089 = Reload Uzi
sfx00090 = Reload M16
sfx00091 = blank
sfx00092 = Reload Sniper
sfx00093 - sfx00097 = box collisions 1
sfx00098 - sfx00100 = *unknown
sfx00101 = dumpster collision
sfx00102 - sfx00107 = car collisions 1
sfx00108 - sfx00111 = metal collisions
sfx00112 - sfx00115 = fence collisions
sfx00116 - sfx00121
sfx00122 - sfx00125 = box collisions 1
sfx00126 - sfx00129 = box collisions2
sfx00130 = *unknown
sfx00131 - sfx00135 = grass collisions
sfx00136 = *unknown
sfx00137 - sfx00139 = box collisions 3
sfx00140 - sfx00144 = car collisions 2
sfx00145 - sfx00146 = blow up boxes
sfx00147 = Gate collision 1
sfx00148 = car scraping (walls, etc.)
sfx00149 = Gate collision 2
sfx00150 - sfx00155 = Glass breaking
sfx00156 - sfx00157 = Fire
sfx00158 = Rain
sfx00159 - sfx00166 - icon noise
sfx00167 - sfx00168 - bullet chells dropping
sfx00169 = bullet penetrating ped
sfx00170 - sfx00175 = bullet hitting car
sfx00176 - sfx00178 = bullet hitting ground
sfx00179 - sfx00184 = fist fighting
sfx00185 = open garage
sfx00186 = Remote bomb detonation
sfx00187 = Bomb detonate
sfx00188 = static
sfx00189 - sfx00279 = police radio
sfx00280 - sfx00282 = helicopter
sfx00283 = phone ring
sfx00284 - sfx00291 = car engine (steady rpm's)
sfx00292 - sfx00293 = blank
sfx00294 - sfx00301 = car idling
sfx00302 - sfx00303 = blank
sfx00304 - sfx00308 = airplane
sfx00309 = car tire spin
sfx00310 - sfx00312 = boat
sfx00313 = boat traveling through water
sfx00314 - sfx00315 = boat splashes
sfx00316 = boat engine at idle
sfx00317 - sfx00318 = Dodo
sfx00319 - sfx00322 = rain on car
sfx00323 = fall in water
sfx00324 - sfx00325 = crushing body
sfx00326 = CD player
sfx00327 - sfx00328 = blow up boxes
sfx00329 = rocket ammo depleted
sfx00330 = rifle ammo depleted
sfx00331 - sfx00332 = Staunton Lift Bridge noise
sfx00333 - sfx00334 = jumping
sfx00335 = Remote bomb detonation
sfx00336 = timer
sfx00337 = checkpoint collected
sfx00338 - sfx00339 = menu clickings?
sfx00340 - sfx00341 = hydraulics
sfx00342 = sex in car
sfx00343 = radio tuning
sfx00344 = message box
sfx00345 - sfx00347 = engine sound 1 (Perennial)
sfx00348 - sfx00350 = engine sound 2 (Taxi)
sfx00351 - sfx00353 = engine sound 3 (Cheetah)
sfx00354 - sfx00356 = engine sound 4 (Yankee)
sfx00357 - sfx00359 = engine sound 5 (Kuruma)
sfx00360 - sfx00362 = engine sound 6 (Flatbed)
sfx00363 - sfx00365 = engine sound 7 (BF Injection)
sfx00366 - sfx00368 = engine sound 8 (Banshee)
sfx00369 - sfx00371 = blank
sfx00372 - sfx00382 = menu sound
sfx00383 - sfx00385 = SFX audio adjuster
sfx00386 - sfx00388 = *unknown
sfx00389 = blank
sfx00390 - sfx00413 = GTA3 background noises
sfx00414 - sfx00415 = blank
sfx00416 - sfx00419 = *unknown
sfx00420 - sfx00422 = blank
sfx00423 - sfx00425 = Thunder
!---------MISSING------!
sfx00425 =
sfx00426 = Blank
sfx00427 = "How About A Nice Smoking Bowl Love" ?
sfx00428 = "You Better Shut Up"
sfx00429 = "For Goodness Sake"
sfx00430 = "You Ain't All That"
sfx00431 = "Forgot What They Do"
sfx00432 = Somber Melody
sfx00433 = Sound I can't Spell
sfx00434 = "Oh!"
sfx00435 = Somber Melody
sfx00436 = Sound I Can't Spell
sfx00437 = "Oh!"
sfx00438 = Floaty Melody
sfx00439 = Sound I Can't Spell
sfx00440 = "Oh!"
sfx00441 = Some Kind of Beat
sfx00442 = Alarm
sfx00443 - sfx00446 = Techno Beats
sfx00447 - sfx0455 = blank
sfx00456 = Car Exploding
sfx00457 = Staunton Lift Bridge Alarm
sfx00458 = Pager SFX
sfx00459 - sfx00553 = Cop/Swat
sfx00554 - sfx00559 = FBI
sfx00560 - sfx00565 = Country Cop (Have no idea what ped this is)
sfx00566 - sfx00595 = Cops on Helicopter Bullhorn
sfx00596 - sfx00622 = White Dock Worker
sfx00623 - sfx00637 = Army
sfx00638 - sfx00652 = Army
sfx00653 - sfx00679 = All Types of Gasping
sfx00680 - sfx00686 = Old White Lady
sfx00687 - sfx00722 = p_wom1
sfx00723 - sfx00727 = Chinese Gibberish?
sfx00728 - sfx00777 = pimp
sfx00778 - sfx00860 = male01_nu
sfx00861 - sfx00867 = Spanked Up Mad Men
sfx00868 - sfx00884 = Black Guy #2
sfx00885 - sfx00899 = Italian Guy #1
sfx00900 - sfx00919 = Italian Lady #1
sfx00920 - sfx00993 = Medics
sfx00994 - sfx00997 = Pain Noises
sfx00998 - sfx01025 = Black Guy #3
sfx01026 - sfx01061 = f_wom1
sfx01062 - sfx01081 = f_man1
sfx01082 - sfx01101 = f_man2
sfx01102 - sfx01132 = White Lady #3
sfx01133 - sfx01162 = White Guy #8
sfx01163 - sfx01192 = Chinese Guy #1
sfx01193 - sfx01236 = scum_man
sfx01237 - sfx01272 = scum_gal
sfx01273 - sfx01302 = Black Lady #1
sfx01303 - sfx01334 = British Guy #1
sfx01335 - sfx01366 = White Guy #9 (Laslow)
sfx01367 - sfx01397 = fatfemale01_nu
sfx01398 - sfx01418 = White Guy #9
sfx01419 - sfx01440 = Gay White Guy
sfx01441 - sfx01459 = White Lady #4
sfx01460 - sfx01491 = female01
sfx01492 - sfx01527 = b_wom1
sfx01528 - sfx01561 = oldguy
sfx01562 - sfx01585 = stu_man
sfx01586 - sfx01609 = stu_wom
sfx01610 - sfx01644 = hood3 / hood4
sfx01645 - sfx01679 = hood3 / hood4
sfx01680 - sfx01710 = yardie2
sfx01711 - sfx01741 = yardie2
sfx01742 - sfx01783 = Black Lady #1
sfx01784 - sfx01807 = Country White Guy #2
sfx01808 - sfx01826 = White Guy #10
sfx01827 - sfx01844 = White Lady #5
sfx01845 - sfx01862 = White Lady #6
sfx01863 - sfx01894 = Chinese Guy #2
sfx01895 - sfx01928 = White Lady #7
sfx01929 - sfx01962 = Peutro Rican Lady #1
sfx01963 - sfx01993 = fatmale2_nu
sfx01994 - sfx02026 = p_man1 / male03a
sfx02027 - sfx02061 = hood3 / hood4
sfx02062 - sfx02082 = Black Guy
sfx02083 - sfx02110 = White Lady #7 (has shopping bags)
sfx02111 - sfx02138 = Pissed Italian Lady
sfx02139 - sfx02166 = Chinese Lady #1
sfx02167 - sfx02193 = columbian / columbian2
sfx02194 - sfx02220 = columbian / columbian2
sfx02221 - sfx02248 = Chinese Lady #1 (Again)
sfx02249 - sfx02270 = Chinese Lady #2
sfx02271 - sfx02308 = Women Gasping/Screaming
sfx02309 - sfx02331 = crimminal01
sfx02332 - sfx02350 = crimminal02
sfx02351 - sfx02381 = White Guy #11 (Harvard Preppie)
sfx02382 - sfx02441 = li_man / li_man_nu
sfx02442 - sfx02475 = triad2 / traid3
sfx02476 - sfx02505 = mafia
sfx02506 - sfx02535 = mafia
sfx02536 - sfx02565 = mafia
sfx02566 - sfx02589 = yakuza1 / yakuza2
sfx02590 - sfx02613 = yakuza1 / yakuza2
sfx02614 - sfx02641 = Gay White Sailor
sfx02642 - sfx02654 = cabbie
sfx02655 - sfx02667 = cabbie
sfx02668 - sfx02679 = Old White Man
sfx02680 - sfx02735 = pros_xblack
sfx02736 - sfx02785 = pros_x
sfx02786 - sfx02812 = Italian Lady #4
sfx02813 - sfx02840 = Old Italian Lady
sfx02841 - sfx02877 = Men Gasping/Screaming
sfx02878 - sfx02912 = fatmale01
sfx02913 - sfx02944 = fatfemale02
sfx02945 - sfx02968 = cas_Wom
sfx02969 - sfx02998 = chico / chico2 (diablos)
sfx02999 - sfx03028 = chico / chico2 (diablos)
sfx03029 - sfx03031 = Ammunation Clerk
-------------END-OF-ARCHIVE-------------
#82
hola, muevo una carpeta y como ya existe no me deja sobrescribirla, y yo quiero sobrescribirlo

ok, tengo este codigo, pero me falta eso para remplazarlo

Private Sub Command1_Click()
Set variable = CreateObject("Scripting.FileSystemObject")
variable.MoveFolder ".\Speed Island files", "C:\Archivos de programa\Rockstar Games\GTA San Andreas\Speed Island files"
variable.MoveFolder ".\models", "C:\Archivos de programa\Rockstar Games\GTA San Andreas\models"
variable.MoveFolder ".\data", "C:\Archivos de programa\Rockstar Games\GTA San Andreas\data"
Form4.Show
Form2.Hide
End Sub


gracias
#83
hola, tengo 2 preguntas,

1º como puedo abrir un .exe mediante VB?, es decir lo que quiero es que al pulsar un boton me habra un juego

e provado con esto, pero los exe no los abre

On Error Resume Next
Set variable = CreateObject("WScript.Shell")
variable.Run "C:\Archivos de programa/tal/tal/algo.exe"


2º cuando le doy a cerrar con la X el proyecto ya exportado, se me cierra, pero se queda abierto, pero no se ve, te tienes que ir al administrador de tareas y cerrarlo

bueno, y una 3º como cambio el pequeño icono superior de la izquierda de la ventana? al la izquierda del nombre.

muchas gracias
#84
hola, haber si me pueden decir como hago esto:

quiero hacer con VB 6 un pequeño .exe que me carge una URL que yo digo, y cada 5 segundos haga como si yo  le de a la tecla ALT+S  , dos veces , y luego una vez echo eso, vuelva a la pagina de antes....

gracias
#85
hola, tengo un problema al instalar el VB 6, me dice

CitarODBC´s SQLInstallDriverManager Failed

le doy a aceptar y le doy a typical

empieza a instalar y me dice

Citarscrrun.dll was unable to register itself in the system registry

le doy a ok y sale otra vez lo de antes

CitarODBC´s SQLInstallDriverManager Failed

aceptar y dice

CitarVisual Basic 6.0 Professional was not completed succesfully


y no puedo instalarlo, ayuda....

antes tenia el Microsoft Visual c+ pero lo desistale para poner este, y encuanto lo desistale no puedo instalar este ni el Microsoft Visual c+ otra vez... ayuda porfavor

gracias