A VB-World Tool you would Love.

[G.Kumaraguru]

Hi Folks..

I Have made a tool (A set of tools to be Precise)!
This tool will add certain options to your right click menu
in internet explorer.

This Will easily let u Create bold, italic, undeline tags..
It can even color code your code...are even add
fancy coloring of text.

In short you would not want to miss this tool...

Download it here... (just 70k)

[Active]

Just a demo : The Code color coding function

Const AW_HOR_POSITIVE = &H1 'Animates the window from left To right. This flag can be used with roll Or slide animation.
Const AW_HOR_NEGATIVE = &H2 'Animates the window from right To left. This flag can be used with roll Or slide animation.
Const AW_VER_POSITIVE = &H4 'Animates the window from top To bottom. This flag can be used with roll Or slide animation.
Const AW_VER_NEGATIVE = &H8 'Animates the window from bottom To top. This flag can be used with roll Or slide animation.
Const AW_CENTER = &H10 'Makes the window appear To collapse inward If AW_HIDE is used Or expand outward If the AW_HIDE is Not used.
Const AW_HIDE = &H10000 'Hides the window. By default, the window is shown.
Const AW_ACTIVATE = &H20000 'Activates the window.
Const AW_SLIDE = &H40000 'Uses slide animation. By default, roll animation is used.
Const AW_BLEND = &H80000 'Uses a fade effect. This flag can be used only If hwnd is a top-level window.
Private Declare Function AnimateWindow Lib "user32" (ByVal hwnd As Long, ByVal dwTime As Long, ByVal dwFlags As Long) As Boolean
Private Sub Form_Load()
'KPD-Team 1999
'URL: http://www.allapi.net/
'E-Mail: KPDTeam@Allapi.net
'Set the graphic mode To persistent
Me.AutoRedraw = True
Me.Print "Unload me"
End Sub
Private Sub Form_Unload(Cancel As Integer)
'Animate the window
AnimateWindow Me.hwnd, 200, AW_VER_POSITIVE Or AW_HOR_NEGATIVE Or AW_HIDE
'Unload our form completely
Set Form1 = Nothing
End Sub

[Active]

Now Something Serious...

The Rainbow Text

and The

The Gradient Text

[YoungBuck]

Very Cool Kumaraguru!!

[YoungBuck]

How about adding a sub-menu for smileys?

Umm...I installed it, and can't seem to find it.
Where does it install to? :rolleyes:

[YoungBuck]

LOL That happened to me to Matthew, just right click when you are replying to a message and there should be a bunch of new options in the standard Cut, Copy, Paste menu.

Nothing in right click menu but all the regular IE context stuff.

[Active]

The Pre Installation Instruction Read..

Close all IE windows..before you Start Installing..


Just close all IE windows...
and Then OPen them again...


Cheers !

I don't think there is way of adding Sub menus....
But there is a WAY out...I would try that..

Thanks Young buck !

Hehe, I see it now.
I knew that, I was just testin' you ;).
Very cool! :D

You got my vote :rolleyes:.

[Active]

It must be funny to note that...The entire
Self Extracting Installer Was made in Visual basic.
But the file is compressed using a PE packer utility

Any one attempted such bizzare thing before ?

[parksie]

There...I didn't tease or torment them with my pre-release version! :D

[Active]

Keep up , Parksie...
100 points for your honesty ! ;)

[parksie]

Hehe... thanks!

[JamesM]

Testing:

Bold

Rainbow

Wow, have you guys noticed, this thread is linked to the one in Chit Chat and the one in General VB Questions (if there is one there).

That's a neat feature John.

Well, the one in General VB Questions was moved :rolleyes:.
But I think both the Chit Chat and Feedback Forum threads are linked.

[theman32x]

how did you make the text fade? i've been trying to learn how to make text fade but still i don't understand examples i download ...

There's all the html files that are used with it theman32x.

Location: C:\Windows\Vb-World

Just open Notepad and open them through there and get the source :D.

Of course, if you plan to use it, ask G.Kumaraguru first, and make sure credit goes where it is needed.

[G.Kumaraguru]

You are free to use it...

Man..think of it...Do i have to code it just to dump my
code unused ?

[sail3005]

this is a test

yeah, that would be awesome if you could get smilies working!

Testing...
Life is a demo

GeekHouse (http://geekhouse.cjb.net)
______________________________________________________________________

Wonderful!!!
HiThere

This is so cool Kumar!!

1
2
3


That was great Kumar..!!

[Stevie]

G.Kumaraguru : Superb tool, I shall use it with all the time. :)

[smh]

This is pretty cool. It saves a lot of time.

Just about to test it but i forgot that im at home :rolleyes:

oOoOoOoOoOoOooooooooooo

Hello World

email (simon@fhdale.co.uk)

website (http://www.vbsnippets.co.uk)


Hello
Hello
Hello


cool!

Just a test...

Hello World! (http://www.helloworld.com)

Hello.

[Pix]

Thanks! That's a cool tool ! :)

[chrisjk]

Hey G.Kumaraguru, that's a really neat tool. Thanks man.

[YoungBuck]

I found a bug (when the forums here had the code coloring it had the same bug though)....



'Shouldn't _
All _
This _
Be _
Green

[Active]

I see the Problem there...

I though a Comment line starts at ' and ends at vbcrlf.
I never thought line continuation is valid for a comment line.

But honestly speaking will any one seriously use multi line comments using ' _ ' ?

I would myself prefer

' first Line comment
' second Line comment etc..

Any way, I would try to fix the bug...

[YoungBuck]

I guess it is a matter of preference. To me it distinguishes the difference between two seperate comments and one long comment. I reckon I'm just being nit-picky, all I really have to do is move the color tag for that particular comment to the end of the continued. Anyway thanks for listening.

P.S. Also, even though I don't think I've ever seen it used here, the Rem statement doesn't get colored green either.



Rem This is a comment

[Active]

Yes...REM has been consciously left out.
Because no one in the forum seems to use it.

May be If I make an Stand alone Application Like fox did
I would make everything utopian. But This program
as you might have noticed is run from a Script. And as
such hardwiring everything in code might actually
punish you in speed of execution.

You know...no body want's to wait for one minute after
Right clicking something !

And Fortunately Every one is lazy to use REM instead of
a Simple '. ;)

I looked at the code to take the msgbox's out but its VBscript and im totally crap at it HELP


Any way LOVIN IT!! << BTW thats mine, Grrrrrrrrrrrrrrrrrrr

[marnitzg]

Very Impressive!

Thanks Active!

[Static]

just comparing mine...


Then If ElseIf 'testing
For x = 1 To 10
If x = 3 Then 'shoot me
ElseIf
Else
End If



Then If Elseif 'testing
For x = 1 To 10
If x = 3 Then 'shoot me
Elseif
Else
End If



Excellent IDEA!! I would LOVE to know how you grab the Highlighted text!!!!!

That would be a great addition to my app (vbworld browser http://forums.vb-world.net/showthread.php?s=&threadid=56782 )

Great job!...Very unique Idea!

[Active]

You are Welcome :) ..

Just Take a Look at the VBscripts Installed in Your Windows vb-world Folder...

PM Me ... if You need any assistance.

[Static]

wow its all done with vbscript??

i guess Im stupped how it works...how does the script get called and applied!

where is the code that finds what text is highlighted!?

[Active]

Look in your Registry
at the following key..

HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt

This is where you tell it what to run when you Right Click
Keys other than those default cut copy paste...options.

The script itself make uses of Window.External object's
Menuarguments property to get the window of the
Page where you right clicked ...the rest is easy.

[ExtremePimpness]

ajsdfkjasdkfgajsldfkjasdjkh

[sail3005]

test test test test test test test test test test test test test test test test test test test test test test test test test test test test test test test test test test test test

[sail3005]

<%

Dim objRS, strName, strComment
Set objRS = Server.CreateObject("ADODB.Recordset")

objRS.Open "main", objConn, , adLockOptimistic, adCmdTable

strName = Request.Form("name")
strComment = Request.Form("comment")

objRS.AddNew
objRS("Name") = strName
objRS("Message") = strComment
objRS.Update
objRS.MoveLast


If objRS.EOF Then
Response.Write "Database is empty"

Else

Do While Not objRS.EOF
Response.Write "<pre>"
Response.Write "Name: " & objRS("Name") & "<br>"
Response.Write "Comment: " & objRS("Message") & "<br>"
Response.Write "<hr><p>"
Response.Write "</pre>"
objRS.MovePrevious
Loop

End If

objRS.Close
Set objRS = Nothing


objConn.Close
Set objConn = Nothing

%>

[Active]

If you need Support for ASP....The easiest wasy is to
add the asp key words to those list of Keywords in the code.htm


list of asp keywords.
Eof
Bof
Loop
abandon
addheader
all_http
all_raw
appendtolog
appl_md_path
appl_physical_path
application
application_onend
application_onstart
auth_password
auth_type
auth_user
binarywrite
browsertype
buffer
cachecontrol
cert_cookie
cert_flags
cert_issuer
cert_keysize
cert_secretkeysize
cert_serialnumber
cert_server_issuer
cert_server_subject
cert_subject
charset
clear
clientcertificate
codepage
collection
content_length
content_type
content_type
contents
contenttype
cookies
createobject
domain
dsn
enablesessionstate
end
expires
expiresabsolute
false
flush
function
gateway_interface
haskeys
htmlencode
http_accept
http_accept_language
http_connection
http_cookie
http_host
http_language
http_pragma
http_ua_color
http_ua_cpu
http_ua_os
http_ua_pixels
http_ua_useragent
https
https_keysize
https_secretkeysize
https_server_issuer
https_server_subject
include
instance_id
instance_meta_path
isclientconnected
javascript
jscript
language
lcid
local_addr
lock
logon_user
mappath
mswc
objectcontext
ontransactionabort
ontransactioncommit
path
path_info
path_translated
pics
procedure
pw
query_string
querystring
redirect
rem
remote_addr
remote_host
remote_user
request
request_method
response
runat
script_map
script_name
script_name
scripttimeout
secure
server
server_name
server_port
server_port_secure
server_protocol
server_software
servervariables
session
session_onend
session_onstart
sessionid
set
setabort
setcomplete
staticobjects
status
sub
timeout
transaction
true
uid
unlock
url
urlencode
virtual
write

But change it to comma delimited one..

[Geoff Gunson]

I like that Colgate flavour

Damn This is one cool tool

Cheers

Geoff

Um... Just a test

bye

Testing Testing!!!@@@####$$$$%%%%^^^^&&&

[sail3005]

<%

Dim objRS, strName, strComment
Set objRS = Server.CreateObject("ADODB.Recordset")

objRS.Open "main", objConn, , adLockOptimistic, adCmdTable

strName = Request.Form("name")
strComment = Request.Form("comment")

objRS.AddNew
objRS("Name") = strName
objRS("Message") = strComment
objRS.Update
objRS.MoveLast


If objRS.EOF Then
Response.Write "Database is empty"

Else

Do While Not objRS.EOF
Response.Write "<pre>"
Response.Write "Name: " & objRS("Name") & "<br>"
Response.Write "Comment: " & objRS("Message") & "<br>"
Response.Write "<hr><p>"
Response.Write "</pre>"
objRS.MovePrevious
Loop

End If

objRS.Close
Set objRS = Nothing


objConn.Close
Set objConn = Nothing

%>

[sail3005]

sorry, i don't mean to keep posting this code, i just keep accidently hitting back and reload or something...

[Active]

The Truth is... Nobody Really Cares :D

[sail3005]

hahaha....ok

[TANiK]

hi, I really enjoy all the aspects of this program but I have one question I really need help on. I try to use the gradient tool, and it says "You Need to have CommonDialog ActiveX Control Installed!"...how do I fix this? Because I really need to use the gradient tool. Please help. Thanx.

[Sc0rp]

Ttteeeesting 1..2..3..

[Sc0rp]

Very cool :cool:

[nishantp]

Originally posted by TANiK
hi, I really enjoy all the aspects of this program but I have one question I really need help on. I try to use the gradient tool, and it says "You Need to have CommonDialog ActiveX Control Installed!"...how do I fix this? Because I really need to use the gradient tool. Please help. Thanx. Do you even have VB installed? The tool depends on the common dialog control for its color selection dialog.


Cooooooooooooooooooooooooooooooooooooooooooooool!

[TANiK]

how do I install VB?
I need VB installed just to use the gradient tool on vbulletin boards?
Please help, I need to use it!

[abdul]

Teeeeeeeeessssssssttttttttttttiiiiiiiiinnnnnnnnnnnnggggggggg



Teeeeeeeeeeessssssssssssstttttttttttttiiiiiiiiiiiiiinnnnnnnnnnnnggg

[spetnik]

Originally posted by nishantp
Do you even have VB installed? The tool depends on the common dialog control for its color selection dialog.


Cooooooooooooooooooooooooooooooooooooooooooooool!

All you need is to copy and register comdlg32.ocx. You don't need VB.

[abdul]

Originally posted by G.Kumaraguru
Hi Folks..

I Have made a tool (A set of tools to be Precise)!
This tool will add certain options to your right click menu
in internet explorer.

This Will easily let u Create bold, italic, undeline tags..
It can even color code your code...are even add
fancy coloring of text.

In short you would not want to miss this tool...

Download it here... (just 70k)

A question pops up:

If you don't mind then can you tell how you add a menu item(s) in all the textboxes used in IE?

[thinktank]

Hey, this one is really COOL COOL COOL COOL!

Testing rainbow

[filburt1]

Originally posted by TANiK
hi, I really enjoy all the aspects of this program but I have one question I really need help on. I try to use the gradient tool, and it says "You Need to have CommonDialog ActiveX Control Installed!"...how do I fix this? Because I really need to use the gradient tool. Please help. Thanx.

That was one BIG bump. :D

[nishantp]

Originally posted by spetnik


All you need is to copy and register comdlg32.ocx. You don't need VB.

True...you dont NEED VB, but i mean...this being a VB site and all...i assumed you should have that.

[TANiK]

I just use it for forums...help!

[ghost ryder]

test


well this kicks so much ass you should call it bruce lee!!

[nabeels786]

abdul:

Originally posted by Active
Look in your Registry
at the following key..

HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt

This is where you tell it what to run when you Right Click
Keys other than those default cut copy paste...options.

The script itself make uses of Window.External object's
Menuarguments property to get the window of the
Page where you right clicked ...the rest is easy.

[Guru]

ghost ryder,
Thanks for digging up this thread again

I had been meaning to look for it for ages now so I could install
it here at home.

[chrisjk]

damnation! I found the thread first!

[thinktank2]

damnation! I found the thread first!
http://www.vbforums.com/showthread.php?s=&threadid=135967

[chrisjk]

damnation!

[beachbum]

damnation... I am already sick to bejebus of all the posts using this friggin rainbow colouring!! Now where was that thread about making everything appear in shades of grey....

[steve65]

Will this do?

[axion_sa]

just testing

must admit, pretty good tool.

[ubunreal69]

is someone gonna make on that incorperates smileys as well ??

[HMPA]

Not work, dont make nothing...I'm W2000 user IE5.5.