Mensajes

Cuando uno se desespera tanto se vuelve ciego

A todos nos ha pasado creo yo

Siento decepcionarlos pero aca hay uno que se va... simplemente por la desorganización y la tardanza

Saludos.

Felicitaciones, espero el segundo capitulo

Muy bueno que esten haciendo estos talleres

[@nitr0x]

Espero la segunda parte

Aunque tu imagen se fue a abajo

Mi imagen de q? tengo imagen y todo? xDD No hay mucho que explicar por ahora, ya iré poniendo pokito a poko


@nitr0x: Veras yo tengo el fasm instalado en H:\archivos de programa\fasm, cuando lo normal es que se encuentre en C:\archivos de programa\fasm. Cambia la H de detras del include por una C (y si la ruta es otra pues la ruta completa) y ya te funcionará

Salu2

Me referia a que las imagenes del taller no se veian

Aunque no haz explicado mucho me gustó.
Sigue asi.
Aunque tu imagen se fue a abajo

Saludos.

Hola, hace dias que el foro esta lento, a veces se ve "feo".

Parece que estan jugando mucho a "¿Quien cambio el CSS?" o no se es algo parecido

Sino esta bajo un DDOS

[De todas formas ninguno de nosotros invento el lenguaje ni la manera de hacerlo]

Porque discuten tanto por una cosa tan insignificante.

Ya se sabe que para abrir una determinada pagina web hay muchas formas y que algunas dan otro tipo de resultado o son mas faciles...

De todas formas ninguno de nosotros invento el lenguaje ni la manera de hacerlo

PD: madeinjaes no ha respondido ya dejenlo asi

Ejemplo Api-Guide:

Código (vb) [Seleccionar] Expandir


'In general section
Private Declare Function GetDiskFreeSpace Lib "kernel32" Alias "GetDiskFreeSpaceA" (ByVal lpRootPathName As String, lpSectorsPerCluster As Long, lpBytesPerSector As Long, lpNumberOfFreeClusters As Long, lpTtoalNumberOfClusters As Long) As Long

Private Sub Form_Load()
    'KPD-Team 1998
    'URL: http://www.allapi.net/
    'E-Mail: KPDTeam@Allapi.net

    Dim Sectors as Long,Bytes as Long,FreeC as Long, TotalC as Long,Total as Long,Freeb as Long
    'Retrieve information about the C:\
    GetDiskFreeSpace "C:\", Sectors, Bytes, Freec, Totalc
    'Set graphic mode to persistent
    Me.AutoRedraw = True
    'Print the information to the form
    Me.Print " Path: C:\"
    Me.Print " Sectors per Cluster:" + Str$(Sector)
    Me.Print " Bytes per sector:" + Str$(Bytes)
    Me.Print " Number Of Free Clusters:" + Str$(Freec)
    Me.Print " Total Number Of Clusters:" + Str$(Totalc)
    Total = rTotalc& * rSector& * rBytes&
    Me.Print " Total number of bytes in path:" + Str$(Total)
    Freeb = rFreec& * rSector& * rBytes&
    Me.Print " Free bytes:" + Str$(Freeb)
End sub


Código (vb) [Seleccionar] Expandir


Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Command1_Click()
ShellExecute Me.hwnd, vbNullString, "http://www.paginaweb.com", 0, 0, 1
End Sub

No te conformes con preguntar.

Esto es lo que ocurre: