Maybe I am reading your question wrong, but you are retrieving the entire HTML document header, body and all into the htmlstring variable.  Just to make sure do the following:
public function DownloadHTML( byval href as string) as HTMLDocument
    dim htmlString as string
    htmlstring = inet1.openurl( href, icString)
    debug.print htmlstring
end function
You will see that you have the entire page.
So your problem is not retrieving the text of a web page, your problem is what you do with the text once you retrieve it.  You are placing the text into the body of another page.  I would place it into the OuterHTML property of the HTML tag not the body tag.

Matthew Arnheiter

  I'm sorry - this is such an annoying problem for me that I feel I must repost over and over until I get an answer <grin>

  Can anyone fill in this function? (using the webbrowser control, the internet transfer control, or any api functions)  The only constraint is that IMAGES CAN'T BE DOWNLOADED.

  public function DownloadHTML( byval href as string) as HTMLDocument
      ...
  end function  

  This is the closest I've come, but it only gets the body of the html, and I want ALL of it -

  public function DownloadHTML( byval href as string) as HTMLDocument
      dim htmlString as string
      dim htmlDoc as htmlDocument
      htmlstring = inet1.openurl( href, icString)
      set htmldoc = new htmldocument
      htmldoc.open
      htmldoc.close
      htmldoc.body.innerhtml = htmlstring
      set downloadhtml = htmldoc
  end function

I'm sorry - this is such an annoying problem for me that I feel I must repost over and over until I get an answer <grin>

Can anyone fill in this function? (using the webbrowser control, the internet transfer control, or any api functions)  The only constraint is that IMAGES CAN'T BE DOWNLOADED.

public function DownloadHTML( byval href as string) as HTMLDocument
    ...
end function  

This is the closest I've come, but it only gets the body of the html, and I want ALL of it -

public function DownloadHTML( byval href as string) as HTMLDocument
    dim htmlString as string
    dim htmlDoc as htmlDocument
    htmlstring = inet1.openurl( href, icString)
    set htmldoc = new htmldocument
    htmldoc.open
    htmldoc.close
    htmldoc.body.innerhtml = htmlstring
    set downloadhtml = htmldoc
end function

From the example below, you will only get the HTML.
A browser does the same, then parses the document, then loads the images, then displays the whole lot.

  Can anyone fill in this function? (using the webbrowser control, the internet transfer control, or any api functions)  The only constraint is that IMAGES CAN'T BE DOWNLOADED.

  public function DownloadHTML( byval href as string) as HTMLDocument
      ...
  end function  

  This is the closest I've come, but it only gets the body of the html, and I want ALL of it -

  public function DownloadHTML( byval href as string) as HTMLDocument
      dim htmlString as string
      dim htmlDoc as htmlDocument
      htmlstring = inet1.openurl( href, icString)
      set htmldoc = new htmldocument
      htmldoc.open
      htmldoc.close
      htmldoc.body.innerhtml = htmlstring
      set downloadhtml = htmldoc
  end function

Hi Darren

Well if you just want the html from a web page then the following works fine..

Dim htmlString As String
Dim href As string

href  =  "http://www.sharkyextreme.com/"
htmlString = Inet1.OpenURL(href, icString)

This brings back all the html for that page. If you're trying to do something different, let me know and I'll have a look.

Sean

  I'm sorry - this is such an annoying problem for me that I feel I must repost over and over until I get an answer <grin>

  Can anyone fill in this function? (using the webbrowser control, the internet transfer control, or any api functions)  The only constraint is that IMAGES CAN'T BE DOWNLOADED.

  public function DownloadHTML( byval href as string) as HTMLDocument
      ...
  end function  

  This is the closest I've come, but it only gets the body of the html, and I want ALL of it -

  public function DownloadHTML( byval href as string) as HTMLDocument
      dim htmlString as string
      dim htmlDoc as htmlDocument
      htmlstring = inet1.openurl( href, icString)
      set htmldoc = new htmldocument
      htmldoc.open
      htmldoc.close
      htmldoc.body.innerhtml = htmlstring
      set downloadhtml = htmldoc
  end function

thanx sean - but if you look, they are actually the first few lines in my procedure. The problem, if I use the internet transfer control, is getting it into the form of a htmlDocument object - I don't want to do the HTML parsing myself!

------------------

  Hi Darren

  Well if you just want the html from a web page then the following works fine..

  Dim htmlString As String
  Dim href As string

  href = "http://www.sharkyextreme.com/"
  htmlString = Inet1.OpenURL(href, icString)

  This brings back all the html for that page. If you're trying to do something different, let me know and I'll have a look.

  Sean

    I'm sorry - this is such an annoying problem for me that I feel I must repost over and over until I get an answer <grin>

    Can anyone fill in this function? (using the webbrowser control, the internet transfer control, or any api functions)  The only constraint is that IMAGES CAN'T BE DOWNLOADED.

    public function DownloadHTML( byval href as string) as HTMLDocument
        ...
    end function  

    This is the closest I've come, but it only gets the body of the html, and I want ALL of it -

    public function DownloadHTML( byval href as string) as HTMLDocument
        dim htmlString as string
        dim htmlDoc as htmlDocument
        htmlstring = inet1.openurl( href, icString)
        set htmldoc = new htmldocument
        htmldoc.open
        htmldoc.close
        htmldoc.body.innerhtml = htmlstring
        set downloadhtml = htmldoc
    end function