Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

printing data error

Status
Not open for further replies.

fluxdemon

MIS
Nov 5, 2002
89
US
I don't know which forum to place this in so I put it in all three areas of javascript/asp/html.

My page info prints the first character to the far left, almost off the screen. Is there something I can do? <br> doesn't work and I found <br clear=&quot;all&quot;> but that didn't either.


code below:
<html>
<body>
<table align=&quot;left&quot; cellspacing=&quot;0&quot; cellpadding=&quot;0&quot; width=&quot;100%&quot;>
<tr>
<td align=&quot;left&quot;>
<form name=&quot;frmRange&quot; action=&quot;aug10.asp&quot; method=&quot;post&quot;>
<select name=&quot;lstSections&quot; onkeypress=&quot;if(event.keyCode==13) document.frmRange.submit();&quot; onFocus=&quot;frmRange.manualInput.value='';&quot;>
<option value=&quot;&quot;>--none--</option>
<option value=&quot;48-57,65-90,97-122&quot;> AlphaNumeric </option>
<option value=&quot;884-885,890,894,900-906,908,910-929,931-974,976-982,986,988,990,992,994-1011&quot;> Greek and Coptic </option>
<option value=&quot;9728-9839&quot;> Misc Symbols </option>
<option value=&quot;8592-8682&quot;> Arrows </option>
<option value=&quot;9985-9988,9990-9993,9996-10023,10025-10059,10061,10063-10066,10070,10072-10078,10081-10087,10102-10132,10136-10174&quot;> Dingbats </option>
<!--option value=&quot;&quot;> </option-->
</select>
<input type=&quot;text&quot; name=&quot;manualInput&quot; onFocus=&quot;frmRange.lstSections.value=''&quot;>
</form>
</td>
</tr>
</table>
<%

dim arrRange,strRange,tmp,value,strVar,tmpVar1,tmpVar2


strRange = request.form(&quot;lstSections&quot;) & request.form(&quot;manualInput&quot;)

if strRange<>&quot;&quot; then

response.write(&quot;<br>&quot; & &quot;<br>&quot; & chr(10))
arrRange=split(strRange,&quot;,&quot;)

dim i

for i=Lbound(arrRange) to Ubound(arrRange)

tmp=inStr(arrRange(i),&quot;-&quot;)

if(tmp<>0) then
value=split(arrRange(i),&quot;-&quot;)

tmpVar1=value(0)
tmpVar2=value(1)
for tmpVar1=tmpVar1 to tmpVar2
strVar = chr(39) & chr(38) & chr(35) & &quot;38&quot; & chr(59) & chr(38) & chr(35) & &quot;35&quot; & chr(59) & tmpVar1 & chr(38) & chr(35) & &quot;59&quot; & chr(59) & chr(39)
response.write(&quot;<a class=&quot; & chr(34) & &quot;escape&quot; & chr(34) & &quot; href=&quot; & chr(34) & &quot;#&quot; & chr(34) & &quot; onClick=&quot; & chr(34))
response.write(&quot;copyTo(&quot; & strVar & &quot;);&quot; & chr(34) & &quot;>&quot;)
response.write(chr(38) & chr(35) & tmpVar1 & chr(59))
response.write(&quot;</a>&quot; & chr(10))
next

response.write(&quot;<br>&quot; & chr(10))

else

tmpVar1=arrRange(i)
tmpVar2=0
strVar = chr(39) & chr(38) & chr(35) & &quot;38&quot; & chr(59) & chr(38) & chr(35) & &quot;35&quot; & chr(59) & tmpVar1 & chr(38) & chr(35) & &quot;59&quot; & chr(59) & chr(39)
response.write(&quot;<a class=&quot; & chr(34) & &quot;escape&quot; & chr(34) & &quot; href=&quot; & chr(34) & &quot;#&quot; & chr(34) & &quot; onClick=&quot; & chr(34))
response.write(&quot;copyTo(&quot; & strVar & &quot;);&quot; & chr(34) & &quot;>&quot;)
response.write(chr(38) & chr(35) & tmpVar1 & chr(59))
response.write(&quot;</a>&quot; & chr(10))
response.write(&quot;<br>&quot; & chr(10))
strVar=&quot;&quot;
end if
next

end if

strRange =&quot;&quot;
%>

</body>
</html>
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top