Script to find a character code (CHR

Find the ASCII character code for equivalent text. For example, ...CHR$(34)... is a double quote(").

Find the ASCII character code for equivalent text. For example, ...CHR$(34)... is a double quote(").

If you are like me, you have printed countless pages of ASCII character codes repeatedly only to loan them to someone or simply lose them in the clutter.

This agent has "opportunities for enhancement" as does any agent, but it's a quick and dirty solution to a problem that takes up more time than it should.

Create an agent, set it to manually from the Actions Menu, run once, and name it something like "get chr$.? Then paste the code below:


Sub Initialize
        character$ = Inputbox$("Type the character for which you need the CHR code...")
	For i = 1 To 1000
		If Chr$(i) = character$ Then
			Msgbox "chr$("&Cstr(i) & ") will create a "& character$
			Exit For
		End If
	Next
End Sub
This was first published in August 2001

Dig deeper on Domino Resources - Part 4

0 comments

Oldest 

Forgot Password?

No problem! Submit your e-mail address below. We'll send you an email containing your password.

Your password has been sent to:

SearchWinIT

Search400

  • iSeries tutorials

    Search400.com's tutorials provide in-depth information on the iSeries. Our iSeries tutorials address areas you need to know about...

  • V6R1 upgrade planning checklist

    When upgrading to V6R1, make sure your software will be supported, your programs will function and the correct PTFs have been ...

  • Connecting multiple iSeries systems through DDM

    Working with databases over multiple iSeries systems can be simple when remotely connecting logical partitions with distributed ...

SearchEnterpriseLinux

SearchVirtualDataCentre.co.UK

Close