Avatar billede sbm Nybegynder
14. november 2003 - 13:29 Der er 8 kommentarer og
1 løsning

HTTP-forespørgsel fra en Word-makro?

Er det muligt at lave en HTTP-forespørgsel fra en Word-makro?

I så fald, er der nogen der har en URL eller et regulært eksempel på hvordan det kan gøres?
Avatar billede thor.ostergaard Nybegynder
14. november 2003 - 13:32 #1
Jeg har et eksempel liggende her:
http://www.kursusmaterialer.dk/Excel%20VBA/Diverse/Office%20integration.aspx

Det er godt nok fra Excel, men jeg skulle mene, at du kan gøre det samme i Word.
Avatar billede sbm Nybegynder
14. november 2003 - 14:16 #2
Nah... Den brokker sig over SHDocVw.InternetExplorer

user-defined type not found
Avatar billede thor.ostergaard Nybegynder
14. november 2003 - 14:17 #3
Har du husket at inkludere reference til Microsoft Internet Controls?
Avatar billede sbm Nybegynder
14. november 2003 - 14:20 #4
Næ. :-)
Avatar billede thor.ostergaard Nybegynder
14. november 2003 - 14:24 #5
Så skulle du være kørende. Jeg har testet dette og det kører.

Sub HentInfo()
    Dim oIE As SHDocVw.InternetExplorer
    Dim sPage As String
    Dim intStart, intSlut As Long
    Dim Info As String
    Set oIE = New SHDocVw.InternetExplorer
    oIE.Navigate "http://www.dr.dk"
    Do Until oIE.ReadyState = READYSTATE_COMPLETE
        DoEvents
    Loop

    sPage = oIE.Document.body.InnerHtml
    intStart = InStr(1, sPage, "<!-- Dette er Vejrtekst  start -->")
    intSlut = InStr(intStart, sPage, "<!-- Dette er Vejrtekst  slut -->")
    Info = Mid(sPage, intStart, intSlut - intStart)
    MsgBox Info
End Sub
Avatar billede thor.ostergaard Nybegynder
14. november 2003 - 14:25 #6
Du kan også læse mere her:
http://www.microsoft.com/mind/0898/dom.asp
Avatar billede thor.ostergaard Nybegynder
17. november 2003 - 18:26 #7
Er det ved at være lukketid her?
Avatar billede sbm Nybegynder
18. november 2003 - 11:27 #8
Tja. Jeg har ikke fået taget mig tid til at kigge på det. Jeg tager dit ord for at det virker. :-)

Kan du lige sige mig hvordan jeg inkluderer reference til Microsoft Internet Controls?
Avatar billede thor.ostergaard Nybegynder
18. november 2003 - 11:31 #9
I VBA editoren vælger du Tools | References menuen - i den liste der fremkommer finder du Microsoft Internet Controls, sætter et hak i firkanten og klikker på OK.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester