Classic ASP String Manipulation - NOT .net

James · Feb 15, 2006

Good Evening,

I would like to insert a 5 letter word into a 100 letter string, but only 1
letter at a time, and each letter separated by 10 characters!!!

Using
Alpha characters only, no numbers or punctuation in either string. The
first letter needs to use the DAY OF THE MONTH number as its insertion
point...

So the string HELLO would be inserted on the 15th day of the month as
follows:

H inserted after character 14 of the 100 letter string
E inserted after character 24 of the 100 letter string
L inserted after character 34 of the 100 letter string
L inserted after character 44 of the 100 letter string
O inserted after character 54 of the 100 letter string

The final string will therefore be 105 characters in length! It's to help
design a children's maze puzzle on a fun and games web site.

Thanks for your time,

James.
(PS - could not find any classic ASP groups, sorry)

Darren Kopp · Feb 15, 2006

I don't remember a whole lot about ASP... but i would guess something
with the following pseudocode would work

1. create character array of 105 characters
1.1 initialize array of characters to all spaces (' ')
2. get what day of month today is (ie 15, or 10, or 8)
3. chararray[dayofmonth] = 'h'
4. chararray[dayofmonth+10] = 'e'
5. chararray[dayofmonth+20] = 'l'
6. chararray[dayofmonth+30] = 'l'
7. chararray[dayofmonth+40] = 'o'

i think vb addresses arrays with () notation (so chararray(dayofmonth)
= 'h'), and dayofmonth would be an integer value with whatever the
current day is.

Hope this helps you get started, if you need more help e-mail me at
darrenkopp [at] gmail [dot] com and i will dig into some ol' ASP and
refresh my brain.

-Darren Kopp
http://blog.secudocs.com

Juan T. Llibre · Feb 15, 2006

re:

(PS - could not find any classic ASP groups, sorry)

Try posting to microsoft.public.inetserver.asp.general

Bob Barrows [MVP] · Feb 15, 2006

James said:
Good Evening,

I would like to insert a 5 letter word into a 100 letter string, but
only 1 letter at a time, and each letter separated by 10
characters!!! Using Alpha characters only, no numbers or
punctuation in either string. The first letter needs to use the DAY
OF THE MONTH number as its insertion point...

So the string HELLO would be inserted on the 15th day of the month as
follows:

H inserted after character 14 of the 100 letter string
E inserted after character 24 of the 100 letter string

Should this be "character 24" of the original 100 letter string?
Or character 24 of the new string formed in step 1?
I will assume the former

(PS - could not find any classic ASP groups, sorry)

As Juan said: microsoft.public.inetserver.asp.general

Something like this:

<html><body style="font-family:courier"></body></html>
<%
dim s, j,k
for k = 0 to 9
for j = 1 to 9
s = s & j
next
s = s & "0"
next
Response.Write s & "<BR>"

response.write newstring("HELLO", s)

function newstring(insert, bigstring)
dim start, i, tmp, offset
start=day(date)
tmp=left(bigstring,(start-1))
bigstring = mid(bigstring,start)
for i = 1 to len(insert)-1
offset=10 * (i - 1)
tmp= tmp & mid(insert,i,1) & _
left(bigstring,9)
bigstring = mid(bigstring,10)
next
newstring = tmp & bigstring
end function
%>

HTH,
Bob Barrows

Bob Barrows [MVP] · Feb 15, 2006

Bob said:
Should this be "character 24" of the original 100 letter string?
Or character 24 of the new string formed in step 1?
I will assume the former

<snip>

Since it uses an array, this may perform better:
<html><body style="font-family:courier"></body></html>
<%
dim s, j,k
for k = 0 to 9
for j = 1 to 9
s = s & j
next
s = s & "0"
next
Response.Write s & "<BR>"

response.write InsString("HELLO", s)

function InsString(insert,byval bigstring)
dim arString(), i
redim arString(2*len(insert))
for i = 1 to len(insert)
arString(2*i-1)=mid(insert,i,1)
next
dim start, offset
start=day(date)
arString(0)= left(bigstring,start-1)
offset = 0
for i = 2 to ubound(arString) - 2 step 2
offset = 9*i\2 - 9
arString(i) = mid(bigstring,start+offset,9)
next
arString(ubound(arString)) = mid(bigstring,start+offset +9)
InsString=join(arString,"")
end function
%>

Darren Kopp · Feb 16, 2006

I'm glad i just wrote some pseudocode

... though i'm still not sure
if my pseudocode is what you did or not... it's been a long day.

-darren

Bob Barrows [MVP] · Feb 16, 2006

Darren said:
I'm glad i just wrote some pseudocode ... though i'm still not sure
if my pseudocode is what you did or not... it's been a long day.

No, it's a little different, but your post did give me the idea.

descript string using classic asp ?	1	Nov 29, 2007
Classic asp security question	0	Feb 21, 2007
Classic ASP (VBScript) request	7	Jan 10, 2006
Different MD5 hashes in .NET and Classic ASP	2	Apr 7, 2006
Classic ASP text input word count problem???	1	Feb 15, 2006
Non latin characters in string literals	17	Jan 3, 2010
ASP Classic and .Net Components	1	Aug 29, 2005
Calling a .NET web service from classic ASP	5	Apr 15, 2004

Classic ASP String Manipulation - NOT .net

James

Darren Kopp

Juan T. Llibre

Bob Barrows [MVP]

Bob Barrows [MVP]

Darren Kopp

Bob Barrows [MVP]

Ask a Question

Similar Threads

Members online

Forum statistics

Latest Threads