[Help] Convert .js to .vbs

Question

1.00/5 (1 vote)

See more:

i use it in imacro, but i need some assistence

Thanks a lot
_______________________________________________________________________________________________

var ret;

for (var i = 1; i <= 999999; i++) {
iimPlay("macro1")

ret = iimPlay('CODE:SEARCH SOURCE=TXT:"dog" IGNORE_CASE=YES');

if (ret == 1) { // Text was found
ret = iimPlay("macro2");
}

else if (ret != -101) {
ret = iimPlay("macro1");
}

if (ret == -101) {
break;
}

Posted 21-Jan-14 13:22pm

Immortalbard

Add a Solution

Comments

Christian Graus 21-Jan-14 19:27pm

What have you tried ? Where are you stuck ? This is simple code. Why do you need it in vbs ?

Immortalbard 21-Jan-14 19:36pm

Because i ll use in Imacros, and Imacro not support .js

Christian Graus 21-Jan-14 19:41pm

So where did the js code come from ?

Immortalbard 21-Jan-14 19:45pm

Javascript is supported in imacro for firefox but does not work in browser imacro.

Sergey Alexandrovich Kryukov 21-Jan-14 19:45pm

Why VBS, ever? This is not a standard language, unlike Javascript, Web browsers do not have to support it.
Perhaps it is for MS Scripting Host, but even then it's better to avoid it.
—SA

Christian Graus 21-Jan-14 21:39pm

He explained why. I guess he's writing macros for IE

Sergey Alexandrovich Kryukov 21-Jan-14 21:43pm

Ah... and what, it that only VBS? :-)
—SA

Christian Graus 21-Jan-14 21:45pm

I never use IE, I don't know.

Sergey Alexandrovich Kryukov 22-Jan-14 0:00am

Sure, I don't, too. Using IE is also the bad tone, as well as VS... :-)
—SA

Immortalbard 21-Jan-14 22:04pm

I do not know much about Javascript, or any type of advanced language (I'm a dentist). I studied a lot to get to this javascript but it is not meant ImacroBrowser.If someone can help me, I will be eternally grateful.
Anyway, when I use ImacroBrowser (based on IE), the use of VBScript is needed.

Basically, the macro should found a certain word, and decide whether to use or macro1 macro2 and loop forever.

Christian Graus 22-Jan-14 0:01am

Are you still stuck ?

Immortalbard 22-Jan-14 1:17am

Yes, and I'm thinking of seeking professional help

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Christian Graus · Answer 1 · 2014-01-21T13:48:00

VB

dim ret, i;

for (i = 1; i <= 999999; i++) 
     iimPlay("macro1")

     ret = iimPlay("CODE:SEARCH SOURCE=TXT:"dog" IGNORE_CASE=YES")

     if ret == 1 then // Text was found
         ret = iimPlay("macro2")
     else if (ret != -101) then
          ret = iimPlay("macro1")
     end for

     if (ret == -101) then break

next

I suggest pasting this in to your dev tools, then correcting any syntax errors it highlights. I don't know VBSCript, but this should get you started.