 |
 | Home | Contact Us | FAQ | Search & Site Map | Link to Us |
 | Sign In | Join | Other 45 Sites in Network |
.NET Forum / ASP.NET / General / February 2006Classic ASP String Manipulation - NOT .net
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) 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 re: > (PS - could not find any classic ASP groups, sorry) Try posting to microsoft.public.inetserver.asp.general Juan T. Llibre, asp.net MVP aspnetfaq.com : http://www.aspnetfaq.com/ asp.net faq : http://asp.net.do/faq/ foros de asp.net, en español : http://asp.net.do/foros/ =================================== > Good Evening, > [quoted text clipped - 18 lines] > James. > (PS - could not find any classic ASP groups, sorry) > Good Evening, > [quoted text clipped - 9 lines] > 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 <snip> > (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  SignatureMicrosoft MVP -- ASP/ASP.NET Please reply to the newsgroup. The email account listed in my From header is my spam trap, so I don't check it very often. You will get a quicker response by posting to the newsgroup. >> Good Evening, >> [quoted text clipped - 15 lines] > > <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 %> SignatureMicrosoft MVP -- ASP/ASP.NET Please reply to the newsgroup. The email account listed in my From header is my spam trap, so I don't check it very often. You will get a quicker response by posting to the newsgroup. I'm glad i just wrote some pseudocode :D... though i'm still not sure if my pseudocode is what you did or not... it's been a long day. -darren > I'm glad i just wrote some pseudocode :D... 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. SignatureMicrosoft MVP -- ASP/ASP.NET Please reply to the newsgroup. The email account listed in my From header is my spam trap, so I don't check it very often. You will get a quicker response by posting to the newsgroup. Free MagazinesGet these publications absolutely FREE for up to 12 months. There are no hidden fees and no obligation. Simply choose a title, complete the application form and submit it. Read more ...
|
Reply to this Message
|
 Sign In
 Join
 My Latest Posts My Monitored Threads My Blog My Photo Gallery My Profile My Homepage Start New Thread Enable EMail Alerts Rate this Thread
|
©2009 Advenet LLC Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.