欢迎大家动脑讨论，asp调用vb dll后，response.write Myobj.getOutPath 输出是一片空白，sfliename好象没传过来，为什么?vb程序如下
欢迎大家动脑讨论，asp调用vb dll后，response.write Myobj.getOutPath 输出是一片空白，sfliename好象没传过来，为什么?vb程序如下
Public str As String
Public Property Let strOutPath(s As Variant)
str = s
End Property

Private Property Get getOutPath()
getOutPath = str
End Property
还在Public Function aspexcel(ByVal SQLStr As String) As Boolean里加了str=sfilename(具体程序见下)
Public Function aspexcel(ByVal SQLStr As String) As Boolean
略
Dim sfilename As String
sfilename = CStr(FormatDateTime(Now, 0))
sfilename = App.path & "\ " & sfilename & ".xls "
Set xlBook = xlApp.Workbooks.Add
xlBook.SaveAs (sfilename)
Set xlSheet = Nothing
aspexcel = True
Exit Function
End Function

[解决办法]
如果你真的在Public Function aspexcel(ByVal SQLStr As String) As Boolean里加了str=sfilename

那么请在调用response.write Myobj.getOutPath 前先调用 Myobj.aspexcel(xxxx)

真的最后说一次了，不然估计要疯了
[解决办法]
App.path现在我才看到
孩子，你真行

赶快给你的aspexcel加多一个参数，在调用时传个server.mappath( ". ")的值进去先吧