Knowledge Base: Examples of Recursion

Recursion: each item of an expression is generated by repeating a particular definition recursively.

Recursively Removal of Multiple Spaces by Using VBScript

Example of Recursively Removal of Multiple Spaces by Using VBScript.last updated 01Sep2017

!DOCTYPE html>

ASP VbScript Command:

<script runat="server" language="VBScript">
Dim strs
strs="<!DOCTYPE html>"&vbCrLf&_
"<html lang=""en"">"
Response.Write prtwoctrl("Sample Display: """&strs&"""")
Response.Write prtwoctrl("Sample Storage: """&replace(strs," ","%20")&"""")
Call prtwoctrl("Start Removal of Multiple Spaces")
Call rmv_gap(strs)
Call prtwoctrl("End of Recursion")

Function rmv_gap(blk_str)
Dim a,b,c,d
a= split(blk_str,"<",2)
Select Case ubound(a)
Case 1, "1"
b=split(a(1),">",2)
c=split(b(0)," ",2)
Select Case lcase(c(0))
Case "!doctype"
rmv_gap="<"&c(0)&">"
End Select
Case Else
rmv_gap=a(0)
End Select
Call prtwoctrl(""""&rmv_gap&"""")
End Function

Function prtwoctrl(blk_str)
Dim temp_blk_str
temp_blk_str=Replace(Replace(Replace(Replace(Replace(blk_str,"&","&amp;"),"<","&lt;"),"""","&quot;"),">","&gt;"),"%20"," ")&"<br />"
Response.Write temp_blk_str
End Function

Function rmvspace(blk_str)
Dim a,b,c
a= split(blk_str," ",2)
If ubound(a)=1  Then
    c=ltrim(a(1))
    Select Case c
        Case ""," ",null
            b= a(0)&" "
        Case Else
            b= a(0)&" "& rmvspace(c)
    End Select
Else
   b=a(0)
End IF
rmvspace=b
Response.Write  "&quot;"&b&"&quot;"&"<br />"
End Function
</script>

HTML Web Page In-line Output:

Sample Display: "<!DOCTYPE html> <html lang="en">"
Sample Storage: "<!DOCTYPE html> <html lang="en">"
Start Removal of Multiple Spaces
"<!DOCTYPE>"
End of Recursion

Link:http://output.to/sideway/default.asp?qno=180300802

Windows Media Player

Windows Media Player is a utility used for playing audio, video and viewing images.

The graphic interface of Windows Media Player from microsoft.com:

Site of win

Microsoft - Official Home Page https://www.microsoft.com/en/us/ last updated 2/2/2018

Links of Windows Media Player

Get Windows Media Player - Windows Help https://support.microsoft.com/en-us/help/14209/get-windows-media-player last updated 3/8/2018
Getting the Windows DVD Player app - Microsoft Community https://answers.microsoft.com/en-us/insider/forum/insider_apps-insider_other/getting-the-windows-dvd-player-app/6c94b519-8b05-462e-a864-b7ad67d5c834?tm=1438117403084 last updated 3/8/2018
How to determine the version of Windows Media Player https://support.microsoft.com/en-gb/help/190990/how-to-determine-the-version-of-windows-media-player last updated 3/8/2018
Windows Media - Windows Help https://support.microsoft.com/en-us/help/17946/windows-media last updated 3/8/2018
Windows Media Player 11 Beta is out – The UsefulTechnology Blog https://blogs.technet.microsoft.com/usefultechnology/2006/05/17/windows-media-player-11-beta-is-out/ last updated 3/8/2018
Windows Media Player 12 - Windows Help https://support.microsoft.com/en-us/help/17615/windows-media-player-12 last updated 3/8/2018

Link of Related Download

Download Codec Installation Package from Official Microsoft Download Center https://www.microsoft.com/en-us/download/details.aspx?id=507 last updated 3/9/2018
Download Media Feature Pack for N and KN versions of Windows 10 from Official Microsoft Download Center https://www.microsoft.com/en-us/download/details.aspx?id=48231 last updated 3/9/2018
Download Media Feature Pack for N and KN versions of Windows 10 from Official Microsoft Download Center https://www.microsoft.com/en-us/download/details.aspx?id=49919 last updated 3/9/2018
Download Media Feature Pack for N and KN versions of Windows 8 from Official Microsoft Download Center https://www.microsoft.com/en-us/download/details.aspx?id=30685 last updated 3/9/2018
Download Media Feature Pack for N and KN versions of Windows 8.1 from Official Microsoft Download Center https://www.microsoft.com/en-us/download/details.aspx?id=40744 last updated 3/8/2018
Download Media Feature Pack for Windows 7 N with Service Pack 1 and Windows 7 KN with Service Pack 1 (KB968211) from Official Microsoft Download Center https://www.microsoft.com/en-us/download/details.aspx?id=16546 last updated 3/9/2018
Download Media Transfer Protocol Porting Kit from Official Microsoft Download Center https://www.microsoft.com/en-us/download/details.aspx?id=19153 last updated 3/9/2018
Download Windows Media Player 10 from Official Microsoft Download Center https://www.microsoft.com/en-us/download/details.aspx?id=20426 last updated 3/9/2018
Download Windows Media Player from Official Microsoft Download Center https://www.microsoft.com/en-us/download/windows-media-player-details.aspx last updated 3/8/2018
Windows Media Player (64-bit) - Free download and software reviews - CNET Download.com http://download.cnet.com/Windows-Media-Player-64-bit/3000-2139_4-10600284.html last updated 3/9/2018

MAR 2018

S	M	T	W	T	F	S

				1	2	3
4	5	6	7	8	9	10
11	12	13	14	15	16	17
18	19	20	21	22	23	24
25	26	27	28	29	30	31

OCT 2017

S	M	T	W	T	F	S

1	2	3	4	5	6	7
8	9	10	11	12	13	14
15	16	17	18	19	20	21
22	23	24	25	26	27	28
29	30	31

Sideway BICK Blog

08/03