±ÏÒµÂÛÎÄÁ¬ËøÉÌµê¼ÆËã»ú¹ÜÀíϵͳ(vfp)

ͼ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

ÁªÏµ¿Í·þ£º779662525#qq.com(#Ìæ»»Îª@)