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...
I'm using
For row% = 1 to MaxRows%
linebuf$ = Session.Screen.Area(row%, 1, row%, MaxColumns%, , xBlock)
screenbuf$ = screenbuf$ + linebuf$ + Chr$ (13) + Chr$ (10)
Next....
to capture screen prints, but for some strange reason only 3/4 of the screen is captured. I don't...
Slobber away baby! You put a smile on a human's face today! Take the rest of the day off! :)
and ask your boss to kiss you on the mouth for me! hahahahah
Oooooooooh sheet! THAT FRIGGIN WORKED!!! Ooooh sheeet! You're a genius!!! A genius I tell ya!
Muuuuuuuuuuuwah!!!! kisses and hugs for you man! MuuuuuuuuwaH!
I did take out all reference to WaitHostQuiet or g_HostSettleTime and that still did not sync up the process. The only thing that's working still is the WaitForCursorMove and MoveRelative, but it takes almost 5 minutes for 4 interations. I've tried many combination with and without, speeding...
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.