Set rs = conn.Execute(sql)
line = “function put_stations(){”
file.WriteLine line
line = “document.writeln(‘ ” & “ <select name = ‘stations’ >’)”
file.WriteLine line
While Not rs.EOF
line = “document.write(‘<option >” & rs(“stations”) & “</option>’)”
file.WriteLine line
rs.MoveNext
Wend
line = “document.write(‘</select>’) }”
file.WriteLine line
file.close
%>
引用“静态”的“站名”的HTML页面如下：
< html 页码：[1] [2] [3] [4] [5] [6] 第4页、共6页 |
