Subversion Repositories DevTools

Rev

Rev 1405 | Rev 1416 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1405 Rev 1408
Line 494... Line 494...
494 
  aryLinesCount = UBound(aryLines)
 494 
  aryLinesCount = UBound(aryLines)
495 
 
 495 
 
496 
  For i = 0 To aryLinesCount
 496 
  For i = 0 To aryLinesCount
497 
           If left(aryLines(i), 3 ) = "== "  Then
 497 
           If left(aryLines(i), 3 ) = "== "  Then
498 
               toc(tocIndex) = "<a href=""#Section_"& tocIndex &""">" & Mid(aryLines(i), 3) &"</a>"
 498 
               toc(tocIndex) = "<a href=""#Section_"& tocIndex &""">" & Mid(aryLines(i), 3) &"</a>"
499 
               tocIndex = tocIndex + 1
 - 
 
500 
               aryLines(i) = "<a name=""Section_"& tocIndex &"""></a>" & vbCRLF & aryLines(i)
 499 
               aryLines(i) = "<a name=""Section_"& tocIndex &"""></a>" & vbCRLF & aryLines(i)
- 
 
 500 
               tocIndex = tocIndex + 1
501 
           End If
 501 
           End If
502 
  Next
 502 
  Next
503 
 
 503 
 
504 
  if ( tocIndex > 0 ) then
 504 
  if ( tocIndex > 0 ) then
505 
      Dim ii
 505 
      Dim ii
Line 2335... Line 2335...
2335 
end if
 2335 
end if
2336 
 
 2336 
 
2337 
 
 2337 
 
2338 
'********************************************************************
 2338 
'********************************************************************
2339 
'*********************************************************************
 2339 
'*********************************************************************
- 
 
 2340 
'<?xml version="1.0" encoding="UTF-8" ?>
- 
 
 2341 
'<!DOCTYPE html
- 
 
 2342 
'     PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
- 
 
 2343 
'     "DTD/xhtml1-transitional.dtd">
2340 
 
 2344 
'
2341 
%>
 2345 
%>
2342 
<?xml version="1.0" encoding="UTF-8" ?>
 - 
 
2343 
<!DOCTYPE html
 - 
 
2344 
     PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
 - 
 
2345 
     "DTD/xhtml1-transitional.dtd">
 - 
 
2346 
<html>
 2346 
<html>
2347 
    <head>
 2347 
    <head>
2348 
        <meta http-equiv="content-type" content="text/html; charset=ISO-8859-1">
 2348 
        <meta http-equiv="content-type" content="text/html; charset=ISO-8859-1">
2349 
        <title>
 2349 
        <title>
2350 
            <%
 2350 
            <%
Line 2352... Line 2352...
2352 
        response.write(glsMode & " ")
 2352 
        response.write(glsMode & " ")
2353 
      end if
 2353 
      end if
2354 
      response.write(SpaceName(glsTopic) & vbcrlf)
 2354 
      response.write(SpaceName(glsTopic) & vbcrlf)
2355 
    %>
 2355 
    %>
2356 
        </title>
 2356 
        </title>
2357 
        <LINK REL=StyleSheet HREF="<%=gStyleSheet%>" TYPE="text/css" >
 2357 
        <LINK REL="StyleSheet" HREF="<%=gStyleSheet%>" TYPE="text/css" >
2358 
 
 - 
 
2359 
<%
 2358 
<%
2360 
 
 - 
 
2361 
       Response.Write(gHtmlHeadStr)
 2359 
       Response.Write(gHtmlHeadStr)
2362 
%>
 2360 
%>
2363 
 
 - 
 
2364 
 
 - 
 
2365 
    </head>
 2361 
    </head>
2366 
    <body>
 2362 
    <body>
2367 
 
 2363 
 
2368 
        <%
 2364 
        <%
2369 
 
 2365