ASP编写组建不能调用的问题

七 29th, 2009
发表评论 | Trackback

最近我在做一款主机平台系统。因为要给子平台用户开ftp，经常有人偷风格，所以决定把重要的资源注册成服务器组件。

编写了一个Demo。

 

Type=OleDll
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation
Reference=*\G{D97A6DA0-A85C-11CF-83AE-00A0C90C2BD8}#3.0#0#C:\WINDOWS\system32\inetsrv\asp.dll#Microsoft Active Server Pages Object Library
Class=API; w69dns.cls
Startup="(None)"
HelpFile=""
ExeName32="w69dns.dll"
Command32=""
Name="w69DNS"
HelpContextID="0"
CompatibleMode="1"
CompatibleEXE32="w69dns.dll"
MajorVer=1
MinorVer=0
RevisionVer=0
AutoIncrementVer=0
ServerSupportFiles=0
VersionCompanyName="猫七网络"
CompilationType=0
OptimizationType=0
FavorPentiumPro(tm)=0
CodeViewDebugInfo=0
NoAliasing=0
BoundsCheck=0
OverflowCheck=0
FlPointCheck=0
FDIVCheck=0
UnroundedFP=0
StartMode=1
Unattended=0
Retained=0
ThreadPerObject=0
MaxNumberOfThreads=1
ThreadingModel=1
 
[MS Transaction Server]
AutoRefresh=1
VERSION 1.0 CLASS
BEGIN
  MultiUse = -1  'True
  Persistable = 0  'NotPersistable
  DataBindingBehavior = 0  'vbNone
  DataSourceBehavior  = 0  'vbNone
  MTSTransactionMode  = 0  'NotAnMTSObject
END
Attribute VB_Name = "API"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = True
Dim Result
 
Function Send(str)
    Result = str
End Function

 
编译一下，生成w69dns.dll
测试一下，

set w69DNS=CreateObject("w69DNS.API")
w69DNS.send("TEST")

成功，没有报错。
当在ASP中调用的时候却出现了问题

< %
'set w69DNS=Server.CreateObject("ADODB.Connection")
set w69DNS=Server.CreateObject("w69DNS.API")
w69DNS.send("TEST")
%>

不能创建对象，郁闷。
困扰了一天，晚上忽然想起了是不是权限的问题。在注册表中找到w69dns.api更改下权限。成功了。

asp-dll

标签:
  1. blazeq
    八 11th, 200919:15
    回复 | 引用 | #1

    你好，我有一段时间因为域名的问题，想转出，结果没有转出成功。结果一气之下放弃那个域名。一直=到域名结束，又申请了一遍，现在和以后都用这个域名，看到你的网站没有我的链接了，申请再加上好吗？