I can get it to run a variety of different ways ... EXCEPT as 
described in the title ... VBScript within AFL Function ... You have 
removed the function which is what I need to be able to do ...

--- In [email protected], "Grover Yowell" <[EMAIL PROTECTED]> wrote:
>
> Fred,
> I've just started to look at vbscript, but I tried your program and 
found
> the same results as you.  Also, I noted that when I inserted your 
program as
> an indicator, or in AA, it caused the main chart to disappear and a 
program
> execution error.
> 
> At that point I simplified your program and tried the following 
with the
> same result:
> EnableScript("VBScript");
> y=6;
> printf(NumToStr(y) + "\n");
> <%
>                R = AFL.Var("y")
>               MsgBox CStr(R)
>               AFL.Var("t")=R+1
> %>
> printf(NumToStr(t) + " end\n");
> 
> Again, the MsgBox popped up with the correct result but program 
execution
> halted and the main chart disappeared.
> 
> 
> At that point, I eliminated the MsgBox line and everything worked.  
So I
> think the problem in the MsgBox statement.  Don't have a clue on 
what is
> causing the problem.  I am running Windows XP Pro.  I have also 
tried to run
> the Jscript for export image within AFL and found a similar problem 
of
> execution halting.
> 
> Hope this helps.
> 
> Grover
> 
> -----Original Message-----
> From: [email protected] [mailto:[EMAIL PROTECTED] 
On Behalf
> Of Fred
> Sent: Monday, October 02, 2006 17:40
> To: [email protected]
> Subject: [amibroker] VBScript within AFL Function ?
> 
> Anyone have a clue why this apparently doesn't work ?
> 
> RRR apparently never gets the value of what is in YYY and thus 
never 
> returns it to TTT. The MsgBox also shows RRR to be non existant. 
> There are however no problems with SSS which is set in VBS.  It 
shows 
> in the message box and via printf.
> 
> EnableScript("VBScript");
> 
> function XXX(YYY)
> {
>     ZZZ = 0;
> 
>     printf(NumToStr(YYY) + "\n");
> 
>     <%
>         RRR = AFL.Var("YYY") 
>         SSS = 7
> 
>         MsgBox CStr(RRR) + " " + CStr(SSS)
> 
>         AFL.Var("TTT") = RRR
>         AFL.Var("UUU") = SSS
>     %>
> 
>     printf(NumToStr(TTT) + "\n");
>     printf(NumToStr(UUU) + "\n");
> 
>     ZZZ = 0;
> 
>     return;
> }
> 
> XXX(6);
> 
> 
> 
> 
> 
> Please note that this group is for discussion between users only.
> 
> To get support from AmiBroker please send an e-mail directly to 
> SUPPORT {at} amibroker.com
> 
> For other support material please check also:
> http://www.amibroker.com/support.html
> 
>  
> Yahoo! Groups Links
>






Please note that this group is for discussion between users only.

To get support from AmiBroker please send an e-mail directly to 
SUPPORT {at} amibroker.com

For other support material please check also:
http://www.amibroker.com/support.html

 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/amibroker/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/amibroker/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:[EMAIL PROTECTED] 
    mailto:[EMAIL PROTECTED]

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 



Reply via email to