如何通过ASP将信息发布给服务端的程序(与ASP文件同在一台机中) 如何通过ASP程序将一些信息传递给同在一台机器中的VB编写的EXE程序 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 asp改写机器上的某文件vb进行文件监听。 EXE程序写成activeX EXE,asp中用script(runat=server)写一个Class,Class中用getobject 这是验证服务器的机器用户的示例(对了,不用class也可以,可以直接调用script的函数)<script language=javascript RUNAT="SERVER">function logonDoADLogon(p_strDomain, p_strUserID, p_strPWD) //网域,用户,密码{ var f_oIADS, f_oUser, f_oContainer; var f_blnRet = true; try { var f_oIADS = GetObject('WinNT:'); f_oContainer = f_oIADS.OpenDSObject('WinNT://' + p_strDomain, p_strDomain + "\\" + p_strUserID, p_strPWD, 0); delete f_oContainer; delete f_oIADS; } catch (e) { return false; } try { var objUser = GetObject("WinNT://" + p_strDomain + "/" + p_strUserID ); delete objUser; } catch(e){ return false; } return true;}</script><%if logonDoADLogon(Request("UserDomain"), request("UserID"), Request("UserPwd")) then response.write "ok"elseresponse.write "erro" end ifresponse.write Request("UserDomain")%> script函数不会用~~~~上面JS脚本部分的代码真的能实现数据传送????????? 求教~提示无结束语句~· 请教关于版本兼容性问题 UP什么意思? 如何根据邮箱,获的stmp服务器的地址。 如sohu.com 等? 如何获得本机的ip地址,不是网卡的,而是实际的上网ip. 如何建立声音文件?(即录音) 一个是取随机数的问题? 有谁知道WOWGetVDMPointer(WOW32.DLL)的用法? 如何知道一个 IE 窗口启动! 如何在VB里给Listview控件的每个Item设置不同的背景色? 如何将执行SQL语句后的结果导入到一个文本文档里~~~~ Form 2.0里面的CommandButton按钮控件怎么弹不起来了?
vb进行文件监听。
这是验证服务器的机器用户的示例(对了,不用class也可以,可以直接调用script的函数)<script language=javascript RUNAT="SERVER">
function logonDoADLogon(p_strDomain, p_strUserID, p_strPWD) //网域,用户,密码
{
var f_oIADS, f_oUser, f_oContainer;
var f_blnRet = true;
try
{
var f_oIADS = GetObject('WinNT:');
f_oContainer = f_oIADS.OpenDSObject('WinNT://' + p_strDomain, p_strDomain + "\\" + p_strUserID, p_strPWD, 0);
delete f_oContainer;
delete f_oIADS;
}
catch (e)
{
return false;
}
try
{
var objUser = GetObject("WinNT://" + p_strDomain + "/" + p_strUserID );
delete objUser;
}
catch(e){
return false;
}
return true;
}
</script>
<%if logonDoADLogon(Request("UserDomain"), request("UserID"), Request("UserPwd")) then
response.write "ok"
else
response.write "erro"
end if
response.write Request("UserDomain")
%>