谁知道这段代码如何解释？

gzbhappy 发布于 2008-06-29 19:49， 1984 次点击

<%
regid=request("regid")
on error resume next
Dim xingyutandefault
Set xingyutandefault = Server.CreateObject("xingyutan.default")
if err.number<>0 then
err.number=0
response.Write("还没有安装！")
response.End()
end if
xingyutandefault.reg(regid)
Set xingyutandefault = Nothing
Response.Redirect("index.htm")
%>
谢谢大家的参与！！！

11 回复

gzbhappy2008-06-29 19:50

尤其是这一段Set xingyutandefault = Server.CreateObject("xingyutan.default")
十分不解？

multiple19022008-06-29 19:53

这个网站的主要程序代码在组件“xingyutan.default”中，换句话说他不希望你看到他的源代码。
安装组件需要服务器管理员权限。

gzbhappy2008-06-29 20:02

可我查遍所有的网站文件，但没有“xingyutan.default”这个啊，
不知道这个组件在那里，一开始我也认为是组件就是不知道是怎么回事？
能否再做一下详解？

multiple19022008-06-29 20:18

组件是存在文件里，不过应该不是放在网站文件里，即使放在网站文件里也不会被调用（怎么可能让你任意调用二进制代码呢），实际上一般是个dll文件，也可以是ocx。
文件在哪里要问开发者了。

gzbhappy2008-06-29 20:29

谢谢了
有点思路了

anlige2008-06-29 23:46

那应该是人家自己写的一个dll~

gzbhappy2008-06-30 09:54

请问楼上的高手们，dll怎样创建，用什么方式打开

linux_hj2008-07-02 22:06

是作者自己写的一个组件，这个组件可以用各种编程工具编写，我一般用VB

#10

multiple19022008-07-02 22:41

DLL里是二进制代码，可以运行，但是所谓的“打开”或者叫“查看源程序”是不太可能的了。可以反汇编，但作者一般写的不是汇编代码。

#11

yms1232008-07-03 12:43

一般Visual Basic 6.0就能制作ASP用的ActiveX的DLL组建,不过这种组件需要在系统中注册才能使用，未注册是无法使用的。

#12

gzbhappy2008-12-14 11:06

但是，去找了全部文件的代码，也没有见到什么dll文件啊，那作者是怎么封装的，有什么方法可以看到吗
谢谢