DustoBOE,
You should just try the things you're not sure will work. If you save with a .ebh extension and it doesn't work, then ....!
This is how I learned... for the most part.
J
If you follow the above suggestion from remy988, your 'main' macro will only run the macros in the order you list them.
You'll have one macro, say it's called 'CallMacR.ebm' Then you'll have each separate mac - Trbl1.ebm, Trbl2.ebm etc..
CallMacR.ebm will call Trbl1.ebm first (if that's the...
Sometimes my macros are too long. Is there a way I can call a macro from a macro? Or is there a way I can run a macro without running into errors because it's too long?
I've been using the following forever and now suddenly it's not working. It writes to the the text file but then clears out the text file upon the Screenbuf$ ="" command.
I'm not sure why this suddenly isn't working anymore.
Screenbuf$ = ""
linebuf$ = Space$ (Maxcolumns%)
Looks...
I got this to work by doing:
For row% = 1 to 27
linebuf$ = Session.Screen.Area(row%, 1, row%, 132, , xBlock)
screenbuf$ = screenbuf$ + linebuf$ + Chr$ (13) + Chr$ (10)
Thanks.
I've used this site quite a bit in the past and have always been able to get my code up and running. This is the first time I've had this much of a difficult time.
You are right! My code is now a confused mess! It was working but apparently I must have made a mess of it.
Grrrrr! Now it's not running at all.
' Global variable declarations
Global g_HostSettleTime%
Global g_szPassword$
Dim rc%, row%, MaxColumns%, MaxRows%, filenum%
Dim Screenbuf$, linebuf$, FileName$
Dim System As Object
Dim Session as Object
Dim sText As String
Dim...
to print, I was using:
filenum% = FreeFile
FileName$ = "H:\Projects\text file\REPORTS 6.txt"
Open FileName$ For Append as filenum%
Print # filenum%, screenbuf$; Chr$ (12)
Close filenum%
Screenbuf$ = ""
linebuf$ = Space$ (MaxColumns%)
so I'm not sure...
I tried changing xStream to xBlock and that still cut off half the screen;
For row% = 1 to MaxRows%
linebuf$ = Session.Screen.Area(row%, 1, row%, MaxColumns%, , xBlock)
screenbuf$ = Session.Screen.Area(1, 1, MaxRows%, MaxColumns%, , xBlock).Value
this is how its defined:
' Determine the size of the Presentation Space
MaxRows% = Session.Screen.Rows()
MaxColumns% = Session.Screen.Cols()
' Initialize variables to hold screen information
Screenbuf$ = ""
linebuf$ = Space$ (MaxColumns%)
I'll see if I can incorporate your...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.