How do I display a list of hyplinks, that the user can click on, on a Web
Page using VB Script?
eg:
www.hp.com
www.ibm.com
Thanks, Steve
VB Script Hyperlinks
- 12 Nov 2009 #1
Steve GuestMy System SpecsVB Script Hyperlinks
- 12 Nov 2009 #2
Paul Randall GuestMy System SpecsRe: VB Script Hyperlinks
"Steve" <Steve@newsgroup> wrote in message
news:5F5CE196-E05A-4BA9-AA09-8D91BC8027FD@newsgroupHi, Steve
> How do I display a list of hyplinks, that the user can click on, on a Web
> Page using VB Script?
>
> eg:
>
> www.hp.com
> www.ibm.com
You might do a google search for some words like the following:
download free html editor
Download and install, then run the editor of your choice and copy the links
from your post and paste them into the editor's graphic interface, then look
at the html generated in the editor's text interface.
Here is one link that might do the trick:
http://www.coffeecup.com/free-editor/
You might also google for free web sites that have tutorials on HTML, like
http://www.w3schools.com/, or maybe look at Microsoft's HTML and DHTML
Reference http://msdn.microsoft.com/en-us/libr...50(VS.85).aspx
-Paul Randall
- 13 Nov 2009 #3
LikeToCode GuestMy System SpecsRE: VB Script Hyperlinks
Here ya go. It is simple and very versatile.
<Code>
Dim objExplorer
Set objExplorer = CreateObject("InternetExplorer.Application")
With objExplorer
.Navigate "About:"
.ToolBar = False
.StatusBar = False
.Width = 400
.Height = 400
.Left = 400
.Top= 200
.Visible = 1
.Document.WriteLN("<html><body bgColor=White> <Font size=5><center>")
.Document.WriteLN("<p>Your Heading<p>")
.Document.WriteLN("<a href=http://www.google.com target=_blank>Google</a
href><br />")'the <br /> is the "return" operator
.Document.WriteLN("<a href=http://www.msn.com target=_blank>MSN</a href>")
.Document.WriteLN("</font></center></body></html>")
Do While .Busy
Sleep(1)
Loop
End With
</Code>
"Steve" wrote:
> How do I display a list of hyplinks, that the user can click on, on a Web
> Page using VB Script?
>
> eg:
>
> www.hp.com
> www.ibm.com
>
> Thanks, Steve
- 13 Nov 2009 #4
Steve GuestMy System SpecsRE: VB Script Hyperlinks
Hi LikeToCode,
Great thanks for that.
I want to embed the code into the html code into a form called "Search" and
display in a text box called "Out" (just so it dosent overwite what already
on the page). I tried just adding the following line but it came up with an
error object dosent support this method?
Document.Search.Out.WriteLN("<p>Your Heading<p>")
This is the relavent html code:
<FORM ID="Search" NAME="Search">
<textarea rows="2" name="Out" cols="20"></textarea></P>
Regards, Steve
"LikeToCode" wrote:
> Here ya go. It is simple and very versatile.
>
> <Code>
> Dim objExplorer
> Set objExplorer = CreateObject("InternetExplorer.Application")
> With objExplorer
> .Navigate "About:"
> .ToolBar = False
> .StatusBar = False
> .Width = 400
> .Height = 400
> .Left = 400
> .Top= 200
> .Visible = 1
> .Document.WriteLN("<html><body bgColor=White> <Font size=5><center>")
> .Document.WriteLN("<p>Your Heading<p>")
> .Document.WriteLN("<a href=http://www.google.com target=_blank>Google</a
> href><br />")'the <br /> is the "return" operator
> .Document.WriteLN("<a href=http://www.msn.com target=_blank>MSN</a href>")
> .Document.WriteLN("</font></center></body></html>")
> Do While .Busy
> Sleep(1)
> Loop
> End With
> </Code>
>
> "Steve" wrote:
>
> > How do I display a list of hyplinks, that the user can click on, on a Web
> > Page using VB Script?
> >
> > eg:
> >
> > www.hp.com
> > www.ibm.com
> >
> > Thanks, Steve
- 13 Nov 2009 #5
LikeToCode GuestMy System SpecsRE: VB Script Hyperlinks
Hi Steve,
Please excuse me for being a little dense today! So you have an html doc
that has at textbox for search and a textbox for results (aka OUT)? What are
you trying to make happen, a user will type text to be searched in the
document and the results will be displayed in the "out" textbox?
"Steve" wrote:
> Hi LikeToCode,
>
> Great thanks for that.
> I want to embed the code into the html code into a form called "Search" and
> display in a text box called "Out" (just so it dosent overwite what already
> on the page). I tried just adding the following line but it came up with an
> error object dosent support this method?
>
> Document.Search.Out.WriteLN("<p>Your Heading<p>")
>
> This is the relavent html code:
> <FORM ID="Search" NAME="Search">
> <textarea rows="2" name="Out" cols="20"></textarea></P>
>
>
>
> Regards, Steve
>
>
> "LikeToCode" wrote:
>
> > Here ya go. It is simple and very versatile.
> >
> > <Code>
> > Dim objExplorer
> > Set objExplorer = CreateObject("InternetExplorer.Application")
> > With objExplorer
> > .Navigate "About:"
> > .ToolBar = False
> > .StatusBar = False
> > .Width = 400
> > .Height = 400
> > .Left = 400
> > .Top= 200
> > .Visible = 1
> > .Document.WriteLN("<html><body bgColor=White> <Font size=5><center>")
> > .Document.WriteLN("<p>Your Heading<p>")
> > .Document.WriteLN("<a href=http://www.google.com target=_blank>Google</a
> > href><br />")'the <br /> is the "return" operator
> > .Document.WriteLN("<a href=http://www.msn.com target=_blank>MSN</a href>")
> > .Document.WriteLN("</font></center></body></html>")
> > Do While .Busy
> > Sleep(1)
> > Loop
> > End With
> > </Code>
> >
> > "Steve" wrote:
> >
> > > How do I display a list of hyplinks, that the user can click on, on a Web
> > > Page using VB Script?
> > >
> > > eg:
> > >
> > > www.hp.com
> > > www.ibm.com
> > >
> > > Thanks, Steve
- 13 Nov 2009 #6
Steve GuestMy System SpecsRE: VB Script Hyperlinks
Hi LikeToCode,
Yes that exactly right they put in a search word and it displays hyperlinks
to web site/s for them to click on.
Regards, Steve
"LikeToCode" wrote:
> Hi Steve,
> Please excuse me for being a little dense today! So you have an html doc
> that has at textbox for search and a textbox for results (aka OUT)? What are
> you trying to make happen, a user will type text to be searched in the
> document and the results will be displayed in the "out" textbox?
>
> "Steve" wrote:
>
> > Hi LikeToCode,
> >
> > Great thanks for that.
> > I want to embed the code into the html code into a form called "Search" and
> > display in a text box called "Out" (just so it dosent overwite what already
> > on the page). I tried just adding the following line but it came up with an
> > error object dosent support this method?
> >
> > Document.Search.Out.WriteLN("<p>Your Heading<p>")
> >
> > This is the relavent html code:
> > <FORM ID="Search" NAME="Search">
> > <textarea rows="2" name="Out" cols="20"></textarea></P>
> >
> >
> >
> > Regards, Steve
> >
> >
> > "LikeToCode" wrote:
> >
> > > Here ya go. It is simple and very versatile.
> > >
> > > <Code>
> > > Dim objExplorer
> > > Set objExplorer = CreateObject("InternetExplorer.Application")
> > > With objExplorer
> > > .Navigate "About:"
> > > .ToolBar = False
> > > .StatusBar = False
> > > .Width = 400
> > > .Height = 400
> > > .Left = 400
> > > .Top= 200
> > > .Visible = 1
> > > .Document.WriteLN("<html><body bgColor=White> <Font size=5><center>")
> > > .Document.WriteLN("<p>Your Heading<p>")
> > > .Document.WriteLN("<a href=http://www.google.com target=_blank>Google</a
> > > href><br />")'the <br /> is the "return" operator
> > > .Document.WriteLN("<a href=http://www.msn.com target=_blank>MSN</a href>")
> > > .Document.WriteLN("</font></center></body></html>")
> > > Do While .Busy
> > > Sleep(1)
> > > Loop
> > > End With
> > > </Code>
> > >
> > > "Steve" wrote:
> > >
> > > > How do I display a list of hyplinks, that the user can click on, on a Web
> > > > Page using VB Script?
> > > >
> > > > eg:
> > > >
> > > > www.hp.com
> > > > www.ibm.com
> > > >
> > > > Thanks, Steve
VB Script Hyperlinks
| Similar Threads | ||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Hyperlinks | Kevin | Vista mail | 1 | 07 Mar 2009 |
| hyperlinks | Jim | Live Mail | 11 | 04 Jan 2009 |
| hyperlinks | xera2112 | Microsoft Office | 6 | 06 Sep 2008 |
| Hyperlinks | John | Vista mail | 1 | 04 Jun 2008 |
| hyperlinks out | Jack Riceater | Vista account administration | 1 | 14 May 2008 |
