asp调用vb dll一小问题，vb里我并不想把文件存在某个地方，只要显示出来就可以了，但如果我直接把save as这句去掉,执行asp时就会说http
asp调用vb dll一小问题，vb里我并不想把文件存在某个地方，只要显示出来就可以了，但如果我直接把save as这句去掉,执行asp时就会说http 404找不到文件http://localhost/a/csv/2007-3-9-11-36-51.xls,怎么解决
vb
Public str As String
Public Property Let strOutPath(s As Variant)
str = s
Call aspexcel( "select I_OBJECT from T_STOCK_TRACE_TR where 1=2 order by I_UPDATE_DATE desc ")
End Property
Public Property Get getOutPath()
getOutPath = str
End Property
Public Function aspexcel(ByVal SQLStr As String) As Boolean
Set cnn = New ADODB.Connection
cnn.Open = 略
Dim sfilename As String
sfilename = CStr(FormatDateTime(Now, 0))
sfilename = Replace(sfilename, " ", "- ")
str = sfilename
sfilename = App.Path & "\ " & sfilename & ".xls "
Set xlBook = xlApp.Workbooks.Add
Set xlSheet = xlBook.Sheets(1)
略
cnn.Close
xlBook.SaveAs (sfilename)
Set xlSheet = Nothing
aspexcel = True
Exit Function
End Function
asp
<%set Myobj=server.CreateObject( "projectexcel.classexcel ")
Myobj.strOutPath=Server.Mappath( "csv ")
sfilename=Myobj.getOutPath
sfilename=sfilename& ".xls "
Myobj.aspexcel( "select语句 ")
set Myobj=nothing%>
<html>
<script>
window.location= "http://localhost/a/csv/ <%=sfilename%> ";
</script>
[解决办法]
你这样的肯定要先保存才能显示，否则IE到哪去找文件啊
