- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助] 有没有人做AD结合的验证啊？？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=50976)
-- 发布时间：2014/5/16 10:13:00
-- [求助] 有没有人做AD结合的验证啊？？
搜了下论坛，几乎没人搞过这个啊
-- 发布时间：2014/5/16 14:14:00
--
不是没人搞,是不会呀
有需求的顶起来啊 别傻愣着
-- 发布时间：2014/5/16 14:15:00
--
就算不会 也可以讨论下
-- 发布时间：2014/5/16 15:08:00
--
查了下资料，应该是这样写，意思是，客户端连接一下域，连得上，就允许用软件即可。
记得，添加一个引用 System.DirectoryServices.Dll
Dim domainName As String = "test.com"
try
Dim entry As New System.DirectoryServices.DirectoryEntry("LDAP://" & domainName)
Dim mySearcher As New System.DirectoryServices.DirectorySearcher(entry)
mySearcher.Filter = ("(objectClass=user)") \'user表示用户,group表示组
For Each resEnt As System.DirectoryServices.SearchResult In mySearcher.FindAll()
Next
catch ex As exception
msgbox("连接不上......自己做操作")
msgbox(ex.message)
End try
-- 发布时间：2014/5/16 15:31:00
--
查了下资料，应该是这样写，意思是，客户端连接一下域，连得上，就允许用软件即可。
记得，添加一个引用 System.DirectoryServices.Dll
Dim domainName As String = "test.com"
try
Dim entry As New System.DirectoryServices.DirectoryEntry("LDAP://" & domainName)
Dim mySearcher As New System.DirectoryServices.DirectorySearcher(entry)
mySearcher.Filter = ("(objectClass=user)") \'user表示用户,group表示组
For Each resEnt As System.DirectoryServices.SearchResult In mySearcher.FindAll()
Next
catch ex As exception
msgbox("连接不上......自己做操作")
msgbox(ex.message)
End try
甜总 屌爆了！
-- 发布时间：2014/5/19 9:23:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:system.directoryservices.rar |
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目3.table |
提供了DLL 以及测试项目，按ctrl打开即可
-- 发布时间：2014/5/19 9:37:00
--
谢谢7楼。不过System.DirectoryServices是.net frameword已经集成的，直接在狐表里引用 System.DirectoryServices.Dll 即可。
-- 发布时间：2014/5/19 9:39:00
--
谢谢7楼。不过System.DirectoryServices是.net frameword已经集成的，直接在狐表里引用 System.DirectoryServices.Dll 即可。
甜总，请教如何引用啊 没玩过，我只知道 把dll添加进去 具体就不会了
-- 发布时间：2014/5/19 10:04:00
--
甜总，请教如何引用啊 没玩过，我只知道 把dll添加进去 具体就不会了
直接在引用那里写 System.DirectoryServices.Dll ，不需要选择具体的dll文件
-- 发布时间：2014/7/7 10:53:00
--
直接在引用那里写 System.DirectoryServices.Dll ，不需要选择具体的dll文件
甜总，我还有个问题要请教下
如果FT想赋值给全局变量_UserName的值
这里要怎么赋值啊？