服务器对象 错误 'ASP 0196 : 80040154'
不能运行进程外组件 /doUpload.asp, 行32
只可使用 InProc 服务器组件。如果你想使用 LocalServer 组件, 你必须修改 AspAllowOutOfProcComponents 中继库设置。请参照帮助文件。
asp中的源代码如下:
<%
const UploadOK = 0
const FilesizeInvalid = 1
const ExtensionNotAllowed = 2
const DestinationPathInvalid = 3
const UnknownError = 4
const UnableToCreateFile = 5
const FileDoesntExist = 6
Dim nUploadResult
Dim objUploader
Dim strError
Dim strUserName
Dim strHiddenValue
Dim strFileUploaded Set objUploader = Server.CreateObject("InetUtil.Uploader") objUploader.StartUpload(Request)
strUserName = objUploader.GetFormValue("userName")
strHiddenValue = objUploader.GetFormValue("hiddenValue")
objUploader.SetDestinationPath "c:\temp"
objUploader.SetAllowedExtensions "*" ' all extensions
objUploader.SetForbiddenExtensions "exe", "com" nUploadResult = objUploader.UploadFile("uploadFile")
strFileUploaded = objUploader.GetUploadFilename("uploadFile")
strError = objUploader.GetError(nUploadResult)
%>
不能运行进程外组件 /doUpload.asp, 行32
只可使用 InProc 服务器组件。如果你想使用 LocalServer 组件, 你必须修改 AspAllowOutOfProcComponents 中继库设置。请参照帮助文件。
asp中的源代码如下:
<%
const UploadOK = 0
const FilesizeInvalid = 1
const ExtensionNotAllowed = 2
const DestinationPathInvalid = 3
const UnknownError = 4
const UnableToCreateFile = 5
const FileDoesntExist = 6
Dim nUploadResult
Dim objUploader
Dim strError
Dim strUserName
Dim strHiddenValue
Dim strFileUploaded Set objUploader = Server.CreateObject("InetUtil.Uploader") objUploader.StartUpload(Request)
strUserName = objUploader.GetFormValue("userName")
strHiddenValue = objUploader.GetFormValue("hiddenValue")
objUploader.SetDestinationPath "c:\temp"
objUploader.SetAllowedExtensions "*" ' all extensions
objUploader.SetForbiddenExtensions "exe", "com" nUploadResult = objUploader.UploadFile("uploadFile")
strFileUploaded = objUploader.GetUploadFilename("uploadFile")
strError = objUploader.GetError(nUploadResult)
%>
只有DLL的COM才可以在ASP里用...
所以一般都用ActiveX dLL
改成ActiveX Dll