【文件属性】:
文件名称:ASP导入excel
文件大小:7KB
文件格式:TXT
更新时间:2014-07-31 09:21:59
ASP excel
ASP导入excel
<%
sUploadDir = "/"
'----------------------------------------------------------------------
Dim oUpFileStream
'----------------------------------------------------------------------
'文件上传类
Class UpFile_Class
Dim Form,File,Version,Err
Private Sub Class_Initialize
Version = "无惧上传类 Version V1.2"
Err = -1
End Sub
Private Sub Class_Terminate
'清除变量及对像
If Err < 0 Then
Form.RemoveAll
Set Form = Nothing
File.RemoveAll
Set File = Nothing
oUpFileStream.Close
Set oUpFileStream = Nothing
End If
End Sub
网友评论
- 好象可以用
- 不错,,完全可以加,自己稍微调整下就可以用了
- 不错,可以借鉴一下,谢谢了!
- 不错,,完全可以加,自己稍微调整下就可以用了
- 不错是不错、就是excel如果错了就乱码
- 内容太少了
- 是啊的确内容太少了
- 内容太少了