Dan: (a) are you building a series, e.g. 12345C 12345D ... 12345Z (b) do you run past ‘Z’, e.g. 12345AA
(c) is the numeric digit count fixed, or variable? (d) always upper case? Bruce On May 17, 2021, 12:28 -0700, 'Karen Tellef' via RBASE-L <[email protected]>, wrote: > Dan: I needed to find drive letter mappings on a workstation, so I did this > code. I'm searching for letters A - Z (ascii 65 thru 90). I assume you can > use it. My code skipped the C drive because I was looking for USB drives. I > use the ascii codes of the letters. > > Karen > > > SET VAR vAscii INT = 65, vTestDriveLet TEXT = NULL, vSQuit TEXT = NULL > WHILE 1 = 1 THEN > SET VAR vTestDriveLet = (CHAR(.vAscii)) > IF vTestDriveLet = 'C' THEN > SET VAR vAscii = (.vAscii + 1) > CONTINUE > ENDIF > SET VAR vSFile TEXT = (.vTestDriveLet + ':\Scanned.txt') > SET VAR vCount = (CHKFILE(.vSFile)) > IF vCount > 0 THEN > -- Success. Found a file so break out of routine > BREAK > ENDIF > SET VAR vAscii = (.vAscii + 1) > IF vAscii > 90 THEN > PAUSE 2 USING 'I cannot find any drive on your computer that has a > Scanned.Txt file' + > CAPTION 'ERROR!' OPTION MESSAGE_FONT_SIZE 11 > SET VAR vSQuit TEXT = 'yes' > BREAK > ENDIF > ENDWHILE > > > > -----Original Message----- > From: Dan Goldberg <[email protected]> > To: [email protected] <[email protected]> > Sent: Mon, May 17, 2021 2:22 pm > Subject: [RBASE-L] - Increment letters > > I have a number with a letter suffix. > > 12345C > > I need to increment it to the next letter. So it would be: > > 12345D > > Has anyone done this before? I am drawing a blank… > > TIA > > Dan Goldberg > > > > -- > For group guidelines, visit > http://www.rbase.com/support/usersgroup_guidelines.php > --- > You received this message because you are subscribed to the Google Groups > "RBASE-L" group. > To unsubscribe from this group and stop receiving emails from it, send an > email to [email protected]. > To view this discussion on the web visit > https://groups.google.com/d/msgid/rbase-l/2E4830CEC16615458329D3D83342F8D0014E8C2298%40EXCHANGE10. > -- > For group guidelines, visit > http://www.rbase.com/support/usersgroup_guidelines.php > --- > You received this message because you are subscribed to the Google Groups > "RBASE-L" group. > To unsubscribe from this group and stop receiving emails from it, send an > email to [email protected]. > To view this discussion on the web visit > https://groups.google.com/d/msgid/rbase-l/449828408.1609691.1621279677901%40mail.yahoo.com. -- For group guidelines, visit http://www.rbase.com/support/usersgroup_guidelines.php --- You received this message because you are subscribed to the Google Groups "RBASE-L" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected]. To view this discussion on the web visit https://groups.google.com/d/msgid/rbase-l/1e1baaf3-c36a-44bc-837e-f66e03bec820%40Spark.
