Visual basic 6.0 DDEInitiate

[Verwijderd]

Heey,

Ik ben bezig met een toolbar in visual basic (6.0) Deze moet alleen verschillende gegevens van internet explorer op halen, nou had ik een voorbeeld gevonden waarin DDE gebruikt word om de Current url op te vragen:

Sub getUrlAndTitle() Dim channell As Long, response1 As String Dim url1 As String, title1 As String, i As Integer channel1 = DDEInitiate(App:="IExplore", Topic:="WWW_GetWindowInfo") response1 = DDERequest(Channel:=channel1, Item:="0xFFFFFFFF") DDETerminateAll i = InStr(response1, ",") url1 = Mid(response1, 2, i - 3) Title = Mid(response1, i + 2, Len(response1) - i - 2) MsgBox Title MsgBox url1 End Sub

De functie DDEInitiate kent hij niet, opzich logisch want ik heb geen module's of referentie's of zoiets geimporteerd, Weten jullie welke ik moet importeren? of weten jullie een andere methode om de current url, en andere iexplorer gegevens op te vragen?

[PolarBear]

Als je nou de codetag gebruikt ipv een tabel dan is de code een stuk leesbaarder:

Visual Basic:

Sub getUrlAndTitle()
Dim channell As Long, response1 As String
Dim url1 As String, title1 As String, i As Integer

channel1 = DDEInitiate(App:="IExplore", Topic:="WWW_GetWindowInfo")
response1 = DDERequest(Channel:=channel1, Item:="0xFFFFFFFF")
DDETerminateAll

i = InStr(response1, ",")
url1 = Mid(response1, 2, i - 3)
Title = Mid(response1, i + 2, Len(response1) - i - 2)
MsgBox Title
MsgBox url1
End Sub

En misschien moet je ook niet vragen of je jouw op Google gevonden code willen debuggen.

[ Voor 4% gewijzigd door PolarBear op 26-12-2006 18:24 ]

[Verwijderd]

In princiepe vraag ik daar ook niet om; Ik vraag om de oplossing voor het probleem:

hoe krijg ik de huidige URL van een browser in vba.

Zelf had ik al een stukje code gevonden op google,
k ga geen vragen posten zonder eerst te hebben gegoogled ,
iig Heeft er iemand een antwoord?

[RobIII]

Verwijderd schreef op woensdag 27 december 2006 @ 10:28:
In princiepe vraag ik daar ook niet om; Ik vraag om de oplossing voor het probleem:

hoe krijg ik de huidige URL van een browser in vba.

Zelf had ik al een stukje code gevonden op google,
k ga geen vragen posten zonder eerst te hebben gegoogled ,
iig Heeft er iemand een antwoord?

In princiepe geven wij ook geen "oplossingen" voor een probleem
We helpen je hooguit in de juiste richting, we zijn geen afhaalbalie voor kant-en-klare oplossingen. Als je een stukje code bij elkaar gegoogled hebt en dat zonder te begrijpen wat het doet knipt & plakt in je project (en dan maar bidden dat het werkt) dan ben je verkeerd bezig. In PRG hebben we het over zélf programmeren en verwachten we een flinke dosis eigen inzet en initiatief om voor jezelf tot een oplossing te komen voordat je een topic opent. Los daarvan geven we sowieso geen support op scripts/code/producten van derden. Als je daar vragen over hebt moet je even contact opnemen met die partij

Anyway; nog een pointer in de juiste richting voor ik het topic sluit: Voila en hoppa

Verwijderd schreef op woensdag 27 december 2006 @ 10:28:
hoe krijg ik de huidige URL van een browser in vba.

Overigens, is het nou VBA of VB6? VBA = Visual Basic for Application, VB6 is iets anders

[ Voor 20% gewijzigd door RobIII op 27-12-2006 13:54 ]