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ú

Mensajes - seba123neo

#3481
si te entiendo,bueno mira te prepare este ejemplo,te baja un archvio al disco duro 10 veces vos cambiale el numero y el link al archivo y listo...solo pone un boton en el formulario...

Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long

Private Sub Command1_Click()
Call Descargar("http://www.planet-source-code.com/Upload_PSC/ftp/Logic_Desi2109994182008.zip")
End Sub

Private Sub Form_Load()
Command1.Caption = "Descargar Archivo"
End Sub

Sub Descargar(Url As String)
Static a As Integer
Me.MousePointer = vbHourglass
For i = 0 To 10
a = a + 1
Call URLDownloadToFile(0, Url, "c:\archivo" & a & ".rar", 0, 0)
Me.MousePointer = vbDefault
Next
End Sub


saludos.
#3482
como estas descargando el archivo? porque si lo ahces con la api URLDownloadToFile ,nunca te muestra el cartel ese,yo hice un programa mas o menos parecido,te descarga todas la imagenes de una web a una carpeta elegida y lo hice con esa api...

saludos.
#3483
Hola,es facil jeje,no te pone el mismo resultado porque el visual te lo expresa en radianes y no en angulos,tenes que convertir,un ejemplo facil mira:

Private Sub Form_Load()
Dim PI As Double, Numero As Double
PI = 3.14159265358979
Numero = 1
MsgBox Sin(PI * Numero / 180)
End Sub


saludos.
#3484
claro,se elimina el ejecutable,porque si vos lo queres hacer desde visual basic ,te tira error porque te dice que "el archivo esta en uso",pero con ese codigo podes eliminarlo aun cuando este ejecutandose,y el ejemplo de Sh4k4 ,es lo mismo pero se elimina de una forma que no puede ser recuperada por un programa de recuperacion de arhcivos borrados,es un borrado seguro,en resumen "no deja rastro",como si nunca hubiera existido.. ::)

saludos.
#3485
Hola ¿y eso que tiene que ver con visual basic? ,configura el navegador que tengas para que no te pregunte donde queres guardar y que te lo mande a la carpeta que quieras...
o vos queres hacer un programa,lo podes ahcer con algunas api's para descargar de internet,pero,no entiendo que queres :huh:

saludos.
#3486
Cita de: brache estos ultimos dias e estado demasiado fastidioso

coincido plenamente,ya tengo las
como 2 garrafas de tanto contestar,te di un link para la api-guide que te explica casi todas las apis con ejemplos,despues el de winapi con clase que tiene todo,te explica para que sirve cada parametro,etc,te dieron un monton de links...

fijate como es de facil,Lympex te dio un link y en el primer resultado hay una respuesta ya...

y fijate este ejemplo que debe ser el que te referis:

Utilizar el Api keybd_event en vez de SendKeys

solo le tenes que pasar un parametro Long ,del numero de la tecla...



saludos.
#3487
es lo que vos pediste ,lo unico que tenes que hacer es guardar en las variables que vos queiras la letra de la palabra que vos quieras,segun el inidice o sea segun la "i"
#3488
Cita de: sextoestoy con la version 2008.

pequeño el detalle.... :P,esto deberia postearse en la categoria de .NET no aca...

en .NET seria asi:

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Palabra As String = "sebas"
        Dim i As Integer
        For i = 1 To Len(Palabra)
            MsgBox(Strings.Left(Palabra, i))
        Next
    End Sub
End Class


saludos.
#3489
fijate que vos declaras a la variable como byte y es una matriz de bytes...
#3490
Hola,mirate estos ejemplos:

Pedir Password al iniciar programa

y este que esta muy bueno,de harvey triana:

Hacer Login en programa y cifrar el Password

saludos.