Keskustelu: Ohjelmointikysymykset: VB6: Portin kuunteleminen @ VB

1. Miten Visual Basicilla pystyy pistämään kaikki internetistä porttiin 9899 tulleet viestit muuttujaan?

2. Miten VB:llä voisi ajaa php-skriptin niin, ettei käyttäjä huomaisi sitä...

lainaus:

2. Miten VB:llä voisi ajaa php-skriptin niin, ettei käyttäjä huomaisi sitä...

Tarvitset ensinnäkin palvelimen, missä tuo PHP-skripti ajetaan. Sitten skriptin ajaminen "huomaamattomasti" onnistuu kopioimalla sivu Internetistä esimerkiksi URLDownloadToFile-funktiolla. Käyttäjä tosin voi edelleen huomata tapahtuman palomuurista tai modeemin valojen vilkkumisesta.

Esimerkki:

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 Form_Load()
    Dim osoite As String, tiedosto As String, x As Long

    'sivun osoite Internetissä
    osoite = "https://www.ohjelmointiputka.net/keskustelu/1771-portin-kuunteleminen-vb"
    'tiedosto, jonne kopioidaan
    tiedosto = "c:\internetista.txt"

    'kopioidaan tiedosto ja otetaan palautusarvo talteen
    x = URLDownloadToFile(0&, osoite, tiedosto, 0&, 0&)

    'jos palautusarvo on 0, kopiointi onnistui ja sivu voidaan näyttää...
    If x = 0 Then
        'näytetään skriptin tuottama sivu muistiossa
        Shell "notepad c:\internetista.txt", vbNormalFocus
        'tuhotaan tiedosto
        Kill "c:\internetista.txt"
    '...muussa tapauksessa näytetään virheilmoitus
    Else
        MsgBox "Kopiointi epäonnistui (virhe " & x & ")."
    End If

    End
End Sub

Muuten ihan hyvä, mutta skripti on semmoinen että se pitää suorittaa palvelimella (kirjoittaa tiedostoon).

Ja tietääkö joku vastausta tuohon portin kuunteluun?

lainaus:

Muuten ihan hyvä, mutta skripti on semmoinen että se pitää suorittaa palvelimella (kirjoittaa tiedostoon).

No kyllähän se skripti voi tehdä palvelimella mitä tahansa, esimerkiksi juuri kirjoittaa tiedostoon, ja vasta sitten tuottaa tiedostoon haettava sivun.

Niin tietysti... KIITOS! (minä tyhmä...)

Mutta vieläkin on epäselvää tuo portin kuuntelu.. :/

Olisiko tuosta apua:
http://mureakuha.com/koodikirjasto/Visual Basic/115
En viitsinyt kopsata koodia tähän.