The QBasic Forum      Other Subforums, Links and Downloads     Search
 


What I would need to check on is if the values still line up or not...

by Pete (Login The-Universe)
Admin

 

Someone posted not too long ago that they don't and I tested that and found it to be true:

CLS
x$ = ENVIRON$("CMDLINE")
DO UNTIL INSTR(x$, "\") = 0
x$ = MID$(x$, INSTR(x$, "\") + 1)
LOOP
x$ = MID$(x$, 1, INSTR(LCASE$(x$), ".exe") + 4)
PRINT x$

That returns the name of the current running exe in 98, but returns nothing in XP.

Sometime I need to check the order of the return and see if it is just a difference in the STRING associated with environ4 between the two systems or if it is the order of output generated, or both.

I live in California, so I'm "Standin' on Shakey Ground."

Pete



    
This message has been edited by The-Universe on Nov 20, 2009 1:00 AM

Posted on Nov 20, 2009, 12:50 AM

Respond to this message   

Return to Index

Response TitleAuthor and Date
* Print ENVIRON$(n) in a loop until the return = ""Clippy on Nov 20
 Why didn't I think of that?.. Oh wait, I did...Pete on Nov 20
  Don't expect much on the 98, but...Clippy on Nov 20
   * Really? I just go to the directory tree, open it, and count the rings for that. :)Pete on Nov 20
    * And here I was counting the branches....Clippy on Nov 20
     Stick around, tomorrow I'm teaching how too much watering can hurt your root drive.Pete on Nov 20
      My hard drive is fine cause I use Levitra!Clippy on Nov 21

 Copyright © 1999-2018 Network54. All rights reserved.   Terms of Use   Privacy Statement  

Quantcast