I don't know if this is the function I should use or not, but here goes....

I have a NT4 domain, with ALOT of global groups (to many, but the old admin...).
I need to map a folder depending on witch group the user is in.
(so far that's not the problem).
ALL group´names looks like this:
xxxInl
Where "xxx" can be:
aaa, aab, abc, 94a, 95f, etc,etc.

The mapping I need to do is based on the first 3 letters of the groupname.

Anyone that can point me in the right direction?

regards
Frippe

you need to use the ingroup("groupname") function

happy new year

Alex T

IF Ingroup("aaaInl") use x: \\Server\aaa
EndIF
IF Ingroup("aabInl") use x: \\Server\aab
EndIF
IF Ingroup("abcInl") use x: \\Server\abc
EndIF
IF Ingroup("95fInl") use x: \\Server\95f
EndIF

That would make my loginscript very loooong.

What I was thinking was something like this:

$Group=""
"if user is in a group that ends with INL, then set $Group to the 3 letters before INL"
use x: \\Server\$Group

What I'm missing is the code that does the things in the quoted line.

Makes this any sense??
Frippe

code:

---

$groups = aaaINL,adcINL,1dsINL ;and so on
 for each $group in $groups
   if ingroup("$group")
     use x: "\\server\"+substr("$group",1,3)
   endif
 next

---

it's been a while for me (6months) when I last have been scripting with arrays, but something like this should work.
so for every group, you only need to add the groupname to the end of the groups-array.

hope this helpes.

;Map any BU specific drive mappings and run any application batch files.
$n = 0
do
$grp = enumgroup($n)
Select
Case instr($grp, "$CP")
use n: /delete
use n: "\\catofs03\cpdata"
use s: /delete
use s: "\\carefs01\CPDATA"
call $logonpath + "\regina\scripts\toronto.kix"
call $logonpath + "\regina\scripts\corp.kix"
exit

Case instr($grp, "$GP")
use s: /delete
use s: "\\carefs01\GPDATA"
call $logonpath + "\regina\scripts\glh.kix"
exit

Case instr($grp, "$ID")
use s: /delete
use s: "\\carefs01\IDDATA"
call $logonpath + "\regina\scripts\indiv.kix"
exit

Case instr($grp, "$IP")
use s: /delete
use s: "\\carefs01\IPDATA"
exit

Case instr($grp, "$RI")
use s: /delete
use s: "\\carefs01\RIDATA"
call $logonpath + "\regina\scripts\react.kix"
exit

endselect
$n = $n + 1
until $grp = ""

The above script is what I use to map drives (I think it is what you are after). My problem is that the command enumgroup takes about 15seconds to run. Does anyone know a way of speeding this up.

Thanks,
Trent

On the other hand, i suggest you something that i'm currently trying : multithreading (Yes guys, i'm getting to be a real maniac with Kix)
This is only if you can split your script in standalone parts.
In the main script, start other you want to get fasters with this command :

code:

---

$ScriptToRun="complete_path\script.kix"
$Kix32exe="Complete_path\Kix32.exe"
Shell "Start /m "+ $Kix32exe+" "+ $ScriptToRun

---

[ 04 January 2002: Message edited by: Alex.H ]

code:

---

$Check = right($groupname,3)
use x: \\Server\$check  

---

This is what I did:

code:

---

$index = 0
Do
   $group = Enumgroup($index)
   $index = $index + 1
      IF INSTR($group,"Inl")
        $Hoger = RIGHT($group,10)
           IF INSTR($Hoger,"ola")
             $Trim = RIGHT($Hoger,6)
             $Resultat = LEFT($Trim,3)
           ELSE
             $Resultat = LEFT($Hoger,3)
           ENDIF
      ENDIF
Until Len($Group) = 0
Use x: \\Server\$Resultat

---

I don't know if it's possible to optimize this, but it works as it is.

regards
Frippe

[ 07 January 2002: Message edited by: Frippe ]