الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيفية معرفة فيرجن التحديث لنورتن انتي فيروس من خلال في بي سكريبت

مغلق
بدأه - Busbar - MVP في 23 سبتمبر 2006 · 8 رد · 806 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اقوم حاليا بتطوير احد حلول ال VPN quarantine التابعة للايزا سيرفر المذكورة هنا

http://www.microsoft.com/technet/security/...s/vppgch01.mspx

و اريد ان اتحصل على سكريبت يقوم بمعرفة فيرجن تحديث الانتي فيروس فاذا كانت اقل من تاريخ ما فانها تفضل و ان كانت ملائمة فانها تعبر الاختبار

هل يوجد سركيبت لديكم يقوم بهذا

Mahmoud Magdy

MVP - Exchange Server. MCITP (Windows Server 2008, Exhcange Server 2010,/2007),CCNP, MCTS(OCS 2007 R2, SCCM 2007)

Tech Lead

Ingazat Information Technology

Follow me on twitter: http://www.twitter.com/_busbar

my blog: http://autodiscover.wordpress.com

Link with me on linkedin: http://www.linkedin.com/profile?viewProfile=&key=71027694

or on experts-exchange.com: http://www.experts-exchange.com/M_1426100.html

#2

هل يوجد ملف معين يمكن معرفة اصدار التحديث منه ..

#3
اقتباس
اريد ان اتحصل على سكريبت يقوم بمعرفة فيرجن تحديث الانتي فيروس فاذا كانت اقل من تاريخ ما فانها تفضل و ان كانت ملائمة فانها تعبر الاختبار

هل تعني بهذا معرفة الـ update version للأنتي فيروس والذي يمكن الحصول عليه من Security Center التابع للنظام والذي يمكن الإطلاع عليه بتنفيذ الأمر

rundll32 shell32.dll,Control_RunDLL wscui.cpl

طبعاً هذا الكلام في Window XP و فيما أتذكر أنه موجود في Win2003 Server ...

منتظر منك توضيح أكثر

"First they ignore you, then they laugh at you, then they attack you, then you win"

===

اقتباس

حُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا

هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا

الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا

القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ

لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ

البردوني "أبو تمام وعروبة اليوم" 1971

===

اقتباس
عبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــم

و تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم

ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم

أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟

ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا

البردوني "نحن و الحاكمون "

#4
اقتباس
هل تعني بهذا معرفة الـ update version للأنتي فيروس

هذا بالظبط ما اريد

كل ما اريده انه ان اتحصل عليه و لو في Msgbox و انا سأكمل الباقي

اقتباس
rundll32 shell32.dll,Control_RunDLL wscui.cpl

الامر بيفتح ال Security center بس ازاي اعرف بقا فيرجن الابديت ؟؟؟

Mahmoud Magdy

MVP - Exchange Server. MCITP (Windows Server 2008, Exhcange Server 2010,/2007),CCNP, MCTS(OCS 2007 R2, SCCM 2007)

Tech Lead

Ingazat Information Technology

Follow me on twitter: http://www.twitter.com/_busbar

my blog: http://autodiscover.wordpress.com

Link with me on linkedin: http://www.linkedin.com/profile?viewProfile=&key=71027694

or on experts-exchange.com: http://www.experts-exchange.com/M_1426100.html

#5
اقتباس
الامر بيفتح ال Security center بس ازاي اعرف بقا فيرجن الابديت ؟؟؟

للأسف ليس لدي Anti-Virus حالياً لكن الأسبوع الماضي كنت منزل Kaspersky ولاحظت وجود شئ يشير الى update version في Security Center ... أليس كذلك؟ أم أني كنت أحلم ؟

على إفتراض أني ما بخرفش , جرب هذه الطريقة مؤقتاً حتى الغد حيث سأقوم بتركيب Anti-virus و أرى كيف تجري الأمور

الطريقة :

في registry لاحظ القيم الموجود هنا

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Security Center\Monitoring

هل هناك أي قيم مضافة قد تفيدنا؟ ستجد هناك عدة Keys منها SymantecAntiVirus ...

إن لم يكن هناك ما يفيد جرب إستعمال RegMon وعندما تفتح الـ Security Center راقب ما يقوم بقراءته من قيم في الـ Registry ...

هذه الفكرة هي التي تباردت إلى ذهني حالياً و أتمنى منك التأكد منها إلا حين أقوم بتثبيت Anti-virus ...

"First they ignore you, then they laugh at you, then they attack you, then you win"

===

اقتباس

حُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا

هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا

الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا

القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ

لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ

البردوني "أبو تمام وعروبة اليوم" 1971

===

اقتباس
عبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــم

و تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم

ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم

أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟

ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا

البردوني "نحن و الحاكمون "

#6

Back

جربت الطريقة التي أشرت إليها في الرد السابق لكن يبدو أنها غير مجدية فالمعلومات ليست موجودة في الـ Registry

لكن لها حل

سيفيدنا رد Rob Kennedy هنا

http://groups.google.com/group/comp.lang.p...759cf6bcf1ecd55

راجع الوصلات التي أشار اليها

ما سيهمنا هو : Using Windows Firewall API

"First they ignore you, then they laugh at you, then they attack you, then you win"

===

اقتباس

حُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا

هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا

الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا

القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ

لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ

البردوني "أبو تمام وعروبة اليوم" 1971

===

اقتباس
عبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــم

و تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم

ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم

أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟

ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا

البردوني "نحن و الحاكمون "

#7

أعتقد ستجد ما تريده هنا

http://www.codecomments.com/archive300-2005-3-413547.html

"First they ignore you, then they laugh at you, then they attack you, then you win"

===

اقتباس

حُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا

هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا

الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا

القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ

لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ

البردوني "أبو تمام وعروبة اليوم" 1971

===

اقتباس
عبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــم

و تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم

ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم

أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟

ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا

البردوني "نحن و الحاكمون "

#8

شوف السكريبت التالي باتش فايل من مايكروسوفت يقوم بفحص Etrust

@rem **************************************************************************

@rem SAMPLE SCRIPT - AV.bat

@rem **************************************************************************

@rem Description - Checks if Anti-Virus (ETrust) is latest and all the latest

@rem Virus Signature files are installed on the machine.

@rem * This script only performs validation for ETrust AntiVirus

@rem * Based on the User Settings, if the latest virus signature

@rem files are not present, they are downloaded and installed.

@rem

@rem Supported Operating Systems -

@rem Windows 2000

@rem Windows 2000 Advanced Server

@rem Windows 2000 Professional Edition

@rem Windows 2000 Server

@rem Windows Server 2003

@rem Windows XP

@rem Windows XP Service Pack 2

@rem

@rem Note: Windows 2000 series will require reg.exe that is included

@rem in Windows 2000 Support Tools

@rem

@rem Usage - AV.bat

@rem

@rem Returns - 0 - If AV and all Signatures are Up-to-Date

@rem 1 - If AV Version is not as configured (AV_VERSION)

@rem 2 - If AV Signature Files are not up-to-Date

@rem 3 - If there is an error in checking for AV Updates

@rem

@rem Copyright © Microsoft Corporation. All rights reserved

@rem **************************************************************************

@echo off

@rem *** Configuration Option

@rem AV_VERSION - AV Version that must be installed on the Client Machine

@rem DOWNLOAD_AV_UPDATE :

@rem 0 - Only check for missing AntiVirus updates

@rem 1 - Download latest Virus Signature Files

SET AV_VERSION=7.0

SET DOWNLOAD_AV_UPDATE=0

:START

SET VERSION=NONE

GOTO ETRUST

:ETRUST

@rem Read the Current Version of ETrust AV and validate against the User Configured value

FOR /f "Tokens=3 Delims= " %%A in ('REG QUERY "HKLM\SOFTWARE\ComputerAssociates\eTrustAntivirus\CurrentVersion" /V Version') DO SET VERSION=%%A

IF %VERSION%==NONE GOTO OTHER_ERROR

IF /i %VERSION% GEQ %AV_VERSION% GOTO ETRUST_LATEST

IF /i %VERSION% LSS %AV_VERSION% GOTO ETRUST_AV_ERROR

GOTO OTHER_ERROR

:ETRUST_LATEST

@rem AV Version is Latest. Now check for the latest signatures

IF EXIST %AVENGINE%\inodist.exe IF EXIST %AVENGINE%\inodist.ini GOTO ETRUST_CHECK_FOR_UPDATES

GOTO OTHER_ERROR

:ETRUST_CHECK_FOR_UPDATES

@rem Check for any missing AV Signatures files

START /WAIT %AVENGINE%\inodist.exe /chk /cfg %AVENGINE%\inodist.ini

IF ERRORLEVEL 2 GOTO OTHER_ERROR

IF ERRORLEVEL 1 IF %DOWNLOAD_AV_UPDATE%==1 GOTO ETRUST_UPDATE_SIGNATURES

IF ERRORLEVEL 1 IF %DOWNLOAD_AV_UPDATE%==0 GOTO ETRUST_SIG_ERROR

IF ERRORLEVEL 0 GOTO ETRUST_PASS

GOTO OTHER_ERROR

:ETRUST_UPDATE_SIGNATURES

@rem Download the latest AV Signatures Files

START /WAIT %AVENGINE%\inodist.exe /cfg %AVENGINE%\inodist.ini

IF %ERRORLEVEL%==0 GOTO ETRUST_PASS

GOTO ETRUST_SIG_ERROR

:ETRUST_PASS

@rem Validation has Passed

SET ERRNO=0

GOTO END

:ETRUST_AV_ERROR

SET ERRNO=1

IF %DEBUG%==1 (SET ERRSTR=ETRust AntiVirus Version is Less than that desired & GOTO PRINT)

GOTO END

:ETRUST_SIG_ERROR

SET ERRNO=2

IF %DEBUG%==1 (SET ERRSTR=Virus Signature Files are Not Up-To-Date. An Updation is Needed & GOTO PRINT)

GOTO END

:OTHER_ERROR

SET ERRNO=3

IF %DEBUG%==1 (SET ERRSTR=Either ETrust AntiVirus is NOT installed or installation is corrupt & GOTO PRINT)

GOTO END

:PRINT

echo %ERRSTR%

SET ERRSTR=

GOTO END

:END

SET CURPRO=

SET VAL=

SET STR=

SET AV_VERSION=

SET DOWNLOAD_AV_UPDATE=

EXIT /B %ERRNO%

GOTO :EOF

قمت بتتبع سايمانتك ووصلت الى التالي

HKLM/software/symantec/shareddefs/defwatch

هناك Ket باسم Def version

بس ازاي اقراه بقا ؟؟؟؟

Mahmoud Magdy

MVP - Exchange Server. MCITP (Windows Server 2008, Exhcange Server 2010,/2007),CCNP, MCTS(OCS 2007 R2, SCCM 2007)

Tech Lead

Ingazat Information Technology

Follow me on twitter: http://www.twitter.com/_busbar

my blog: http://autodiscover.wordpress.com

Link with me on linkedin: http://www.linkedin.com/profile?viewProfile=&key=71027694

or on experts-exchange.com: http://www.experts-exchange.com/M_1426100.html

#9

طيب لم تخبرني عن الـ VBS في الوصلة التي أشرت إليها في آخر رد لي , ماذا أعطتك؟

الكود موجود في الصفحة وأيضا في الوصلة التي تحوي العديد من الـ vb scripts من موقع MS

اقتباس
شوف السكريبت التالي باتش فايل من مايكروسوفت يقوم بفحص Etrust

ذلك batch file وليس VBS كما طلبت في السؤال

لقراءة القيمة التي ذكرتها في Registry عن طريق batch file جرب هذا

@ECHO OFF
:: delims is a TAB followed by a space
FOR /F "tokens=3 delims=	 " %%A IN ('REG QUERY "HKLM/software/symantec/shareddefs/defwatch" /v version') DO SET Version=%%A
ECHO Version=%Version%

لست أفهم كثيراً في batch file & VBS

هذه الصفحة قد تفيد في كيفية قراءة قيمة من Registry عن طريق batch files

http://www.robvanderwoude.com/ntregistry.html

"First they ignore you, then they laugh at you, then they attack you, then you win"

===

اقتباس

حُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا

هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا

الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا

القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ

لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ

البردوني "أبو تمام وعروبة اليوم" 1971

===

اقتباس
عبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــم

و تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم

ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم

أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟

ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا

البردوني "نحن و الحاكمون "

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…