ASP无法关闭的EXCEL - Web 开发 / ASP
附件地址http://download.csdn.net/source/2341319
由于这里不能上传附件，只能放在这里了
VB code:
<%
strAddr = Server.MapPath(".")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set f = objFSO.GetFile(strAddr&"\1.xls")
if f.attributes<>0 then
f.attributes = 0
end if
Set Excel_File = CreateObject("Excel.Application")
Excel_File.AutomationSecurity=3
Set Excel_WorkBook=Excel_File.Workbooks.open(strAddr&"\1.xls")
Set Excel_Sheet = Excel_WorkBook.Worksheets(1)
'Excel_Sheet.Range("A1" , "A2" ).EntireRow.Delete
'Excel_Sheet.Rows(UsedRange.Rows.count).Delete
If objFSO.FileExists(strAddr&"\Excel\1.xls") Then
objFSO.DeleteFile strAddr&"\Excel\1.xls",True
End If
Set objFSO = Nothing
Excel_WorkBook.SaveAs strAddr&"\Excel\1.xls"
Excel_WorkBook.Save
Excel_File.DisplayAlerts = False
Excel_WorkBook.Close
Excel_WorkBook.Close
Excel_File.Quit
Excel_File.Quit
Set Excel_Sheet = Nothing
Set Excel_WorkBook = Nothing
Set Excel_File = Nothing
%>
麻烦各位高手给看看为什么了
没人会么
在
If objFSO.File
相关问答：
有一个类
class adc
{
dim a,b,c
}
如何在另外一个类中取得类成员及成员个数
class getmenber
{
dim menbers()
function getmenbers(resclass)
'res为一未知类
'getmenber ......
C# code:
SqlConnection conn = CsDB.sqlcon();
SqlDataAdapter da = new SqlDataAdapter("select fwCoding from bjmuma_fwCoding where OrderNumber='" + Order + & ......
asp.net批量上传图片最好有源码，在线等！！！！！！！
源码很长的。
参考
C# code:
HttpFileCollection files = HttpContext.Current.Request.Files;
if (files.Count <= 1)
{
......
各位大侠，我学习的是ASP.NET，想知道相关技术有哪些，就像JAVA EE中有struct sping jsp severlet 等，ASP.NET还有哪些些相关技术。
http://topic.csdn.net/u/20090914/21/af27de99-f0f3-4cfd-9379-13764f8ec6b1.ht ......
现有一个表格，有很多行数组。
想要一个脚本，读取所有行的数组后输出。
输出前不显示正常顺序的表格数组，而直接显示出读取后的数组。
楼主的表达实在成问题！！
是不是这个意思？
<%
Dim ArrDNA（10，10� ......
