select count(*) as ×ÜÈËÊý from JSB where ¿Î³Ì´úÂë in;
(select ¿Î³Ì´úÂë from KCB where ¿Î³ÌÃû³Æ=\ÍâÓï\ *£¨3£©
select ÐÕÃû,ÄêÁä,Ժϵ from JSB where ÄêÁä<35 ; order by ¿Î³Ì´úÂë desc
3¡¢±íµ¥Éè¼Æ¡£°´ÒÔÏÂÒªÇóÉè¼Æ³ÌÐò½çÃæ£¬±íµ¥ÎļþÃûΪ£ºFORM912.SCX¡£
°üÀ¨1¸ö±êÇ©£¬2¸öÃüÁî°´Å¥£¨¸÷¿Ø¼þµÄ´óС¡¢ÑÕÉ«¡¢×ÖÌå¡¢×ֺŵÈÊôÐÔÓÉ¿¼Éú×Ô¶¨£©¡£ÆäÖУº £¨1£©±íµ¥µÄ±êÌâΪ¿¼Éú×Ô¼ºµÄ×¼¿¼Ö¤ºÅºÍÐÕÃû£»
£¨2£©¸Ã±íµ¥ÔËÐкó£¬Ã¿´Îµ¥»÷¡°·Å´ó¡±ÃüÁťʱ£¬±êÇ©1ÖеÄ×ÖÌ彫·Å´ó5¸öµã£¬Ö±µ½×ÖÌå´óСΪ60£»Ã¿´Îµ¥»÷¡°ËõС¡±ÃüÁťʱ£¬±êÇ©1ÖеÄ×ÖÌ彫ËõС5¸öµã£¬Ö±µ½×ÖÌå´óСΪ12£¬ÈçͼËùʾ£» £¨3£©Ë«»÷±íµ¥¿Õ°×´¦£¬½áÊø±íµ¥ÔËÐС£
²Î¿¼´ð°¸
±íµ¥µÄCaptionÊôÐÔÉèÖÃΪ£º¿¼Éú×Ô¼ºµÄÐÕÃûºÍ¿¼ºÅ£»£¨½çÃæÉè¼Æ5·Ö£© ¡°·Å´ó¡±ÃüÁî°´Å¥µÄClickʼþ´úÂ룺£¨10·Ö£©
X=Thisform.Label1.Fontsize
IF X<60 X=X+5 ELSE X=60 ENDIF
Thisform.Label1.Fontsize=X
¡°ËõС¡±ÃüÁî°´Å¥µÄClickʼþ´úÂ룺£¨10·Ö£©
X=Thisform.Label1.Fontsize IF X>12 X=X-5
ELSE
X=12 ENDIF
Thisform.Label1.Fontsize=X
±íµ¥µÄ¡°DblClick¡±Ê¼þ´úÂ룺£¨5·Ö£© Thisform.Release
*09103
1¡¢½¨Á¢Ò»¸ö¸ß¿¼Ñ§Éúµµ°¸¹ÜÀíÊý¾Ý¿â£¬ÎļþÃûΪDAGL.DBC£¬²¢ÊäÈëÊý¾Ý¡££¨40·Ö£©
¸ÃÊý¾Ý¿â°üÀ¨£º¸ß¿¼Ñ§Éúµµ°¸±íDAB.DBF¡¢¸ß¿¼³É¼¨±íGKB.DBF£¬ÆäÄÚÈÝÈçÏ£º
DAB.DBF GKB.DBF
ÒªÇ󣺽«Êý¾Ý¿â£¨DAGL.DBC£©ÖеÄDAB.DBFºÍGKB.DBFÁ½±íÒÔ¡°×¼¿¼Ö¤ºÅ¡±½¨Á¢ÓÀ¾Ã¹ØÏµ¡£ ²Î¿¼´ð°¸£º
Êý¾ÝÀàÐÍ£º×¼¿¼Ö¤ºÅ (C,4)£¬ÐÕÃû (C,4)£¬±ÏҵѧУ (C,3)£¬Ö¾Ô¸ (C,8)
×¼¿¼Ö¤ºÅ (C,4)£¬ÓïÎÄ N(3)£¬ÊýѧN(3)£¬ÍâÓïN(3)£¬×ÛºÏN(3)£¬Â¼È¡·ñ L
Ë÷ÒýÀàÐÍ£º DAB±í¡ª¡ª×¼¿¼Ö¤ºÅ£¨Ö÷Ë÷Òý£©
GKB±í¡ª¡ª×¼¿¼Ö¤ºÅ£¨Ö÷Ë÷Òý»òºòÑ¡Ë÷Òý£©
2¡¢½¨Á¢³ÌÐòÎļþCOM£SQL913.PRG£¬ÒªÇó½«Íê³ÉÏÂÁи÷СÌâÈÎÎñµÄVFPÊý¾Ý±í²Ù×÷ÃüÁî»òVFP£SQLÃüÁîдÔڸóÌÐòÎļþÖС£ÔÚ³ÌÐòÊ×ÐÐÓÃ×¢ÊÍÓï¾ä×¢Ã÷¿¼ÉúÐÕÃûºÍ×¼¿¼Ö¤ºÅ£¬²¢ÓÃ×¢ÊÍÓï¾ä±êעСÌâºÅ¡££¨30·Ö£©
£¨1£©¸ù¾Ý¼ȡ·ÖÊýÏß500·Ö£¬³¬¹ý500·Ö£¨º¬£©Â¼È¡·ñ×Ö¶ÎֵΪ.T.£¬·ñÔòΪ.F.£¬²¢ÌîÈëGKB.DBFÖУ» £¨2£©°´×ܳɼ¨´Ó¸ßµ½µÍÏÔʾÒÔ¼ȡ¿¼ÉúµÄ×¼¿¼Ö¤ºÅºÍ×ܳɼ¨£»
£¨3£©ÏÔʾ¼ȡ¿¼ÉúµÄÐÕÃû£¬±ÏҵѧУºÍ¼ȡѧУ£¨ÆäÖмȡѧУ¼´Îª¿¼ÉúµÄÖ¾Ô¸£©¡£ ²Î¿¼´ð°¸£º
* ÐÕÃû£º ×¼¿¼Ö¤ºÅ£º
*(1)
update gkb set ¼ȡ·ñ=.T. where (ÓïÎÄ+Êýѧ+ÍâÓï+×ÛºÏ)>=500 update gkb set ¼ȡ·ñ=.F. where (ÓïÎÄ+Êýѧ+ÍâÓï+×ÛºÏ)<500 *(2)
select ×¼¿¼Ö¤ºÅ,ÓïÎÄ+Êýѧ+ÍâÓï+×ÛºÏ as ×ܳɼ¨ from gkb;
where ¼ȡ·ñ=.T. order by ×ܳɼ¨ desc
*(3)
select ÐÕÃû,±ÏҵѧУ,Ö¾Ô¸ as ¼ȡѧУ from dab,gkb;
where dab.×¼¿¼Ö¤ºÅ=gkb.×¼¿¼Ö¤ºÅ and ¼ȡ·ñ=.T.
3¡¢±íµ¥Éè¼Æ¡£°´ÒÔÏÂÒªÇóÉè¼Æ³ÌÐò½çÃæ£¬±íµ¥ÎļþÃûΪ£ºFORM913.SCX¡££¨30·Ö£©
°üÀ¨2¸ö±êÇ©£¬2¸öÎı¾¿ò£¨¸÷¿Ø¼þµÄ´óС¡¢ÑÕÉ«¡¢×ÖÌå¡¢×ֺŵÈÊôÐÔÓÉ¿¼Éú×Ô¶¨£©¡£ÆäÖУº £¨1£©±íµ¥µÄ±êÌâΪ¿¼Éú×Ô¼ºµÄ×¼¿¼Ö¤ºÅºÍÐÕÃû£»
£¨2£©Á½¸öÎı¾¿òµÄÏÔʾ³õÖµ¾ùΪ0£»
£¨3£©¸Ã±íµ¥ÔËÐк󣬿ÉÒÔÔÚÉÏÃæÎı¾¿òTEXT1ÖÐÊäÈëÒ»¸ö1000ÒÔÄÚµÄÕýÕûÊý£¬¹â±êÒÆ¶¯µ½ÏÂÃæÎı¾¿òTEXT2Öм´¿ÉÄæÐòÊä³ö¸ÃÊý£¬Èçͼ1Ëùʾ£»
£¨4£©Èç¹ûÊäÈëµÄ²»ÊÇ1000ÒÔÄÚµÄÕýÕûÊý£¬¹â±êÒÆ¶¯µ½TEXT2ʱ£¬Ôò¸ø³öÐÅÏ¢¿òÌáÊ¾ÖØÐÂÊäÈ룬Èçͼ2Ëùʾ¡£
ͼ1 ͼ2
²Î¿¼´ð°¸£º
£¨1£©ÉèÖÃ±íµ¥form1µÄcaptionÊôÐÔΪ¿¼Éú×Ô¼ºµÄ×¼¿¼Ö¤ºÅºÍÐÕÃû£» £¨2£©ÉèÖÃÎı¾¿òtext1ºÍtext2µÄvalueÊôÐÔΪ0£» £¨3£©Ôڿؼþtext2µÄgotfocusʼþÀï±àд´úÂ룺
x=thisform.text1.value if x>0 and x<1000 and x=int(x) a1=int(x/100) a2=int(mod(x,100)/10) a3=mod(x,10) y=a3*100+a2*10+a1
thisform.text2.value=y else
messagebox(\ÊäÈë´íÎó£¬ÇëÖØÐÂÊäÈ룡\ thisform.text1.value=0
thisform.text2.value=0 thisform.text1.setfocus endif *09201
1¡¢½¨Á¢Ò»¸öÍø°É¹ÜÀíÊý¾Ý¿â£¬ÎļþÃûΪWBGL.DBC£¬²¢ÊäÈëÊý¾Ý£¨40·Ö£©
¸ÃÊý¾Ý¿âÖÐÓÐÁ½¸öÊý¾Ý±í£º¹¤×÷Õ¾±í£¨stat.DBF£©ºÍÍøÕ¾µÇ¼±í£¨log.DBF£©¡£ÆäÊý¾ÝÐÎʽÈçÏ£º
¹¤×÷Õ¾±í£¨STAT.DBF£© ÍøÕ¾µÇ½±í£¨LOG.DBF£©
×¢Ò⣺¿ªÊ¼Ê±¼äºÍ½áÊøÊ±¼äÒÔXX:YYÐÎʽ±íʾ£¬ÆäÖÐXX±íʾСʱ£¬YY ±íʾ·ÖÖÓ¡£
ÒªÇ󣺽«Êý¾Ý¿â£¨WBGL.DBC£©ÖеÄSTAT.DBFºÍlog.DBFÁ½±íÒÔ¡°IPµØÖ·¡±½¨Á¢Ò»¶Ô¶àÓÀ¾Ã¹ØÏµ¡£ ²Î¿¼´ð°¸£º
Êý¾ÝÀàÐÍ£ºIPµØÖ·C(13)£¬ÇøÓòC(1)
IPµØÖ·C(13)£¬ÈÕÆÚD£¬¿ªÊ¼Ê±¼äC(5)£¬½áÊøÊ±¼äC(5)£¬Êý¾ÝÁ÷Á¿N(12,2) Ë÷ÒýÀàÐÍ£ºSTAT±í ¡ª¡ª IPµØÖ·£¨Ö÷Ë÷Òý£© log±í ¡ª¡ª IPµØÖ·£¨ÆÕͨË÷Òý£©
2¡¢½¨Á¢³ÌÐòÎļþCOM-SQL923.PRG£¬ÒªÇó½«Íê³ÉÏÂÁи÷СÌâÈÎÎñµÄVFPÊý¾Ý±í²Ù×÷ÃüÁî»òVFP-SQLÃüÁîдÔڸóÌÐòÎļþÖС£ÔÚ³ÌÐòÊ×ÐÐÓÃ×¢ÊÍÓï¾ä×¢Ã÷¿¼ÉúÐÕÃûºÍ×¼¿¼Ö¤ºÅ£¬²¢ÇëÓÃ×¢ÊÍÓï¾ä±êעСÌâºÅ¡££¨30·Ö£©
£¨1£©ÍøÕ¾µÇ½µÄÊý¾ÝÁ÷Á¿¼ÆË㹫ʽΪ£ºµÇ½µÄ×ÜÃëÊý/100£¨µ¥Î»KB£©¡£Çë¸ù¾ÝÍøÕ¾µÇ½µÄ¿ªÊ¼¡¢½áÊøÊ±¼ä£¬¼ÆËãÊý¾ÝÁ÷Á¿²¢ÌîÈëlog.DBFÖС£
£¨2£©°´Êý¾ÝÁ÷Á¿´Ó¸ßµ½µÍµÄ˳ÐòÏÔʾIPµØÖ·Îª202.202.0.12¹¤×÷Õ¾µÄµÇ½Ã÷ϸ£¬°üÀ¨IPµØÖ·¡¢ÇøÓò¡¢¿ªÊ¼Ê±¼ä¡¢½áÊøÊ±¼ä¡¢Êý¾ÝÁ÷Á¿¡£
£¨3£©°´IPµØÖ··ÖÀà»ã×ÜÊý¾ÝÁ÷Á¿²¢ÏÔʾ¡£ ²Î¿¼´ð°¸£º
*ÐÕÃû£º¡Á¡Á¡Á ×¼¿¼Ö¤ºÅ£º¡Á¡Á¡Á¡Á¡Á¡Á
*£¨1£©
update log set Êý¾ÝÁ÷Á¿=(val(left(½áÊøÊ±¼ä,2))*3600+val(right(½áÊøÊ±¼ä,2))*60; -val(left(¿ªÊ¼Ê±¼ä,2))*3600-val(right(¿ªÊ¼Ê±¼ä,2))*60)/100 *£¨2£©
select log.ipµØÖ·,ÇøÓò,¿ªÊ¼Ê±¼ä,½áÊøÊ±¼ä,Êý¾ÝÁ÷Á¿ from log,stat; where log.ipµØÖ·=stat.ipµØÖ· and log.ipµØÖ·=\ order by Êý¾ÝÁ÷Á¿ desc
*£¨3£©
select ipµØÖ·,sum(Êý¾ÝÁ÷Á¿) from log group by ipµØÖ·
3¡¢±íµ¥Éè¼Æ¡£°´ÒÔÏÂÒªÇóÉè¼Æ³ÌÐò½çÃæ£¬±íµ¥ÎļþÃûΪ£ºFORM923.SCX¡££¨30·Ö£©
Éè¼ÆÈçͼ1Ëùʾ±íµ¥£¬°üÀ¨3¸öÎı¾¿ò£¬2¸öÃüÁî°´Å¥£¨¸÷¿Ø¼þµÄ´óС¡¢ÑÕÉ«¡¢×ÖÌå¡¢×ֺŵÈÊôÐÔÓÉ¿¼Éú×Ô¶¨£©¡£ÆäÖУ¬ £¨1£©±íµ¥µÄ±êÌ⣺¿¼Éú×Ô¼ºµÄ¿¼ºÅºÍÐÕÃû£» £¨2£©Èý¸öÎı¾¿òµÄ³õֵΪ0£º
£¨3£©¸Ã±íµ¥ÔËÐкó£¬ÔÚÈý¸öÎı¾¿òÄÚÊäÈëÈý¸öÊý£¬µ¥»÷ÅÅÐò°´Å¥£¬ÔòÊäÈëµÄÈý¸öÊý½«°´ÓÉ´óµ½Ð¡µÄ˳ÐòÏÔʾ¡£µ¥»÷½áÊø°´Å¥Í˳ö³ÌÐò¡£Èçͼ2Ëùʾ.
ͼ1 ÊäÈëÈý¸öÊý