<html>
<head>
<title>查找既存数据</title>
</head>
<script language="VBScript" type="text/VBScript">
<!-- -->window.resizeTo(100, 100);]
Sub Window_OnLoad
window.resizeTo 600, 400
end Sub
sub Deal_Excel
msgbox("good")
end sub
</script>
<body onLoad="Window_OnLoad" bgcolor="#999999">
<table width="500" height="268" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="49" colspan="2" bgcolor="#CCCCCC"> </td>
</tr>
<tr>
<td width="240" height="39" bgcolor="#FFFFFF"> 既存数据的excel:</td>
<td width="260" bgcolor="#FFFFFF"><input type="file" ID="OriginalFile" /></td>
</tr>
<tr>
<td height="27" bgcolor="#FFFFFF"> </td>
<td bgcolor="#FFFFFF"><label>提示:</label> </td>
</tr>
<tr>
<td height="48" bgcolor="#FFFFFF"> 记录查询结果的excel:</td>
<td bgcolor="#FFFFFF"><input type="file" ID="ResultFile" /></td>
</tr>
<tr>
<td height="48" bgcolor="#FFFFFF"> </td>
<td bgcolor="#FFFFFF"><label>提示:</label> </td>
</tr>
<tr>
<td height="30" colspan="2" align="center" bgcolor="#CCCCCC">
<input type="submit" ID="Submit" value="开始执行" onClick="Deal_Excel"> </td>
</tr>
</table>
</body>
</html>