게시판 본문 Active Directory Service Interface - Read Only
re: ADSI서버가 죽어있는지 살아있는지 알수있는? |
---|
작성자: ADSI초보
작성일시: 2007-09-05 15:02,
조회수: 3,140
|
function get_ADSI_Check()
On Error Resume Next Dim AD_con,AD_com,AD_rs,str_ADSI_Sql Set AD_con = CreateObject("ADODB.Connection") Set AD_com = CreateObject("ADODB.Command") Set AD_rs = CreateObject("ADODB.RecordSet") Ad_con.Provider = "ADsDSOObject" Ad_con.Open "Active Directory Provider", ADUser, ADPasswd ' AD에 커넥션 Open Set AD_com.ActiveConnection = AD_con strCols = "cn" '그룹코드 str_ADSI_Sql = " SELECT "&strCols str_ADSI_Sql = str_ADSI_Sql & " FROM '"&LDAP_GROUP_URL&"'" str_ADSI_Sql = str_ADSI_Sql & " WHERE objectCategory = 'Group'" AD_com.CommandText= str_ADSI_Sql Set AD_rs = AD_com.Execute(str_ADSI_Sql) If Err.Number = 0 Then doc = True Else doc = False End If Err.Clear get_ADSI_Check=doc end function =================== 약간? 응용해서 위의 소스로 해결했습니다. On Error Resume Next 를 이용하여 특정 정보를 가져오는데 성공하면 OK 실패하면 NO식의 프로그램?으로 해결을... ^^;;; 아이디 및 비밀번호 인증하는데서 속을 썩이네요..T.T 또 질문올라갑니다.... |
IP 주소: 210.182.144.37
|
전체 421 건의 게시물,
17 페이지로 구성된
Active Directory Service Interface 게시판의
5 페이지입니다.
![]() |
게시물 | |||
---|---|---|---|---|
331 | 2007-10-05 | 6,036 | ||
330 | 2007-10-05 | 4,017 | ||
329 | 2007-09-06 | 3,259 | ||
328 | 2007-09-06 | 3,314 | ||
327 |
LDAP에서 사용하는 포트 [2] |
2007-09-05 | 3,491 | |
326 | 2007-09-05 | 3,338 | ||
325 | 2007-09-05 | 3,334 | ||
324 | 2007-09-05 | 3,343 | ||
323 | 2007-09-05 | 3,167 | ||
321 | 2007-09-04 | 3,326 | ||
320 | 2007-09-05 | 3,257 | ||
![]() |
2007-09-05 | 3,140 | ||
316 | 2007-08-29 | 3,428 | ||
315 | 2007-08-29 | 3,416 | ||
314 | 2007-07-25 | 3,421 | ||
313 | 2007-07-25 | 3,251 | ||
312 | 2007-07-09 | 3,140 | ||
311 |
허욱 |
2007-12-19 | 540 | |
310 | 2007-06-12 | 3,237 | ||
309 | 2007-06-12 | 3,486 | ||
308 | 2007-06-13 | 3,067 | ||
307 | 2007-06-12 | 3,359 | ||
306 | 2007-06-12 | 3,186 | ||
305 | 2007-06-05 | 3,271 | ||
304 |
|
2007-06-05 | 3,353 |