draw a single line by VBScript

Can anyone show me how to draw a line by using VBScript.
chkwahAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

JOKCommented:
You can't do graphics with vbscript. You could use the html <hr> tag. You're more likely to be able to do stuff like that with JavaScript and DHTML.
0
AemerginCommented:
Another option you might have is to us a table, and give that table a border. This will allow you to do underlines, overlines, and vertical lines on either the left or right side.

-Aemergin
0
chkwahAuthor Commented:
JOK:

If JavaScript can do that.
So, can you pls show the the way.
Thank you.
0
jamestthomasCommented:
This is simplistic I know but just to toss it out...in an ASP page of course any HTML can be written using VBscript.
You can then impose conditions for howyou want your page to look.  So chkwah, you may do something like

<%If MyConditon = True then %>
     <hr>
<%End If%>

-OR-

<%
If MyConditon = True then
   Response.Write "<hr>"
End If
%>

 
0
xabiCommented:
You can only "draw" vertical and horizontal lines this way:

1st create a table with border="0" cellpadding="0" cellspacing="0" width=""

2nd insert into it a transparent 1x1 gif pixel

3th give the cell a color

4th change the width and height of the pixel:

example:

<table border="0" cellspacing="0" cellpadding="0">
  <tr><td bgcolor="black"><img src="point.gif" with="100" height="2"></td></tr>
</table>

this with draw a 100x2 horizontal black line

xabi
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
ASP

From novice to tech pro — start learning today.