McAfee Manager - KiXtart.org

You are not logged in. [Log In] KiXtart.org website » Forums » KiXtart » COM Scripting » McAfee Manager

Page 2 of 3

Topic Options

#90747 - 2003-01-06 06:13 PM Re: McAfee Manager
Jose Jose Seasoned Scripter Registered: 2001-04-04 Posts: 693 Loc: Buenos Aires - Argentina	Check out McAfeeManager.kix link too. Thanks for the file my friend !! _________________________ Life is fine.
Top

#90748 - 2003-01-06 06:18 PM Re: McAfee Manager
Shawn Shawn Administrator Registered: 1999-08-13 Posts: 8611	rad - do you have a rouge variable in your script inquisitor script there ? think its falling over on $txtUsername being undefined ?
Top

#90749 - 2003-01-06 06:23 PM Re: McAfee Manager
Radimus Radimus Moderator Registered: 2000-01-06 Posts: 5187 Loc: Tampa, FL	I just uploaded the most current versions of Inquisitor and McAfeeManager to the website. _________________________ How to ask questions the smart way <-----------> Before you ask
Top

#90750 - 2003-01-10 12:50 AM Re: McAfee Manager
Radimus Radimus Moderator Registered: 2000-01-06 Posts: 5187 Loc: Tampa, FL	another update.. a fairly substantial one And it does handle VirusScan 7... no changes from 4.5.1 _________________________ How to ask questions the smart way <-----------> Before you ask
Top

#90751 - 2003-01-10 02:42 AM Re: McAfee Manager
NTDOC NTDOC Administrator Registered: 2000-07-28 Posts: 11624 Loc: CA	Hey Rad... just a reminder. Still would be nice if you would put a date, time, version, changes entry at the top of your files on your website. Then anyone that came to see, or use them would know when they were last updated.
Top

#90752 - 2003-01-10 03:34 AM Re: McAfee Manager
Radimus Radimus Moderator Registered: 2000-01-06 Posts: 5187 Loc: Tampa, FL	Yea, but then I'd have to edit the html page everytime I posted a new version... BTW, there is another update I just completed, and it is pretty well feature complete. The only thing is is really missing is some UI enhancements that will be available when Shawn releases the next version of kixforms to the general public and a fair amount of error handling... I have a bit of optimistic code in there now. New update at 21:47 EST _________________________ How to ask questions the smart way <-----------> Before you ask
Top

#90753 - 2003-01-12 05:33 AM Re: McAfee Manager
Radimus Radimus Moderator Registered: 2000-01-06 Posts: 5187 Loc: Tampa, FL	latest update... requires kixforms 2.20 basically adds toolbuttons and combobox list width _________________________ How to ask questions the smart way <-----------> Before you ask
Top

#90754 - 2003-01-13 04:04 PM Re: McAfee Manager
Radimus Radimus Moderator Registered: 2000-01-06 Posts: 5187 Loc: Tampa, FL	Another minor update to the form... tightened the code a bit, etc. I'm pretty much done with this. Those of you waiting for a final product, can use this version... unless someone finds a show stopper. _________________________ How to ask questions the smart way <-----------> Before you ask
Top

#90755 - 2003-01-13 05:00 PM Re: McAfee Manager
Radimus Radimus Moderator Registered: 2000-01-06 Posts: 5187 Loc: Tampa, FL	BTW... I just used this to push the 4242xdat.exe out. took almost 3 minutes to do update the 70 PCs on my LAN segment _________________________ How to ask questions the smart way <-----------> Before you ask
Top

#90756 - 2003-01-14 06:13 AM Re: McAfee Manager
LASAD LASAD Getting the hang of it Registered: 2001-10-02 Posts: 60	RAD, How about non AD domains (NT4.0) how can we apply it ?. TIA SAM
Top

#90757 - 2003-01-14 02:34 PM Re: McAfee Manager
Radimus Radimus Moderator Registered: 2000-01-06 Posts: 5187 Loc: Tampa, FL	replace the EnumOU() function with EnumDHCP() But you will need to hardcode in you DHCP servers and subnets... _________________________ How to ask questions the smart way <-----------> Before you ask
Top

#90758 - 2003-01-14 04:20 PM Re: McAfee Manager
Will Hetrick Will Hetrick Hey THIS is FUN Registered: 2001-10-02 Posts: 320 Loc: Harrisburg, PA USA	LASAD, Here are a few changes that can make the Mcafee Manager available with The NT4 Domain model 1. Add the NetView UDF 2. Change this Code code: $ou = EnumOUs($ldap, 'computer') For Each $item in Split($ou,"\|") $txtArea.AddItem($item) Next To code: $ou = "Your Domain" $txtArea.AddItem($ou) 3. In the EnumOu UDF change this code code: $Computers = GetObject($area) and $Item = $List.Items.Add($name) to code: $Computers = Netview($ou) and $Item = $List.Items.Add($Item) I think that is all the changes I made. If this doesn't work let me know and I will double check the changes I made. [ 14. January 2003, 16:23: Message edited by: Will Hetrick ] _________________________ You have at least 2 choices. Each choice changes your destiny. Choose wisely!
Top

#90759 - 2003-01-15 07:59 AM Re: McAfee Manager
LASAD LASAD Getting the hang of it Registered: 2001-10-02 Posts: 60	Will, Thanks alot, it worked ok. Rad, very nice script, even though we do have SMS (and MCafee reports), this is good to have a fast query for DAT and engine versions. Thanks again,
Top

#90760 - 2003-01-16 12:54 AM Re: McAfee Manager
Will Hetrick Will Hetrick Hey THIS is FUN Registered: 2001-10-02 Posts: 320 Loc: Harrisburg, PA USA	LASAD, Always glad to help. It's very rare for me to get something in with so many helpful people on this BBS. Radimus, As I was running this script, I noticed that it did not always give the right information Especially on servers. I am going to dig into what is being reported and what is really on it and let you know what I find. _________________________ You have at least 2 choices. Each choice changes your destiny. Choose wisely!
Top

#90761 - 2003-01-15 01:46 PM Re: McAfee Manager
Radimus Radimus Moderator Registered: 2000-01-06 Posts: 5187 Loc: Tampa, FL	I saw that also... but that would probably be due to the servers having NetShield instead of VirusScan. It does push out the update and execute it, but can't tell if successful. I was going to look into it also, but admin gets touchy if people start poking about in the servers registry... _________________________ How to ask questions the smart way <-----------> Before you ask
Top

#90762 - 2003-01-15 01:49 PM Re: McAfee Manager
Radimus Radimus Moderator Registered: 2000-01-06 Posts: 5187 Loc: Tampa, FL	BTW... I was thinking of adding a 4th column... to report the status of the McShield service.. and perhaps to turn it on, if not running. _________________________ How to ask questions the smart way <-----------> Before you ask
Top

#90763 - 2003-01-16 01:53 PM

Re: McAfee Manager

Will Hetrick Offline

Hey THIS is FUN

Registered: 2001-10-02
Posts: 320
Loc: Harrisburg, PA USA

Here is the changes I made to correctly identify netshield 4.5, Viruscan 4.5 and Enterprise 7.0 machines
Changed in the check click function

code:

 
		if $p[1]=1
			$eng=readvalue("\\$computer\$vsengine","szEngineVer")
			if @error	$eng="Unavailable"	endif
			$dat=readvalue("\\$computer\$vsengine","szDatVersion")
			if @error	$dat="Unavailable"	endif
			$Item.SubItems(1).Text=$eng
			$Item.SubItems(2).Text=$dat
		else
			$Item.SubItems(1).Text="Offline"
			endif
		$item.selected = 0
		next

code:

 
                if $p[1]=1
			$HKEYTVD = "\\$computer\HKEY_LOCAL_MACHINE\SOFTWARE\Network Associates\TVD\"
			Select
				; ####   Check if installed Viruscan Multiplatform version 4.5.x.xxxx
				Case ExistKey($HKEYTVD + "VirusScan") = 0
					$regver = ReadValue($HKEYTVD + "Shared Components\VirusScan Engine\4.0.xx","szDatVersion")
					$engver = ReadValue($HKEYTVD + "Shared Components\VirusScan Engine\4.0.xx","szEngineVer")
				; ####   Check if NetShield 4.5.x.xxxx installed
				Case ExistKey($HKEYTVD + "NetShield NT") = 0
					$regver = ReadValue($HKEYTVD + "NetShield NT\CurrentVersion","szVirDefVer")
					$engver = ReadValue($HKEYTVD + "NetShield NT\CurrentVersion","szEngineVer")
				; ####   Check if installed Viruscan Enterprise Version 7.0.0.xxx
				Case ExistKey($HKEYTVD + "VirusScan Enterprise") = 0
					$regver = ReadValue($HKEYTVD + "Shared Components\VirusScan Engine\4.0.xx","szVirDefVer")
					$engver = ReadValue($HKEYTVD + "Shared Components\VirusScan Engine\4.0.xx","szEngineVer")
				; ####	DEFAULT WHEN AN OUTDATED VERSION OR NO MCAFEE CAN BE FOUND
				Case 1
					$REGVER = "Unavailable"
					$ENGVER = "Unavailable"
			EndSelect
			; corrects the Dat Version on different install versions to match the same format.
			If $regver > 4000 AND $Regver <> "Unavailable"
				$regver = "4.0." + $regver
			Else
				If $regver < 1
					$regver = "4." + SubStr($Regver,1,6)
				EndIf
			EndIf
			$eng=$Engver
			$dat=$regver
			$Item.SubItems(1).Text=$eng
			$Item.SubItems(2).Text=$dat
		Else
			$Item.SubItems(1).Text="Offline"
			EndIf
		$item.selected = 0
		Next

_________________________
You have at least 2 choices. Each choice changes your destiny. Choose wisely!

Top

#90764 - 2003-01-16 02:14 PM Re: McAfee Manager
Will Hetrick Will Hetrick Hey THIS is FUN Registered: 2001-10-02 Posts: 320 Loc: Harrisburg, PA USA	Luckily Rad, I am the Script manager and the server manager here. So I can look these things up easily without someone yelling at me! _________________________ You have at least 2 choices. Each choice changes your destiny. Choose wisely!
Top

#90765 - 2003-01-17 08:45 PM Re: McAfee Manager
Raceeend Raceeend Starting to like KiXtart Registered: 2002-05-09 Posts: 129 Loc: The Netherlands	The script looks nice, but how do i get it to work in a NT domain? _________________________ regards, Martijn
Top

#90766 - 2003-01-17 08:51 PM Re: McAfee Manager
Sealeopard Sealeopard KiX Master Registered: 2001-04-25 Posts: 11164 Loc: Boston, MA, USA	If you would have read the thread carefully, you would have come across a post by Radimus stating quote: replace the EnumOU() function with EnumDHCP() But you will need to hardcode in you DHCP servers and subnets... _________________________ There are two types of vessels, submarines and targets.
Top

Page 2 of 3

Previous Topic View All Topics

Index Next Topic

Moderator: Shawn, ShaneEP, Ruud van Velsen, Arend_, Jochen, Radimus, Glenn Barnas, Allen, Mart

Hop to:

Shout Box

Search the board with:
superb Board Search
or try with google:

	Web kixtart.org