Discussions and Tech Support related to automating the iMacros Browser or Internet Explorer from any scripting and programming language, such as VBS (WSH), VBA, VB, Perl, Delphi, C# or C++.
Forum rules
iMacros EOL - Attention!
The renewal maintenance has officially ended for Progress iMacros effective
November 20, 2023 and all versions of iMacros are now considered EOL (End-of-Life). The iMacros products will no longer be supported by Progress (aside from customer license issues), and these forums will also no longer be moderated from the Progress side.
Thank you again for your business and support.
Sincerely,
The Progress Team
Before asking a question or reporting an issue:
1. Please review the list of
FAQ's.
2. Use the search box (at the top of each forum page) to see if a similar problem or question has already been addressed.
3. Try searching the
iMacros Wiki - it contains the complete iMacros reference as well as plenty of samples and tutorials.
4. We can respond much faster to your posts if you include the following information:
CLICK HERE FOR IMPORTANT INFORMATION TO INCLUDE IN YOUR POST
-
ismail3
- Posts: 1
- Joined: Fri Sep 30, 2016 2:46 pm
Post
by ismail3 » Fri Sep 30, 2016 2:50 pm
Please correct me this script because it dosn't work correctly
Code: Select all
SET !ERRORIGNORE YES
SET !TIMEOUT_PAGE 15
SET !EXTRACT_TEST_POPUP NO
SET !REPLAYSPEED FAST
VERSION BUILD=8920312 RECORDER=FX
TAB CLOSEALLOTHERS
TAB T=1
URL GOTO=http://21manga.com/viewforum.php?f=2
TAB OPEN
TAB T=2
URL GOTO=http://www.djelfa.info/vb/archive/index.php/t-19254.html
SET !EXTRACT NULL
WAIT SECONDS=3
TAG POS=1 TYPE=TITLE ATTR=* EXTRACT=TXT
SET !EXTRACT NULL
SET !EXTRACT {{!VAR3}}
SET !CLIPBOARD {{!EXTRACT}}
TAB T=1
TAG POS=1 TYPE=A ATTR=TXT:New<SP>Topic
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:postform ATTR=NAME:subject CONTENT={{!CLIPBOARD}}
TAB T=2
TAG POS=1 TYPE=DIV ATTR=CLASS:posttext EXTRACT=TXT
SET !VAR1 EVAL("var s=\"{{!EXTRACT}}\"; s.replace(\"[EXTRACT]\",\"\"); ")
SET !EXTRACT NULL
SET !EXTRACT {{!VAR1}}
SET !CLIPBOARD {{!EXTRACT}}
TAB CLOSE
TAB T=1
TAG POS=1 TYPE=TEXTAREA FORM=NAME:postform ATTR=NAME:message CONTENT=[size=150][b]{{!CLIPBOARD}}[/b][/size]
WAIT SECONDS=3
TAG POS=1 TYPE=INPUT:SUBMIT FORM=NAME:postform ATTR=NAME:post
WAIT SECONDS=3000
-
chivracq
- Posts: 10301
- Joined: Sat Apr 13, 2013 1:07 pm
- Location: Amsterdam (NL)
Post
by chivracq » Sat Oct 01, 2016 7:46 pm
ismail3 wrote:Please correct me this script because it dosn't work correctly
Code: Select all
SET !ERRORIGNORE YES
SET !TIMEOUT_PAGE 15
SET !EXTRACT_TEST_POPUP NO
SET !REPLAYSPEED FAST
VERSION BUILD=8920312 RECORDER=FX
TAB CLOSEALLOTHERS
TAB T=1
URL GOTO=http://21manga.com/viewforum.php?f=2
TAB OPEN
TAB T=2
URL GOTO=http://www.djelfa.info/vb/archive/index.php/t-19254.html
SET !EXTRACT NULL
WAIT SECONDS=3
TAG POS=1 TYPE=TITLE ATTR=* EXTRACT=TXT
SET !EXTRACT NULL
SET !EXTRACT {{!VAR3}}
SET !CLIPBOARD {{!EXTRACT}}
TAB T=1
TAG POS=1 TYPE=A ATTR=TXT:New<SP>Topic
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:postform ATTR=NAME:subject CONTENT={{!CLIPBOARD}}
TAB T=2
TAG POS=1 TYPE=DIV ATTR=CLASS:posttext EXTRACT=TXT
SET !VAR1 EVAL("var s=\"{{!EXTRACT}}\"; s.replace(\"[EXTRACT]\",\"\"); ")
SET !EXTRACT NULL
SET !EXTRACT {{!VAR1}}
SET !CLIPBOARD {{!EXTRACT}}
TAB CLOSE
TAB T=1
TAG POS=1 TYPE=TEXTAREA FORM=NAME:postform ATTR=NAME:message CONTENT=[size=150][b]{{!CLIPBOARD}}[/b][/size]
WAIT SECONDS=3
TAG POS=1 TYPE=INPUT:SUBMIT FORM=NAME:postform ATTR=NAME:post
WAIT SECONDS=3000
Yep, "at your Service", good luck, ah-ah...!
- (F)CI(M) = (Full) Config Info (Missing): iMacros + Browser + OS (+ all 3 Versions + 'Free'/'PE'/'Trial').
- FCI not mentioned: I don't even read the Qt...! (or only to catch Spam!)
- Script & URL help a lot for more "educated" Help...