VB6: einfach nur Internet-Seite aufrufen!!!

Dieses Thema VB6: einfach nur Internet-Seite aufrufen!!! im Forum "Webentwicklung, Hosting & Programmierung" wurde erstellt von Chris 08/15, 6. Jan. 2006.

Thema: VB6: einfach nur Internet-Seite aufrufen!!! Hi! Ich bin VB6-Einsteiger und hab mir im Laufe der Zeit angewoehnt, Programmiersprachen durch Veraendern und...

  1. Hi!

    Ich bin VB6-Einsteiger und hab mir im Laufe der Zeit angewoehnt, Programmiersprachen durch Veraendern und Ergaenzen von vorhandenen Projekten zu lernen...hat bisher auch ganz gut geklappt...

    Was ich jetzt nur machen will ist lokal gespeicherte html-Seite zu oeffnen. Die absolute Adresse is dabei aber variabel, weswegen die relative zur DLL verwendet werden muss (also sowas wie ..\..\Test\index.htm)

    Leider hab ich im Netz kein Beispiel von solch einfachen Sachen gefunden, bei den anderen Beispielen ging's gleich los mit API und ActiveX und wasweißich...

    Ich hab in meinem Projekt eine frm-Datei mit dem HELP-Button, der auf click dann die besagte HTML-Seite oeffnen soll...am Besten natuerlich mit dem Standart-Browser...
    Die Zweite Datei meines Projektes ist eine cls-Datei...

    Dank euch fuer die Hilfe!

    Chris
     
  2. Hi.

    Um die API wirst Du da nicht herrumkommen, ist aber auch nicht so wild.
    In dem Beispiel wird eine HTML Seite geöffnet, die sich im selben Ordner wie das Programm befindet (funktioniert nicht wenn das Programm direkt im Root liegt).

    Code:
    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()
    
    Dim strPfad As String
    strPfad = App.Path & \test.htm
    ShellExecute Me.hWnd, Open, strPfad, vbNullString, vbNullString, 1
    
    End Sub
    
     
  3. Hi Fizbin!

    Danke fuer die Antwort, das hat mir schon ziemlich weitergeholfen. Was ich jetzt machen muss ist sowas wie

    Code:
    strPfad = App.Path & \..\Help\test.htm
    Das funktioniert hier auf meinem Rechner ganz gut, aber kann ich das (ganz allgemein) so machen oder gibts da bessere Ansaetze?

    Danke und Gruß!

    Chris
     
  4. ey man kann mir mal einer helfen bei visual basic 6 hier mein fehler: das will ned addieren da kommt gar nix!! was kann ich machen????

    Private Sub Command1_Click()
    Dim Command1 As String
    Dim Text1 As Integer
    Dim Text2 As Integer
    Dim label1 As String

    Select Case Text1 & Text2
    Case Is > 0.00000000000001
    label1 = Text1 + Text2
    End Select

    bitte helft mir!!
     
  5. ey man kann mir mal einer helfen bei visual basic 6 hier mein fehler: das will ned addieren da kommt gar nix!! was kann ich machen????

    Private Sub Command1_Click()
    Dim Command1 As String
    Dim Text1 As Integer
    Dim Text2 As Integer
    Dim label1 As String

    Select Case Text1 & Text2
    Case Is > 0.00000000000001
    label1 = Text1 + Text2
    End Select

    bitte helft mir!!

    hier schreibt mir bitte ne e-mail an: gangster_pitbull@hotmail.de danke im vorraus
     
Die Seite wird geladen...

VB6: einfach nur Internet-Seite aufrufen!!! - Ähnliche Themen

Forum Datum
Hilfe zu einem einfachen Batchjob gesucht Software: Empfehlungen, Gesuche & Problemlösungen 22. Mai 2016
Update von 7 auf 10 klappt einfach nicht Windows 7 Forum 27. Apr. 2016
MoBo tauschen - einfach so möglich!? Hardware 30. März 2016
Update kommt einfach nicht vorran Windows 7 Forum 27. Feb. 2016
Bluetooth Verbindung vom Handy zum PC klappt einfach nicht Windows 8 Forum 22. Juni 2014