Teman2..ada yg ngerti VBScript gak?... please help.
gue bikin login script pake VBS, tapi ada errornya dan gue gak ngerti VBS nih.
Maklum scriptnya juga boleh copy-paste dari internet...
scriptnya begini nih
Const IMAGES = "cn=images"
Set objNetwork = CreateObject("WScript.Network")
Set ADSysInfo = CreateObject("ADSystemInfo")
Set CurrentUser = GetObject("LDAP://" & ADSysInfo.UserName)
strGroups = LCase(Join(CurrentUser.MemberOf))
if InStr(strGroups, IMAGES) Then
objNetwork.MapNetworkDrive "G:" , "\\data1\gambar$"
End If
objNetwork.MapNetworkDrive "I:" , "\\data1\images$"
objNetwork.MapNetworkDrive "Z:" , "\\data1\share$"
errornya sih di line 6... cuman gue gak tau kenapa errornya...
please help donk...
________________________________________________________
Kunjungi halaman depan Yahoo! Indonesia yang baru!
http://id.yahoo.com/
[Non-text portions of this message have been removed]
--
www.itcenter.or.id - Komunitas Teknologi Informasi Indonesia
Gabung, Keluar, Mode Kirim : [EMAIL PROTECTED]
## Jobs: itcenter.or.id/jobs ## Bursa: itcenter.or.id/bursa ##
## Jaket ITCENTER tersedia di http://shop.itcenter.or.id
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/ITCENTER/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/ITCENTER/join
(Yahoo! ID required)
<*> To change settings via email:
mailto:[EMAIL PROTECTED]
mailto:[EMAIL PROTECTED]
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
