.net com组件注册示例 - TC官方合作论坛

function cshap_com组件注册()
var net路径 = ""
var net版本路径 = ""
var regasm路径 = ""
var retfirearr = array()
var retfoldarr = array()
var retfoldarr_size = -1
net路径 = reggetvalue("HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\.NETFramework", "InstallRoot")
filetraverse(net路径, retfirearr, retfoldarr)
retfoldarr_size = arraysize(retfoldarr)
for(var i = 0; i < retfoldarr_size; i++)
if(strfind(retfoldarr[i], "v4.0") != -1)
regasm路径 = net路径 & retfoldarr[i] & "\\RegAsm.exe"
break
end
end
if(fileexist(regasm路径) == 1)
cmd(regasm路径 & " E:\\mycom.dll", true)
else
messagebox("找不到RegAsm.exe")
end
end

复制代码