ͼ4-2É̵êÊý¾Ý¿âÓÀ¾Ã¹ØÏµÍ¼
5¡¢´úÂëÉè¼Æ
£¨1£©¡¢µÇ½½çÃæ
¸Ã½çÃæÊÇϵͳµÄµÇ¼½çÃæ£¬²¢ÌṩÑéÖ¤¹ÜÀíÔ±Éí·ÝºÏ·¨ÐԵŦÄÜ£¬Éè¼ÆÍê³ÉµÄЧ¹ûÈçͼ4-3Ëùʾ ¡£Óû§ÊäÈëÓû§ÃûºÍÏàÓ¦µÄÕýÈ·ÃÜÂ룬µ¥»÷¡°È·¶¨¡±°´Å¥£¬¾Í¿ÉÒÔ½øÈëϵͳÖ÷½çÃæ¡£
ͼ4-3»¶ÓµÇ½½çÃæ
SET EXACT ON
IF ALLTRIM(THISFORM.Text1.VALUE)==\
MESSAGEBOX(\ÇëÊäÈëÐÕÃû\É̵êÐÅÏ¢¹ÜÀíϵͳ\THISFORM.Text1.SetFocus Return
ENDIF
USER_N=ALLTRIM(THISFORM.Text1.VALUE) USER_P=ALLTRIM(THISFORM.Text2.VALUE) LOCAL Is_User Is_User=.F.
SELECT Ô±¹¤ÐÅÏ¢±í
25
GO TOP
DO WHILE .NOT. EOF()
Is_User=(USER_N=Ô±¹¤ÐÅÏ¢±í.ÐÕÃû).AND.(USER_P=Ô±¹¤ÐÅÏ¢±í.ÃÜÂë) IF IS_USER
EXIT
ELSE
SKIP
ENDIF
ENDDO IF IS_USER
cCurUser=ALLTRIM(THISFORM.Text1.Value) DO FORM »¶Ó½çÃæ THISFORM.RELEASE
ELSE
MESSAGEBOX(\ÐÕÃû»òÃÜÂë²»ÕýÈ·£¡\É̵êÐÅÏ¢¹ÜÀíϵͳ\THISFORM.Text1.Value=\THISFORM.Text2.Value=\THISFORM.Text1.SetFocus
ENDIF
SET EXACT OFF £¨2£©ÏµÍ³Ö÷½çÃæ
ϵͳÖ÷½çÃæÊÇÓû§½øÈëϵͳºó½Ó´¥µÄÖ÷Òª½çÃæ£¬ÓÉËü¿ÉÒÔ½øÈë¸÷¸ö¹¦ÄÜÄ£¿é¡£
£¨3£©ÐÅÏ¢¹ÜÀí½çÃæ
¸Ã²¿·Ö½çÃæ¶ÔÉ̵êÐÅÏ¢½øÐйÜÀí£¬°üÀ¨ÉÌÆ·ÐÅÏ¢¹ÜÀí¡¢»áÔ±ÐÅÏ¢¹ÜÀí¡¢ÉÌÆ·Àà±ð¹ÜÀí¡¢Ô±¹¤ÐÅÏ¢¹ÜÀí¡¢½ø»õÐÅÏ¢¡¢ÏúÊÛÐÅÏ¢¡¢¿â´æÐÅÏ¢¡£½çÃæÈçͼ4-4Ëùʾ¡£
26
ͼ4-4ÐÅÏ¢¹ÜÀí½çÃæ
27
µÚÎåÕ¡¢ÏµÍ³ÊµÊ©
1¡¢Ñ¡ÔñµÄ¿ª·¢Æ½Ì¨
Ó²¼þƽ̨ÊÇ¿ª·¢ÓëÔËÐÐϵͳËùÐèÒªµÄÓ²¼þ»·¾³£¬ÓÉÓÚ±¾ÏµÍ³ÊÇÒ»¸öСÐ͵ÄMIS¹ÜÀíϵͳ£¬Òò´Ë¶Ô¼ÆËã»úÓ²¼þµÄÒªÇ󲻸ߡ£ÎÒÑ¡ÔñµÄÊÇDDR256M¡¢60GÓ²ÅÌÄÚ´æµÄÆÕͨ΢»ú¡£
Èí¼þƽ̨ÊÇָϵͳ¿ª·¢ÓëÔËÐеÄÈí¼þ»·¾³¡£ÎÒÔÚ¿ª·¢Ê±Ñ¡ÓÃÁËÎȶ¨ÐÔ½ÏÇ¿µÄWindows XPÖÐÎÄרҵ°æºÍVF6.0×÷Ϊ¿ª·¢ÓïÑÔÓÃÓÚÊý¾Ý¿âÉè¼Æ¡£ ÓÉÓÚÕâЩÈí¼þ²úÆ·¶¼ÊÇMicrosoft¹«Ë¾µÄ²úÆ·£¬Òò´Ë±Ë´ËÖ®¼äµÄ¼æÈÝÐԽϺ㬿ª·¢³öµÄÓ¦ÓÃϵͳÎȶ¨ÐԽϸߡ£VF6.0¾ßÓпÉÊÓ»¯µÄ¿ª·¢»·¾³£¬¿ÉÒÔ¿ìËÙÍê³ÉϵͳµÄ¿ª·¢£¬ÄÚ²¿¼¯³ÉµÄÊý¾Ý¿â·ÃÎÊͨµÀ£¬Ê¹µÃ¿ÉÒÔÇáËÉ·½±ãµÄ¶ÔÊý¾Ý¿â¹ÜÀí¡£
2¡¢ÏµÍ³²âÊÔ
ʵ¼Ê¿ª·¢¹ý³ÌÖв»¿É±ÜÃâµØ»á²úÉú²î´í£¬ÏµÍ³ÖÐͨ³£¿ÉÄÜÒþ²Ø×Å´íÎóºÍȱÏÝ£¬²»¾ÖÜÃܲâÊÔµÄϵͳͶÈëÔËÐУ¬½«»áÔì³ÉÄÑÒÔÏëÏñµÄºó¹û£¬Òò´Ëϵͳ²âÊÔÊÇMIS¿ª·¢¹ý³ÌÖÐΪ±£Ö¤Èí¼þÖÊÁ¿±ØÐë½øÐеŤ×÷¡£´óÁ¿Í³¼Æ×ÊÁϱíÃ÷£¬ÏµÍ³²âÊԵŤ×÷Á¿ÍùÍùÕ¼MIS¿ª·¢×ܹ¤×÷Á¿µÄ40%ÒÔÉÏ¡£Òò´Ë£¬ÎÒÃDZØÐëÖØÊÓ²âÊÔ¹¤×÷¡£
ÎÒÔÚ¿ª·¢±¾ÏµÍ³Ê±£¬ÎªÁËʹϵͳÄܹ»Îȶ¨ÔËÐУ¬¶Ô±¾ÏµÍ³½øÐÐÁËÓÐÕë¶ÔÐÔµÄÈ«Ãæ²âÊÔ£¬²ÉÈ¡µÄ·½Ê½ÊÇ£º
£¨1£©·Öµ÷£ºÔÚ¡°µÇ½½çÃæ¡±Îı¾¿òÖÐÊäÈë¡°Óû§Ãû¡±£¬Àýyg006£¬È»ºóÊäÈëÃÜÂ룬¸Ã½çÃæ´ÓÆäËûÏàÓ¦µÄÎı¾¿òÖÐÄܹ»ÏÔʾ³öÏàÓ¦µÄÐÅÏ¢£¬ÏµÍ³ÊÇ¿ÉÒÔÕý³£ÔËÐеġ£ÎªÁ˱£Ö¤Ã¿Ò»Ïî²Ëµ¥Äܹ»ÕýȷʵÏÖϵͳÉè¼ÆµÄ¹¦ÄÜ£¬ÎÒ°ÑÏà¹ØµÄ»ù´¡Êý¾Ý£¬»ù±¾ÉÏÈ«²¿ÊäÈëµ½±¾ÏµÍ³ÖУ¬²¢¶Ôÿһ¸ö²Ëµ¥Ïî½øÐÐÁËÔö¼Ó¡¢É¾³ý¡¢Ð޸ĵȲÙ×÷£¬´Ó¶ø±£Ö¤Á˲˵¥¼¶¹¦ÄܵÄÕýȷʵÏÖ¡£
£¨2£©Êý¾Ý¸ú×Ù£ºÎÒÍê³É²Ëµ¥Ïî²âÊÔºó£¬ÎÒÓÖ¶ÔϵͳÄÚµÄÿһ¸öÊý¾Ý½øÐÐÁ˸ú×Ù¡£
£¨3£©×ܵ÷£ºÎÒÔÚÒÔÉϲâÊԵĻù´¡É϶Ôϵͳ¹¦ÄܽøÐÐÁËÕûÌåµÄ²âÊÔ£¬ÒÀ´Î
28