'添加option到指定位置(按value排序) dim valindex valindex=-1 for i=0 to selcom.length-1 if selcom.Options(i).value >selallcomoption.value then valindex=i exit for end if next dim oOption set oOption= document.CreateElement("OPTION") oOption.text = selal
package folder; import java.io.File;import java.io.FileInputStream;import java.io.FileNotFoundException;import java.io.FileOutputStream;import java.io.IOException;import java.util.HashMap;import java.util.Iterator;import java.util.Map; public class f