用ASP
        <select name="pop_zk" size="4" style="position:absolute; left:-100px; top:-100px; visibility:hidden; font-size:9pt" onChange="setText(input_zk, pop_zk)">
<%
  var fs=Server.CreateObject("Scripting.FileSystemObject");
  var f=Server.MapPath("data/专刊.loa");
  var r=fs.OpenTextFile(f, 1, false, false);
  var s="";
  while( !r.AtEndOfStream )
  {
    s+="<option>"+r.ReadLine()+"</option>\r\n";
  }
  r.Close();
  Response.write(s);
%>
        </select>