Excel Help for Write To Web Page

hi,

please see this code first:

VBA Code:

Option Explicit
' Add a reference to [http://www.excelforum.com/showthread.php?t=644751#] WinHTTP Services
Const HTTPREQUEST_SETCREDENTIALS_FOR_SERVER = 0

Public Sub WriteToWebsite()
Dim MyCon As New WinHttpRequest
Dim SendAuthor As String
Dim SendMessage As String

'variable to send
SendAuthor = Sheet1.Range("B3").Value
SendMessage = Sheet1.Range("B6").Value

If SendAuthor = "" Or SendMessage = "" Then
MsgBox "Enter Author and Message"
Exit Sub
End If

'Connection string to send
MyCon.Open "GET", _
"http://www.yoursite.com/get.php" & _
"?GetAuthor=" & SendAuthor & _
"&GetMessage=" & SendMessage

'send it
MyCon.Send

'clear contents
Sheet1.Range("B3").ClearContents
Sheet1.Range("B6").ClearContents
End Sub

Public Sub GoThere()
Dim newsite As Object

Set newsite = CreateObject("InternetExplorer.application")
newsite.Visible = True
newsite.Navigate _
"http://www.yoursite.com/display.php"

End Sub

this code use 2 cells to send it to [http://www.excelforum.com/showthread.php?t=644751#] page,

the quistion is: what should i add or change to make it use several cells to send theme to the page ?

from example:

i want send cell A1 AND C3 AND BA1 and so and so etc...

any help

Write To Web Page

Excel Help for Write To Web Page in Automating Data Analysis Tasks

Write To Web Page