Page 1 of 3 123>
Topic Options
#143222 - 2005-07-07 11:13 PM Trackit and Citrix Metaframe XP
NKK Offline
Fresh Scripter

Registered: 2003-03-17
Posts: 37
Loc: Marshall Texas
Situation. I am using a pgm called Trackit to audit users computers and audit their system. I want this to only happen on their local computers. Our remote users login to their local computer and then start a citrix session - I do not want the user to run the part of the Kix script that runs Trackit if they are logging onto a Citrix session they need to run the rest of the script to get their mappings, etc. Remote users local computers have either win2k or winxp on them. Thanks.
Top
#143223 - 2005-07-07 11:24 PM Re: Trackit and Citrix Metaframe XP
Bryce Offline
KiX Supporter
*****

Registered: 2000-02-29
Posts: 3167
Loc: Houston TX
the new 4.50 version of Kix has a new Citrix/term service macro.
Top
#143224 - 2005-07-08 02:13 AM Re: Trackit and Citrix Metaframe XP
Les Offline
KiX Master
*****

Registered: 2001-06-11
Posts: 12734
Loc: fortfrances.on.ca
Even if you don't use the latest version, there is a FAQ that covers this topic.
_________________________
Give a man a fish and he will be back for more. Slap him with a fish and he will go away forever.

Top
#143225 - 2005-07-08 03:51 PM Re: Trackit and Citrix Metaframe XP
NKK Offline
Fresh Scripter

Registered: 2003-03-17
Posts: 37
Loc: Marshall Texas
If I add this to the top of my Main login Script - it is suppose to check if the users is logging into local or a Citrix Session. If it is a Citrix session it is suppose to call the Citrix Script for mapping drives. What is wrong with this code? Thanks from a new scripter.

CODE
; Determine if Logging into Citrix or Local
Function ProductSuite ($Product)
Dim $Product
SELECT
Case $Product = "None" Select $x=0
Case $Product = "Small Business" $x=1
Case $Product = "Enterprise" $x=2
Case $Product = "BackOffice" $x=4
Case $Product = "CommunicationsServer" $x=8
Case $Product = "Terminal Server" $x=16
Case $Product = "Small Business (Restricted)" $x=32
Case $Product = "Embedded NT" $x=64
Case $Product = "DataCenter" $x=128
Case $Product = "Single User Terminal Server" $x=256
Case $Product = "Home Edition" $x=512
Case $Product = "Blade Server" $x=1024
Case 1 $RC=MessageBox ("Invalid parameter used in function
ProductSutie ($Product)",48
WriteLog("Invalid parameter used in function ProductSuite ($Product)")
Endselect
$ProdcutSuite = $x & val(@ProductSuite)
Endfunction
If ProductSuite("Terminal Server") and not ProductSuite("Singel User Terminal Server")
CallScript("$HomeDrive\Citrixmap.kix")
endif
EXIT

Top
#143226 - 2005-07-08 03:54 PM Re: Trackit and Citrix Metaframe XP
NKK Offline
Fresh Scripter

Registered: 2003-03-17
Posts: 37
Loc: Marshall Texas
I am using Kix32.exe from 12/28/04
Top
#143227 - 2005-07-08 03:56 PM Re: Trackit and Citrix Metaframe XP
Les Offline
KiX Master
*****

Registered: 2001-06-11
Posts: 12734
Loc: fortfrances.on.ca
You need a spellchecker.
("Singel User Terminal Server")
_________________________
Give a man a fish and he will be back for more. Slap him with a fish and he will go away forever.

Top
#143228 - 2005-07-08 04:14 PM Re: Trackit and Citrix Metaframe XP
NKK Offline
Fresh Scripter

Registered: 2003-03-17
Posts: 37
Loc: Marshall Texas
Les ??? Single is correct spelling, is it not?
Top
#143229 - 2005-07-08 04:31 PM Re: Trackit and Citrix Metaframe XP
NKK Offline
Fresh Scripter

Registered: 2003-03-17
Posts: 37
Loc: Marshall Texas
When I test run the script I see "Invaild Method/function call:missing comma"

Missing where?

Top
#143230 - 2005-07-08 04:46 PM Re: Trackit and Citrix Metaframe XP
NKK Offline
Fresh Scripter

Registered: 2003-03-17
Posts: 37
Loc: Marshall Texas
I am trying to find where I saw this example of script so I can proof mine. Les you wrote it, I think. Where is it? Thanks.
Top
#143231 - 2005-07-08 04:57 PM Re: Trackit and Citrix Metaframe XP
maciep Offline
Korg Regular
*****

Registered: 2002-06-14
Posts: 947
Loc: Pittsburgh
this?

Citrix FAQ

Also, "Single" is the correct spelling, "Singel" is not. Look at the code you posted again.

Code:

If ProductSuite("Terminal Server") and not ProductSuite("Singel User Terminal Server")
CallScript("$HomeDrive\Citrixmap.kix")
endif


Top
#143232 - 2005-07-08 05:07 PM Re: Trackit and Citrix Metaframe XP
NKK Offline
Fresh Scripter

Registered: 2003-03-17
Posts: 37
Loc: Marshall Texas
Ok got that fixed now I am getting the no ENDFUNCTION for FUNCTION Productsuite
Top
#143233 - 2005-07-08 05:11 PM Re: Trackit and Citrix Metaframe XP
maciep Offline
Korg Regular
*****

Registered: 2002-06-14
Posts: 947
Loc: Pittsburgh
copy and paste issues?

Case 1 $RC=MessageBox ("Invalid parameter used in function
ProductSutie ($Product)",48)

also, it looks like that function is using the WriteLog() UDF . May just want to comment (;) that line out or copy the udf and put it in your script...


Edited by maciep (2005-07-08 05:15 PM)

Top
#143234 - 2005-07-08 05:17 PM Re: Trackit and Citrix Metaframe XP
NKK Offline
Fresh Scripter

Registered: 2003-03-17
Posts: 37
Loc: Marshall Texas
Probably maciep. Still getting "Missing Endfunction".
Top
#143235 - 2005-07-08 05:25 PM Re: Trackit and Citrix Metaframe XP
Richard H. Administrator Offline
Administrator
*****

Registered: 2000-01-24
Posts: 4946
Loc: Leatherhead, Surrey, UK
What's the select doing in this line:
Code:
Case $Product = "None" Select $x=0



That's gonna cause you problems too.

Top
#143236 - 2005-07-08 05:30 PM Re: Trackit and Citrix Metaframe XP
maciep Offline
Korg Regular
*****

Registered: 2002-06-14
Posts: 947
Loc: Pittsburgh
definitely copy and paste issues...

Code:

Function ProductSuite ($Product)
Dim $Product

select
case $Product = "None" $x=0
case $Product = "Small Business" $x=1
case $Product = "Enterprise" $x=2
case $Product = "BackOffice" $x=4
case $Product = "CommunicationServer" $x=8
case $Product = "Terminal Server" $x=16
case $Product = "Small Business (Restricted)" $x=32
case $Product = "Embedded NT" $x=64
case $Product = "DataCenter" $x=128
case $Product = "Single User Terminal Server" $x=256
case $Product = "Home Edition" $x=512
case $Product = "Blade Server" $x=1024
case 1 $RC=MessageBox ("Invalid parameter used in function ProductSuite ($Product)",48)
;WriteLog("Invalid parameter used in function ProductSuite ($Product)")
endselect

$ProductSuite = $x & val(@ProductSuite)
Endfunction

if ProductSuite("Terminal Server") and not ProductSuite("Single User Terminal Server")
;CallScript("$HomeDrive\CitrixMap.kix")
endif



by the way, the "missing endfunction" error is probably being caused because the messagebox call is going across two lines which is f-ing up the quotes


Edited by maciep (2005-07-08 05:35 PM)

Top
#143237 - 2005-07-08 05:38 PM Re: Trackit and Citrix Metaframe XP
NKK Offline
Fresh Scripter

Registered: 2003-03-17
Posts: 37
Loc: Marshall Texas
Have no idea. Got script example from this website. Just trying to:
Users login to local computer get #1 Kix script that runs Trackit pgm
Remote users then start a Citrix XP session and do NOT need to run the Trackit pgm, just the rest of the script for drive mappings. Maybe I can take all the "case" statements out except the one for "Single User Terminal Server" and see if it will work. I am very ignorant at this point. Sorry.

Top
#143238 - 2005-07-08 05:40 PM Re: Trackit and Citrix Metaframe XP
NKK Offline
Fresh Scripter

Registered: 2003-03-17
Posts: 37
Loc: Marshall Texas
There is something wrong with the syntax - Missing ENDFUNCTION error.
Top
#143239 - 2005-07-08 05:46 PM Re: Trackit and Citrix Metaframe XP
maciep Offline
Korg Regular
*****

Registered: 2002-06-14
Posts: 947
Loc: Pittsburgh
did you read my "by the way" above? repost the code you are using.
Top
#143240 - 2005-07-08 05:58 PM Re: Trackit and Citrix Metaframe XP
NKK Offline
Fresh Scripter

Registered: 2003-03-17
Posts: 37
Loc: Marshall Texas
It is something wrong with the msg line - I commented it out and the script is running, at least on local computer. Going to test on Citrix login.
Top
#143241 - 2005-07-08 06:01 PM Re: Trackit and Citrix Metaframe XP
maciep Offline
Korg Regular
*****

Registered: 2002-06-14
Posts: 947
Loc: Pittsburgh
this

Code:

Case 1 $RC=MessageBox ("Invalid parameter used in function
ProductSutie ($Product)",48)



needs to be this

Code:

Case 1 $RC=MessageBox ("Invalid parameter used in function ProductSutie ($Product)",48)


Top
Page 1 of 3 123>


Moderator:  Jochen, Allen, Radimus, Glenn Barnas, ShaneEP, Ruud van Velsen, Arend_, Mart 
Hop to:
Shout Box

Who's Online
2 registered (morganw, mole) and 414 anonymous users online.
Newest Members
gespanntleuchten, DaveatAdvanced, Paulo_Alves, UsTaaa, xxJJxx
17864 Registered Users

Generated in 0.074 seconds in which 0.025 seconds were spent on a total of 13 queries. Zlib compression enabled.

Search the board with:
superb Board Search
or try with google:
Google
Web kixtart.org