Russian LinkExchange Advertising Network

     Visual Basic Script -

MSIE 4.x!
!

.

, (BASIC - Begginners Allpurpose Symbolic Instruction Code, . :) . , . 1963 . . . , , Fortran, Cobol, Algol, PL/1, Focal Pascal. , , , .

Microsoft, ( Quick Basic). , Turbo Bacic Borland, C++. "" PC , Windows . 1991 Visual Basic, , . , , Visual Basic Java. Internet, HTML . Java Script. , . Microsoft Internet Explorer 3.0, , Java script Visual Basic Scripting Edition, VBscript. , JavaScript Netscape LiveScript. Java, Netscape JavaScript, Sun. Microsoft JScript , Sun.

Java, MSIE3.0 ( ), VBScript. Netscape Navigator (, ) VBScript, , . , QB , , VBscript , JavaScript . , , VBScript . VBScript, . , Web. :) .


C VBScript JavaScript.

VBScript, , JS VBS. , JavaScript ( :(.
: , "" .

Java Script VB Script





<FORM NAME=forma>
<INPUT TYPE="text" NAME="text1"><BR>
<INPUT TYPE="text" NAME="text2"><BR>
<INPUT TYPE="button" NAME="knopka" VALUE="" OnClick=copyfun()>
</FORM>

<SCRIPT LANGUAGE="JavaScript">

function copyfun()
{
var copytext;
copytext=document.forma.text1.value;
document.forma.text2.value=copytext;
}

</SCRIPT>

<FORM NAME=forma>
<INPUT TYPE="text" NAME="text1"><BR>
<INPUT TYPE="text" NAME="text2"><BR>
<INPUT TYPE="button" NAME="knopka" VALUE="" OnClick=copyfun()>
</FORM>

<SCRIPT LANGUAGE="VBScript">

sub copyfun

dim copytext
copytext=document.forma.text1.value
document.forma.text2.value=copytext
end sub

</SCRIPT>

, , . JS , VBS (). , VBS JS , .. copyfun(), CoPYfuN() - :). , , , VBS, , . , . , (QB TB)? .


QuickBasic VBscript - .

. , " :)" "" - VBscript, - .
, , 1 100, . , , . . .

:



10 CLS : RANDOMIZE

20 a = INT ( RND(1)*100+1 ) : p = 1

30 PRINT "   1  100,  :)"

40 PRINT " ";

50 INPUT v

60 IF a > v THEN PRINT "  " :

      p = p + 1 : GOTO 40

70 IF a 

, 0010:) GOTO (, ?). , :



10       .

20  "a"    

   1  100,     

  =1.

30, 40  .

50    "v".

60      , 

    ,    

         40.

70      ,  

    ,    

         40.

80      , ,

    ,      .

   90 THE END

:

<html>

<head>
<title> </title>
</head>

<body bgcolor="white" text="black">

< ... html VB ... >

<script language="VBscript">
... ...
</script>

</body>
</html>

, VBscript


" " :)



:


:

<FORM NAME=ugadai>
<INPUT TYPE="button" NAME="begin" VALUE=" "><BR><BR>
:<BR>
<INPUT TYPE="text" NAME="chislo"> <BR>
<INPUT TYPE="button" NAME="but" VALUE="Enter">
</FORM>

<!--************************* ******************************-->

<script language="vbscript"><!--




dim a		'  

dim p

dim v



sub begin_onclick 	'    

			  ( onclick)

			'    begin

 randomize		'    

 a=int(rnd(1)*100+1)	'   (a) 

			  

 p = 1			'  

 alert " " '      

end sub			'  



sub but_onclick		'    

			 ( onclick)    but



 v = document.ugadai.chislo.value 



'  (v)   

'     

' :  (  html ).   ugadai.

' -      chislo.  value



 v=cint(v)	'      

		' ,   (v)  -

 		'     ( cint)



 if a > v then

   alert "  ,  "

   p = p + 1

 end if



 if a < v then

   alert "  ,  "

   p = p + 1

 end if 

   

 if a = v then		  

   document.write"<center>  "&p&" .</center>"

 end if

		'  document.write  

		'       

		'  html .

				

end sub

--></script>


, . , :

__ , ? "a" "sub begin_onclick" "" ( "sub but_onclick" ). , , "a" . "public a" "dim a" "a" , . "dim a(100)" "a", . , .

__ ? . :
sub name_ ....... end sub.
name - , , " " "chislo", sub chislo_onclick .
- , "" . "onclick" , , , ( ). . : window_onload - :

<Script language="VBscript"><!--
Sub window_onload
Alert " !"
end sub
--></Script>



onmouseover - .


:

<a href="http://wanderfly.da.ru/" name="link">
</a>
<script language="vbscript"><!--
sub link_onmouseover
alert ""
end sub
--></script>

, "xxx", :) alert "" status=" ", .

__ "" ?

x = top._.document._.__text_box.value
, , .

. VBscript (, ..). - , "" .


. .

, VBscript. PRINT "" For Next x :)

.

Dim _ () dim a(10),b(20,30)
Erase _ erase a

.

= a=137 a=b c=""
Set = set a=document.forma1 .

.

' '  
Rem rem  

Boolean.

= False if a=false then ... boolean 0
= True if a=true then ... boolean -1

.

Tubidycomdubi Xxx Top

First, a quick clarification. "Comdubi" is not a separate service but a phonetic typo derived from "Tubidy.com" – often typed as tubidycomdubi by users searching quickly on mobile keyboards. Tubidy is a media search engine and file converter that allows users to search for YouTube videos, MP3 files, and music videos, then download them directly to their devices.

Unlike mainstream platforms that force streaming, Tubidy operates on download culture. You search for a song (e.g., the latest Burna Boy hit or an old-school R&B classic), preview it, and download it as an MP3 or MP4 file—all without an account, subscription, or credit card.

Beyond music, popular media on Tubidycomdubi includes:

Tubidycomdubi entertainment content and popular media is more than a keyword—it’s a window into how millions of people around the world actually consume digital culture. Whether you’re a student trying to download a study playlist, a traveler seeking offline movie clips, or a content creator hunting for audio snippets, understanding this ecosystem helps you make informed choices.

While we do not endorse piracy, we recognize that the demand for accessible, portable, and free media is a legitimate user need. The entertainment industry would do well to learn from the popularity of platforms like Tubidycomdubi by offering more flexible, low-cost, and download-friendly options. Until then, users will continue to explore the digital frontier with tools that put control back in their hands—rightly or not.

Final Takeaway: If you search for “Tubidycomdubi,” proceed with caution, respect creators, and consider supporting free legal alternatives. The future of popular media lies not in walls and subscriptions, but in equitable access for all.


Disclaimer: This article is for informational purposes only. Laws regarding digital media downloads vary by country. Always respect copyright and intellectual property rights.

is an online media search engine and downloader that allows users to find, stream, and save music and videos for free. It operates by indexing content from various public platforms, such as YouTube, and converting it into downloadable formats like for audio and for video. The Role of Tubidy in Modern Entertainment tubidycomdubi xxx top

In an era dominated by subscription-based streaming, Tubidy has carved out a unique space for users who prioritize offline access

and affordability. It is particularly popular in regions like South Africa

, where high data costs and inconsistent internet connectivity make downloading files a practical alternative to constant streaming. Vast Media Library

: The platform provides access to a wide range of genres, from global pop and hip-hop hits to regional favorites like Simplicity and Speed

: One of its core appeals is its "no-fuss" approach. Users can search and download content instantly without the need for registration or account creation. Mobile-First Design

: The platform is highly optimized for mobile browsers, ensuring that even users with older or lower-spec smartphones can navigate and download media efficiently. Popular Media Features

Tubidy distinguishes itself through several functional features designed for the casual listener and the media collector alike: Multi-Format Conversions First, a quick clarification

: It serves as a converter, allowing users to turn video links into high-quality audio files (up to ) or various video resolutions. Ease of Discovery

: Beyond simple searching, users can find trending tracks and explore curated playlists organized by mood or activity, such as "workout" or "chill". Device Compatibility

: Files downloaded are in standard formats that play across most native media players on Android, iOS, and desktop systems without requiring specialized software. Legal and Safety Considerations

While Tubidy provides a convenient service, it operates in a complex legal landscape. It acts as an indexing tool

rather than a host, meaning it does not own the content it retrieves.

Tubidy is a widely used multimedia search and download platform that aggregates audio and video content from across the internet, particularly from platforms like YouTube, Facebook, and Instagram . It is primarily recognized as a "gateway" service that allows users to find, stream, and convert online media into downloadable formats for offline use . Core Functionality & Content

Tubidy (often accessed via tubidy.com or similar domains) is a mobile-first search engine and media platform used primarily for finding and downloading music (MP3) and videos (MP4). It functions as a gateway to content indexed from across the web, most notably from platforms like YouTube. Disclaimer: This article is for informational purposes only

Below is an overview of the entertainment content and popular media features typically found on this platform. Core Media Content

Music Downloads (MP3): Tubidy is widely known for converting and providing music files in high-quality audio formats. It spans genres such as Pop, Hip-Hop, Amapiano, Gospel, and Rock.

Video Downloads (MP4): Users can download music videos, movie clips, and tutorials. It often provides multiple resolution options (e.g., 360p, 480p, 720p) to suit different device storage and data needs.

Trending Media: The platform highlights popular search results, allowing users to discover "viral" tracks and the latest international hits. Key Features for Users

Tubidy is a platform that allows users to search, stream, and download music and videos for free. If someone is searching for "tubidycomdubi xxx top," they might be looking for the top or most popular music or video content on Tubidy, possibly within a specific category or genre indicated by "xxx."

Here's an insightful look into what this could entail:

, :
+ And / = Eqv ^ > <= Imp <> \ < => Mod * - Or & Xor

Instr (, , ) If Instr(1,mail,@) then ...
Lcase () a=Lcase("") ... a=""
Ucase () a=Ucase("") ... a=""
Left (,N ) a=Left("",3) ... a="" N
Right (,N ) a=Right("",3) ... a="" N
Len () a=Len("") ... a=6
Ltrim () a=Ltrim(" ",) a=" "
Rtrim () a=Rtrim(" ",) a=" "
Trim () a=Ttrim(" ",) a=""
Mid (, , N ) a=Mid("",3,2) a="" "" N
Left(,N ) a=Left("",3) a="" N
Space (N) a=Space(5) N
String (N , ) a=String(5,"A") a="AAAAA" N
Ltrim () a=Ltrim(" ",) a=" "

Call _ Call but_onclick
Do
...
Loop Until
Do
a=a+1
Loop Until a>=5
,
Do
...
Loop While
Do
a=a+1
Loop While a<5
,
Do Until
...
Loop
Do Until a>=5
a=a+1
Loop
,
Do While
...
Loop
Do While a<5
a=a+1
Loop
,
For = To Step
...
next
For i=1 to 5
a=a+1
next
(: "next" "next i")
IF Then
1
Else
2
End if
IF a>1 Then alert""
Select Case X
Case 1

Case 2
2
...
End select
Select Case X
Case 10
alert"x=10"
Case 20
alert"x=20"
End select
While

Wend
While a<5
a=a+1
Wend

O

Dim Dim a
Sub _

End sub
Sub but_onclick
Alert x
End sub
Function ()

End function
Function(x,y)
x=x*y
End function
Exit ... Exit Do (For, Function, Sub)

VBscript.

, : , html (, , ..), , , . , .

, .

:



<html>



 <head>

   <script language="VBScript">

	Sub but_onclick

	 Alert " :)"

	End sub

   </script>

 </head>



 <body>

   <form>

	<input type="button" name="but">

   </form>

 </body>

</html>

, , . name="" , "" , .

:



<html>



 <head>

   <script language="VBScript">

	Sub scenariy

	 Alert " :)"

	End sub

   </script>

 </head>



 <body>

   <form>

	<input type="button" name="but" _

      onclick="scenariy" language="VBScript">

   </form>

 </body>

</html>

Java Script. , , .

:



<html>

 <body>

   <script language="VBScript">

	Alert " "

   </script>

 </body>

</html>

.

:



<html>

 

 <head>

   <script language="VBScript">

	Sub but_onclick

	  Call butalert(" ")

	End Sub



	Sub butalert(a)

	  Alert a

	End Sub

    </script>

 </head>



<body>

   <form>

	<input type="button" name="but" _

      onclick="scenariy" language="VBScript">

   </form>

 </body>

</html>

, , :


VBscript

, "" , , (a$=""). VBscript , , VARIANT. . , , . , , "3" "2" "32":





<Script language="VBscript">

sub summa



 	  summatext1=document.formasum.summa1.value

	  summatext2=document.formasum.summa2.value

	  alert summatext1+summatext2



end sub

</Script>

, summatext1 summatext2 Cint():





<Script language="VBscript">

sub summa



 	  summatext1=Cint(document.formasum.summa1.value)

	  summatext2=Cint(document.formasum.summa2.value)

	  alert summatext1+summatext2



end sub

</Script>

VARIANT.


Epty - , .
Null - , .
Boolean CBool(x) , True False
Byte CByte(x) 0..255
Integer CInt(x) -32768 .. 32768
Long CLng(x) -2147483648 .. 2147483647
Single CSngl(x)
Double CDbl(x)
Date/Time CDate(x) 1 100 31 9999
Currency CCur(x)
String CStr(x)
Object - ole, html, ActiveX
Error -

VBscript

.

, :



if a=1 and b=2 or c=3 then alert a

    

if    a=1 _

  and b=2 _

   or c=3 _

then alert a

"" "&" "+", .. a="" b="" a&b=""

, , <Script language="Vbscript><!-- --></script>


, VBscript, , , ActiveX . , , ( :) " VBscript" . .

!


, , VBScript. , , , . 15 ! .


(23.09.1998) www.midi.ru