10-29-2009, 10:26 PM
Hello guys,
I have three different messages in the GlobalSheet that i want my script to run thru and post to my twitter page. I know it should be a FOR loop but have no idea how and where to write it. Can you guys help me? basically, at the end of the script I should have those three message posted on my page.
I created a for loop below and it is bold. when the script is run, it's only posting the first of three messages only. I want it to go tru all three. Please help me.
Thank.
Wend
I have three different messages in the GlobalSheet that i want my script to run thru and post to my twitter page. I know it should be a FOR loop but have no idea how and where to write it. Can you guys help me? basically, at the end of the script I should have those three message posted on my page.
I created a for loop below and it is bold. when the script is run, it's only posting the first of three messages only. I want it to go tru all three. Please help me.
Thank.
Code:
Browser("Yahoo!").Page("Yahoo!").Sync
Browser("Yahoo!").Navigate "http://www.google.com/"
Browser("Yahoo!").Page("Google").WebEdit("search edit").Set "twitter.com"
Browser("Yahoo!").Page("Google").WebButton("Google Search").Click
Browser("Yahoo!").Page("twitter.com - Google Search").Link("Twitter").Click
Browser("Yahoo!").Page("Twitter").Link("Sign in").Click
Browser("Yahoo!").Page("Twitter").WebEdit("session[username_or_email]").Set "PriMeMiNiSteR"
Browser("Yahoo!").Page("Twitter").WebEdit("password").SetSecure "4ad8967a2b11bd3f6b64a0a0b"
Browser("Yahoo!").Page("Twitter").WebButton("Sign in").Click 0
While (1)
Browser("Yahoo!").Page("Twitter").WebEdit("message").Set DataTable("post", dtGlobalSheet)
[b]Dim rCount
For i = 1 to rCount
rCount= datatable.GetSheet("post").GetRowCount
Next
[/b]
Browser("Yahoo!").Page("Twitter").WebButton("update").Click
Browser("Yahoo!").Page("Twitter").Link("Home").Click
Wend