ForumsProgramming ForumVBS 2

11 4705
Qwerty001
offline
Qwerty001
422 posts
Nomad

So apparently my last thread got banned for plagerism... but did I ever mention that they were mine? No.

Anyway, this 1 is mine*:

Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
If colCDROMs.Count >= 1 then
If MsgBox("Do you need somewhere to place your drink?", vbYesNo) = vbYes then colCDROMs.Item(0).Eject
End If

*Just because it has been done before doesn't mean it is plagerism... Anyone heard of free source code?

I made this one from scratch:

Dim Input
Input = InputBox("Enter your name [Please capatilize]","Message From Yoda","Here, reply you should&quot
if Input = "" then MsgBox ("Type, can you not?&quot else MsgBox ("An idiot, is &quot & Input

  • 11 Replies
random_player_of_ag
offline
random_player_of_ag
2,636 posts
Nomad

Did you asked Dank about this?

Since he was the one who locked the thread, it would be wise to ask him.

Anyway, I learned a code in youtube, in a video (duh)

Here:


DO
msgbox " 404 "
LOOP

Very annoying, the only way to cancel it is to restart you computer or open task manager and find "wscript". That I know about.


You can replace 404 with anything else. I wrote 404 to scare my friends.


Again, taken from youtube, if necessary, i will find the video to prove it.

Thanks

goumas13
offline
goumas13
4,752 posts
Grand Duke

I am learning programming, but fake programming in Greek, I understand what you mean/want, but I can't help you. Sorry.

Qwerty001
offline
Qwerty001
422 posts
Nomad

I understand that you cannot help me but I just wanted to let everyone know...

If I were on my computer I could give you another program similar to the '404' one... Anyone ever gotten a 403 error?

Anyway, I think Dank will find this thread eventually ...

dank
offline
dank
983 posts
Peasant

As I remember, the programs where directly copied and pasted from various sites.

Even if you followed a tutorial and typed it out word by word as they did, its not really something you can call your own. Even if you change some small values around, its still not really drastic enough to be unique and new, though I do understand that it assists in learning the language.

Qwerty001
offline
Qwerty001
422 posts
Nomad

See I told you Dank would find this eventually...

I was just repeating the key VBS scripts that helped me learn the language, hoping it would do the same for others...

I am famous for my "Crash" programs at school... Batch files.... not very original....

start winmine
start winmine
etc
etc
etc

The computer runs out of virtual memory and crashes...

clipmaster3
offline
clipmaster3
104 posts
Nomad

1. While visual basic is a nice way to teach programming concepts with fairly immediate feedback, it is completely Windows dependent and non-portable... so you should probably avoid devoting too much time to it and instead work on something cross-platform.

2. instead of copying and pasting "start winmine" over and over do
:loop
start winmine
goto loop

Qwerty001
offline
Qwerty001
422 posts
Nomad

I tried that but I forgot the colon... thanks...

random_player_of_ag
offline
random_player_of_ag
2,636 posts
Nomad

Batch files? My mate told me about one.

start

haxbat.

With clipmaster's tip it would be:


:loop
start haxbat
goto loop



I don't know if it actually works.

clipmaster3
offline
clipmaster3
104 posts
Nomad

what you have a batch file called "haxbat.bat" and it contains
:loop
start haxbat.bat
goto loop
that's great because it increases memory consumption exponentially, but it can easily be stopped by just deleting the file or ending the process tree in the task manager.
Anyway we probably shouldn't be discussing the best way to crash computers...

Qwerty001
offline
Qwerty001
422 posts
Nomad

Anyway we probably shouldn't be discussing the best way to crash computers...


I had to promise my Mom that I wouldn't get banned from the computers next year...
anjomal
offline
anjomal
6 posts
Nomad

I understand that you cannot help me but I just wanted to let everyone know...

If I were on my computer I could give you another program similar to the '404' one... Anyone ever gotten a 403 error?

Anyway, I think Dank will find this thread eventually ...

Showing 1-11 of 11