VFP ·R¥ÎªÌªÀ°Ï ­º­¶ VFP ·R¥ÎªÌªÀ°Ï
¥»°Q½×°Ï¬° Visual Foxpro ·R¥ÎªÌ¸gÅç¥æ¬yªº¦a¤è, ½Ð¦h¦h§Q¥Î"·j´M"ªº¥\¯à, ¥ý¬d¬Ý¬Ý¦³µL«e¨Ò¥i´`, ¦pªGÁÙ¦³¤£À´ªº¦Aµo°Ý. ³¡¥÷¥DÃD¦³ªþ¥[ÀÉ®×, ¶·¥ýµù¥U¦¨¬°ªÀ°Ï©~¥Á¤~¥i¥H¤U¸ü.
 
 ±`¨£°ÝÃD±`¨£°ÝÃD   ·j´M·j´M   ·|­û¦Cªí·|­û¦Cªí   ·|­û¸s²Õ·|­û¸s²Õ   ·|­ûµù¥U·|­ûµù¥U 
 ­Ó¤H¸ê®Æ­Ó¤H¸ê®Æ   µn¤JÀˬd±zªº¨p¤H°T®§µn¤JÀˬd±zªº¨p¤H°T®§   µn¤Jµn¤J

³øªí½s¼g§Þ¥© ²Ä¤T³¡¤À(Âà¶K)

 
µoªí·s¥DÃD   ¦^ÂÐ¥DÃD    VFP ·R¥ÎªÌªÀ°Ï ­º­¶ -> VFP °Q½×°Ï
¤W¤@½g¥DÃD :: ¤U¤@½g¥DÃD  
µoªí¤H ¤º®e
Ruey



µù¥U®É¶¡: 2003-03-12
¤å³¹: 1698
¨Ó¦Û: tunglo

²Ä 1 ¼Ó

µoªíµoªí©ó: ¬P´Á¥| ¤Q¤@¤ë 20, 2003 10:32 am    ¤å³¹¥DÃD: ³øªí½s¼g§Þ¥© ²Ä¤T³¡¤À(Âà¶K) ¤Þ¨¥¦^ÂÐ

¸ê®Æ¨Ó·½¡Gfoxtalk 2001¦~4¤ë¥Z

³øªí½s¼g§Þ¥© ²Ä¤T³¡¤À

§@ªÌ¡GCathy Pountney
ĶªÌ¡Gfbilo
Ķ¤å¥X¦Û¡Gfoxer¸ê®Æ¯¸¡]http://fbilo.myrice.com¡^
___________________________________________________________________
«e¨¥¡G
³o­Ó¤ë¡ACathy Pountney Ä~Äò®i¥Ü§ó¦hªº³øªí½s¼g§Þ¥©¡C³o¤@¦¸¡A¦oÃö¤ßªºµJÂI¬O¦b§Aªº³øªí¤¤¨Ï¥ÎÅܼƩM­pºâªº¤j¶q³~®|¡A¥]¬A·í²Õ­Ì³Q©î¤À¨ì¦h­¶ªº±¡ªp¤U«ç¼Ë¦b§Aªº³øªí¤W¦C¦L¡§Ä~Äò...¡¨³o¼Ëªº¨Æ¨Ò¡C¦oÁÙ¸ÑÄÀ¤F«ç¼Ë§¹¦¨¦p±j¨î¤@­Ó²Õ±q©_¼Æ­¶¶}©lªº§xÃø¥ô°È¡C

¥¿¤å¡G
³q¹L¹L¥h³o´X­Ó¤ë¨Ó§Ú¦¬¨ìªºEmail§PÂ_¡A§A­Ì¤¤ªº³\¦h¤H»{爲³o­Ó³øªí½s¿è¨t¦C«Ü¦³·N¸q¡A©Ò¥H§Ú«D±`°ª¿³¡IFoxPro ¹ÎÅé¤@ª½¬O¤@­Ó¼Ö©ó¦@¥Î¸ê°T©M¤¬¬ÛÀ°§Uªº¹ÎÅé¡C§Ú²M·¡§Ú¤w¸g§@爲±µ¨üªº¤@¤è«Ü¦h¡B«Ü¦h¡B«Ü¦h¡X¡X§Ú»¡¹L«Ü¦h¤F§a¡H¡X¡X¦¸¤F¡C³Ì²×¯à°÷¦^õXµ¹¤j®aªº·Pı«D±`ªº´Î¡C

³o­Ó¤ë¡A§Ú±N爲§A®i¥Ü«ç¼Ë¨Ï¥Î²³æ³øªíÅܼƩM­pºâ¡A¨Ò¦p²Õªº¤p­p©MÁ`­p¡C§ÚÁÙ±N爲§A®i¥Ü«ç¼Ë¨Ï¥Î½ÆÂøÅܼƩM­pºâ¡A¨Ò¦p¦b²Õªº¤p­p©M±a°ÏÁ`­p¤¤¦³±ø¥óªº¥]§t¯S©w¸ê°T¡CµM«á§Ú±N爲§A®i¥Ü«ç¼Ë³B²z«D±`§xÃøªº¥ô°È¡G±j¨î²Õ±q°¸¼Æ­¶¶}©l¡C§Ú½T«H¤@¥¹§A¾Ç·|¤F³o¨Ç·sªº§Þ¥©¡A§A±N¯à°÷爲§Aªº¥Î¤á«Ø¥ß¥O¤H¥Í¬Èªº³øªí¡C¤]³\§A¬Æ¦ÜÁٯవªº§ó¦n¡I

¨º麽¡AÅý§Ú­Ì¶}©l§a¡C¥i¥H±qWWW.pinnaclepublishing.com/ft ¤U¸üªº·½¥N½X¤å¥ó¥]§tµÛ²Õ¦X¤F³o¨Ç§Þ¥©¤¤ªº¨C¤@­Óªº¤u§@¥Ü¨Ò¡C§A¥i¥H¬d¬ÝReadme.TXT¤å¥ó¡AùØ­±¥]¬A­þ­Ó¤å¥óºt¥Ü­þ­Ó§Þ¥©ªº¦Cªí¡C

³øªíÅܼƩM­pºâ

FoxPro ªº³øªí½s¿è¾¹¾Ö¦³°ÊºA¨Ï¥ÎÅܼƩM­pºâªº¯à¤O¡C¬Y¨Çµ{¦¡®v¾¨¶qÁקK³o麽°µ¦Ó°í«ù¦b¹B¦æ³øªí«e¦Û¤v·Ç³Æ¸ê®Æªº²ßºD¡A¥]¬A¶i¦æ­pºâ¡C­ì¦]¬O»P¨ä¥L«¬¦¡ªº¿é¥X¬Û¤ñ¡A§Aªº¥N½X§ó¥[ÆF¬¡¡C¤@¥¹¸ê®Æ³Q·Ç³Æ¦n¤F¡A¥¦´N¬O¤@­Óµo°eµ²ªG¨ì¤@­Ó³tºâªí¦Ó¤£¬OFoxPro ³øªí¤ÞÀºªº§Ö³t§ó°Ê¡C¦pªG¦b§Aªº³øªí¤¤¦³ÅܼƩM­pºâ¡A§ó°Ê±NÅܱo«D±`ªº½ÆÂø¡C

¨º´N¬O»¡¡A§Ú±N¦b¤j¦h¼Æ§Ú³]­pªº³øªí¤WÄ~Äò¨Ï¥ÎÅܼƩM­pºâ¡C¦³¨Ç®É­Ô§Ú¹w¥ý·Ç³Æ¸ê®Æ¡A¦ý¤£±`³o麽°µ¡C§ÚµLªkÅý¦Û¤v¬Û«H«Ø¥ß¤@­Ó»P·í«eªí¾Ö¦³¦P¼Ëªº50000­Ó°O¿ý¡B¥H¤Î¾Ö¦³¤@­ÓÃB¥~ªºÂ²³æ¨D©M©ÎªÌ²Î­p¥\¯àªºÄæ¦ìªºÁ{®Éªí¬O¦³»ù­Èªº¡C§Úª¾¹DFoxPro¬O§Ö³tªº¡A¦ý¬O·í§Ú¦b¶}µoªº®É­Ô¡A§Ú©ÒÃö¤ßªº¥D­n°ÝÃD¤¤ªº¤@­Ó¬O爲§Úªº¥Î¤á´£¨Ñªº©Ê¯à¡A¦Ó¦b«Ø¥ß´å¼Ðªº®É­ÔÅý¥Î¤áµ¥«Ý¥u·|Åý§Ú¬Û«H¿ï¿ù¤F¸ô¡C©Ò¥H¿ï¾Ü­þ­Ó¤èªk·|®Ú¾Ú§Ú¥¿¦b³]­pªº³øªíªº±¡ªp©M»Ý­n¨Ó¨M©w¡C

¤@­Ó²³æªº¨Ò¤l

³øªíÅܼƩM­pºâ«D±`®e©ö¨Ï¥Î¡C§Ú±N³q¹L¤@­Ó«È¤á¦Cªíªº¨Ò¤l¨Ó爲§A®i¥Ü¥¦¦³¦h麽ªº®e©ö¡A³o­Ó¨Ò¤l¤¤­n爲­¶¤W­±ªº¨C­Ó²Ó¸`°O¿ý¡]«È¤á¡^¦C¦L¤@­Ó¦æ¸¹¡A¨C¤@­¶³£±q³»ºÝªº ¦æ #1 ¶}©l¡C±q«Ø¥ß¤@­Ó§Ö³t³øªí¶}©l¡A¦b¥¦ªº²Ó¸`±a°Ï¤¤¥]§t«È¤áªº¸ê°T¡C¤U¤@¨B¡A±q¥\¯àªíÄ椤¿ï¾Ü¡§³øªí¡¨¡AµM«á±q¤U©Ô¥\¯àªí¤¤¿ï¾Ü¡§ÅܼÆ...¡¨¡C¦b FoxPro 2.x¤¤¡A¤U¤@¨BÀ³¸Ó¬O¿ï¾Ü¡§Add¡¨«ö¶s¥H爲§A¥¿¦b²K¥[ªº·sÅܼƥ´¶}ÅܼƩw¸q¹ï¸Ü¤è¶ô¡C¦b VFP ¤¤¡A¥¦ªº¤u§@¤è¦¡¦³ÂI¤£¦P¡C§A±q¥\¯àªí¤¤¿ï¾Ü¤F¡§ÅܼÆ...¡¨«á°¨¤W´N¥´¶}¤F³øªíÅܼƩw¸q¹ï¸Ü¤è¶ô¡A¦Ó·Æ¹«´å¼Ð¤w©w¦ì¦bÅܼƦCªí¤¤¥HÅý§A¿é¤J¤@­Ó·sªºÅܼƦW¡CµL½×§A¦b¨Ï¥Î­þ­Óª©¥»ªºFoxPro¡A¥uºÞ¿é¤J§A¥¿¦b«Ø¥ßªºÅܼƦW¡C§Ú¦b§Úªº¨Ò¤l¤¤¥Îªº¬O¡§nLine¡¨¡C

§A»Ý­n°µªº¤U¤@¥ó¨Æ±¡¬O¸ÑÄÀ§A·Q­n¦bÅܼƤ¤Àx¦s¤°麽ªF¦è¡C³o¬O³q¹L¡§­nÀx¦sªº­È¡¨©M­pºâ¿ï¶µ¨Ó°µ¨ìªº¡C¹ï©ó³o­Ó²³æªº­pºâ¦æ¼Æªº¨Ò¤l¡A¦b¡§­nÀx¦sªº­È¡¨Äæ¦ì¤¤¿é¤J¼Æ¦ì¡§1¡¨¡A¨Ã±q¥i¥Îªº­pºâ¥\¯à¤¤¿ï¾Ü¡§­p¼Æ¡¨¿ï¶µ¡C³o¬O§i¶D³øªí½s¿è¾¹¹ï¥¦³B²zªº¨C¤@­Ó°O¿ý¼W¤j³o­ÓÅܼơC

»Ý­n³]¸mªº³Ì«á¤@¥ó¨Æ±¡¬O¨º­Ó Reset ­È¡C¦]爲¦b³o­Ó¨Ò¤lùػݭn¦b¨C¤@­¶ªº¶}©lÅý­p¼Æ¾¹ Reset 爲 1¡A±q¡§­«¸m¡¨¿ï¶µ¤¤¿ï¾Ü¡§­¶§À¡¨¡C³o§i¶D³øªí½s¿è¾¹¡A·í¥¦§¹¦¨¤@­¶ªº®É­Ô§â³o­ÓÅܼƭ«©w爲0¡C²{¦b§A¤w¸g§â³o­ÓÅܼƳ]¸m¦n¤F¡A§A¥i¥H¦b²Ó¸`±a°Ï¤¤©ñ¤J¤@­Ó°ìª«¥ó¡A¨Ã¨Ï¥Î§AªºÅܼƦW§@爲¹Bºâ¦¡¡C´N³o麽²³æ¡I

Ãö©ó­pºâªº§ó¦h¤º®e

³øªí­pºâªº¥t¤@­Ó±`¨£ªº¥Î³~¬O«Ø¥ß²Õ¤p­p©M³øªíÁ`­p¡C¦P¼Ë¹ï­è­è´£¨ìªº«È¤á²M³æ¥Ü¨Ò¶i¦æ¤u§@¡A§Ú±N爲§Aºt¥Ü«ç¼Ëµ¹³o­Ó³øªí²K¥[¤@­Ó·sªº¦C¨Ó爲¨C­Ó«È¤áÅã¥Ü¾P°âÃB¼Æ¦r¡C¨Ã¥B¡A爲¤F¨Ï¥¦¦³½ì¨Ç¡A§Ú±NÅý§A«Ø¥ß¤@­Ó²Õ¡A¦b¨C¦¸·í¤½¥q¦WºÙªº²Ä¤@­Ó¦r¥À§ïÅܮɤÀ¹j¡A³o¼Ë§A¥i¥H爲¨C­Ó²Õ¦C¦L¤@­Ó¤p­p¡A¨Ã¦b³øªíªº¥½§À¦C¦L¤@­ÓÁ`­p¡C

³o­Ó¨Ò¤l¤£»Ý­n¨Ï¥Î³øªí¼Ð¶q¡A¦ý¥¦½T¹ê»Ý­n¤@­Ó­pºâ¡C³q¹Lµ¹³øªíªº²Ó¸`±a°Ï²K¥[¤@­Ó·sªº°ì±±¨î¶µ¨Ó¦C¦L¾P°âÃB¼Æ¦r¡C¦b¹Bºâ¦¡¤¤¿é¤J¡§Sales¡¨(¾P°âÃB)¡A¦b§Úªº¨Ò¤l¤¤¥¦¬O«È¤áªíªºSalesÄæ¦ì¦W¡C¤U¤@¨B¡A¥Î¤U­±ªº¹Bºâ¦¡µ¹³øªí²K¥[¤@­Ó²Õ¥H·í¨C¦¸¤½¥q¦WºÙªº²Ä¤@­Ó¦r¥À§ïÅܪº®É­Ô±j¨î¤À¹j¡G

LEFT(comp_name, 1)

²{¦b§A¤w¸g«Ø¥ß¤F¤@­Ó²Õ¡A§A¥i¥H¦b²Õª`¸}±a°Ï¤¤«Ø¥ß¤p­p¤F¡C­º¥ý½Õ¾ã±a°Ïªº°ª«×¥H¯à©ñ¤J¾P°âÃB¼Æ¦r¡C±µµÛ¡A¨Ï¥Î§A¤§«e²K¥[¨ì²Ó¸`±a°Ï¤¤ªº¦P¤@­Ó±±¨î¶µ¡A§â¥¦²K¥[¨ì³øªíªº²Õª`¸}±a°Ï¤¤¥h¡]§A¥i¥H°Å¤Á©MÖ߶K¥¦¡^¡C¤@¥¹²K¥[¦n¤F¡AÂùÀ»·sªº±±¨î¶µ¨Ó¥´¶}³øªí¹Bºâ¦¡¹ï¸Ü¤è¶ô¡A³o¼Ë§A´N¥i¥H³]¸m¬ÛÀ³ªº­pºâ¡C¦b FoxPro 2.x ¤¤¡A­n¿ï¤¤­pºâ³æ¿ï®Ø¨Ó¥´¶}­pºâÄæ¦ì¹ï¸Ü¤è¶ô¡C¦bVFP ¤¤¡A¿ï¾Ü­pºâ«ö¶s¨Ó½Õ¥Î¦P¤@­Ó¹ï¸Ü¤è¶ô¡C

ª`·N¨º­Ó­«¸m¿ï¶µ²{¦b¤w¸g³Q³]¸m¨ì§A­è­è«Ø¥ßªº²ÕùØ­±¥h¤F¡A¬JµM³o­Óª«¥ó²{¦bÅܦ¨¤F©ñ¦b²Õª`¸}±a°ÏùØ­±¡AFoxPro ¤]¨¬°÷Áo©ú±o¯à·d²M³o¤@ÂI¡A¬Æ¦Ü¥i¯à§ó¦n¡A¨C¦¸·í²Õ§ïÅܪº®É­Ô§A±N»Ý­nÅý­pºâ³Q­«¸m¡C³o´N¬O§A»Ý­n爲³o­Ó¨Ò¤l©Ò°µªºªF¦è¡A©Ò¥H§A¥i¥HÅý¨º­ÓÄæ¦ì¯d¤U¨Ó¡C¦ý¦bÃö³¬¹ï¸Ü¤è¶ô¤§«e¡A§A½T¹ê»Ý­n¿ï¤¤¨D©M¿ï¶µ¡C

²{¦b§A¦b³øªí¤W¤w¸g¦³¤F¤@­Ó¤p­p¡A§AÁٻݭn¦b³øªíªº¥½§À²K¥[¤@­ÓÁ`­p¡C³o¬O³q¹L­º¥ý«Ø¥ß¤@­ÓÁ`µ²±a°Ï¨Ó°µ¨ìªº¡C·í§A«Ø¥ß¤FÁ`µ²±a°Ï¥H«á¡A ÀH«K±q²Ó¸`±a°ÏÁÙ¬O²Õ±a°Ï«þ¨©Sales¡]¾P°âÃB¡^±±¨î¶µ¨Ã§â¥¦©ñ¨ìÁ`µ²±a°ÏùØ­±¡C¨Ï¥Î«e­±²Ó­zªº¦P¼Ë¤èªk¡A§â³o­Ó±±¨î¶µªº­pºâ§ï爲¨D©M¡B§â­«¸m§ï爲¦b³øªí¥½§À¡C¹B¦æ³o­Ó³øªí¡A§A±N¬Ý¨ì©Ò¦³ªºA­Ì¡A«á­±¸òµÛ¤@­Ó¤p­p¡FµM«á¬OB­Ì©M¥¦­Ìªº¤p­p¡Aµ¥µ¥¡Bµ¥µ¥¡Aª½¨ì§A¨ì¤F³øªíªº¥½§À¡A§A¦b¨ºùرN¬Ý¨ì¤@­ÓÁ`­p¡C

½ÆÂøÅܼƩM­pºâ

¬JµM§A¤w¸g¦³¤F«ç¼Ë¦b³øªí¤¤¨Ï¥ÎÅܼƩM­pºâªº°ò¥»ª¾ÃÑ¡A¬O®É­Ô¾Ç²ß¤@¨Ç§ó½ÆÂøªº¤º®e¤F¡C¦A¦¸¦b¦P¤@­Ó«È¤á¦Cªíªº¨Ò¤l¤W®i¶}¡A§Ú±N­n爲§A®i¥Ü«ç¼Ë¼W¥[¥t¤@­Ó¾P°â¦C¨ì³øªí¤W¡C°Ï§O¬O³o­Ó¦C¥u¦³·í³o­Ó«È¤á¦b¬ü°ê®É¤~·|¦C¦L¡C³o¤]·N¨ýµÛ³o­Ó·s¦Cªº¤p­p©MÁ`­p±N¥u¥]¬A¬ü°ê«È¤áªº¾P°âÃB¡C

°_ªì¡A§A¥i¯à·|¥H爲"³o­Ó²³æ¡A§Ú±N¨Ï¥ÎÅÞ¿è©Ê«¬ªº Print When¡C"¦ý¬O§A¥u¹ï¤F¤@¥b¡C¸Õ¤@¤U¥¦¡A§A±NÁA¸Ñ§Úªº·N«ä¡C¨Ï¥Î°Å¤Á©MÖ߶K¨Ó±q²Ó¸`±a°Ï¡B²Õª`¸}±a°Ï¡B©MÁ`µ²±a°Ï½Æ»s©Ò¦³ªº¾P°âÃB±±¨î¶µ¡A¨Ã¥B§â·sªº°Æ¥»©ñ¸m¨ìºò¸ò¦b­ì¨Óªº¦Cªº«á­±¡C爲¥]§t¤_²Ó¸`±a°Ï¤¤ªº·sªº¾P°âÃBªºÅ޿諬ªº Print When¼W¥[¤U¦C¹Bºâ¦¡∶

country = ' USA '

²{¦b¹B¦æ¸Ó³øªí¡A§A¦h¥b·|Åå³Y¡C¸Ó·sªº¾P°âÃB¦C¥u¦³·í«È¤á¦b¬ü°êªº®É­Ô¤~·|¦C¦L--¨º´N¬O§A©Ò»Ý­nªº¡C¦ý¬O¸Ó¤p­p©MÁ`­pÁÙ¥]¬A¥þ³¡ªº«È¤á--¦Ó³o¤£¬O§A·Q­nªº¡C¨º¬O爲¤°麽©O¡Hµª®×¬O¨º­ÓÅÞ¿è©Êªº Print When°µªº¥u¤£¹L¬O¥¦©Ò»¡ªº¨º¼Ë¡A¥¦¥u±±¨î¤°麽®É­Ô¤@­Ó¸ê®Æ¶µ¥Ø»Ý­n³Q¦C¦L¡C¦ý¤£±±¨î¸Ó¸ê®Æ¶µ¥Ø¬O§_¥Î©ó­pºâ¡C³o¬O­n°O¦íªº¤@¥ó­«­n¨Æ±¡¡C³\¦h·sªºµ{¦¡®v¥Ç¤F³o¼Ëªº¿ù»~¡A¥L­Ì°²©w¦pªG¸ê®Æ¶µ¥Ø¨S¦³³Q¦C¦L¦b³øªí¤W¡A¥¦´N¤£·|¥]§t¦b¥ô¦ó­pºâ¤§¤º¡A¦Ó¨º»P¨Æ¹ê¬Û¥h¬Æ»·¡C

­n¦³±ø¥ó¦a¦bÁ`­p¤¤¥]§t¸ê°Tªº¸Ü¡A§A»Ý­n¨Ï¥Î¤@­Ó³ø§iÅܼơCµ¹§Aªº³øªí²K¥[¤@­Ó¦W爲" nUSASales "ªº·sÅܼơC¦b"­n¦sÀxªº­È"°Ï°ìÁä¤J¤U¦C¹Bºâ¦¡∶

IIF ( country = ' USA ', sales, 0)

³o¤@ÂI§i¶D FoxPro:¦pªG³o­Ó°O¿ý¬O¦b¬ü°êªº¡A«h爲¾P°âÃB³]¸mÅܼơC§_«h¡A¥¦·|§â³o­Ó·sªºÅܼƳ]¸m爲¹s¡C¦¹¥~¡A¦bÃö³¬³øªíÅܼƹï¸Ü¤è¶ô¥H«e¡A½Ð½T«O§A¿ï¾Ü¤F¦b¥i¥Îªº­pºâ¦Cªí¤UªºNone¿ï¶µ¡C¦b²Ó¸`±a°Ï¡B²Õ±a°Ï©MÁ`µ²±a°Ïªº¨C¤@·sªº¾P°âÃBÄæ¦ì¤WÂùÀ»¡A¨Ã§â¹Bºâ¦¡" sales"§ï爲" nUSASales "¡C©Ò¦³ªºPrint When©M­pºâ¸ê°T¥i¥HÄ~Äò«O¯d¡C¹B¦æ³o­Ó³øªí¡A¸Ó¤p­p©MÁ`­p±N¥u¤Ï¬M¬ü°ê«È¤á¡C

¨¾¤î©t¥ßªº²Õ

¦pªG§A¤@ª½¥é·Ó¨Ã¹B¦æ¤F¦b¤U¸ü¤å¥ó¤¤ªº¥Ü¨Ò³øªí©Î«Ø¥ß¤F¦p§A©Ò»Ýªº¦Û¤vªº³øªí¡A§A¤]³\¤wª`·N¨ì¡A¦³®É¡A¤@­Ó·s²Õ¶}©l¤_¦p¦¹±µªñ©ó¤@­Ó·s­¶ªº©³³¡ªº¦a¤è¡A¥H¦Ü©ó¦C¦L¥X¨Óªºµ²ªG©ÎªÌ¨S¦³²Ó¸`½u±ø¡A©ÎªÌ¦b¤U¤@­¶¶}©l¥H«e¥u¦³¤@±ø²Ó¸`½u¡C³o¬Ý°_¨Ó¤£¬O¨º麽±M·~¡A¥u¦]爲¥¦§¤¦b­¶ªº©³³¡¬Ý°_¨Ó¦³ÂI©t³æ¡C¦ý¬O¤£­n·Ð´o- FoxPro¦Û±aªº³øªí½s¿è¾¹¤¹³\§A¦b·í¦³¨Ç¦h¾lªºªÅ¶¡®É¡A±j¨î¸Ó²Õ±q·sªº¤@­¶¶}©l¡C

¦bFoxPro 2.x¤¤¡A¦b¤pªº¦Ç¦â¥¿¤è§Î¤WÂùÀ»--¸Ó»¡±o§óºë½T¨Ç¬O¦b¸Ó²Õ¼ÐÀY±a°Ïªº¦Ç¦â±ø¯¾ªº¥ª°¼¡C³o·|¥´¶}²Õ¸ê°T¹ï¸Ü¤è¶ô¡C¦b¸Ó¹ï¸Ü¤è¶ô¤¤¶¡¡A§A±N¬Ý¨ì¤@±ø½u±ø¡A¥¦ªº·N«ä¬O»¡¡G"¦pªG[ ______ ]¤p©ó¼ÐÀY,«h¶}©l·sªº¤@­¶¡C"¦bVFP¤¤¡A±q¥\¯àªíÄæ¿ï¾Ü³øªí¡A¨Ã¥B±q¤U©Ô¥\¯àªí¤¤¿ï¾Ü¸ê®Æ¤À²Õ¡C³o·|¥´¶}¸ê®Æ¤À²Õ¹ï¸Ü¤è¶ô¡C¦b±µªñ¹ï¸Ü¤è¶ô©³³¡ªº¦a¤è¡A§A±N¬Ý¨ì¤@±ø½u±ø¡A¥¦ªº·N«ä¬O»¡¡G"·í¤p©ó[ ______ ]®É¡A±q·sªº¤@­¶¤W¶}©l²Õ¡C"

¤£ºÞ§A¬O¨Ï¥Î­þ­Óª©¥»´N FoxPro¡AÁä¤J§A·Q­n¦b¤@­¶ªº©³³¡¯d¥Xªº³Ì¤pªÅ¶¡ªº¤Ø¤o¡C¨Ò¦p¡G¦pªG³æ­Ó²Ó¸`½u±ø¦³0.25 "°ª¡A¦Ó§A·Q­n¦C¦L¦Ü¤Ö¤G­Ó½u±ø¡A«h¦b³o­Ó°Ï°ìÁä¤J0.5 "¡C³o§i¶D FoxPro,·í¥¦¶}©l¤@­Ó·sªº²Õ®É¡A­nÀˬd¨Ã½T«O¦b¤@­¶ªº©³³¡¦Ü¤Ö¯d¥X 0.5 "¡C¦pªG¨S¦³¥R¨¬ªº¦ì¸m¡A·sªº²Õ±N­n±q·sªº¤@­¶¶}©l¡Cª`·N∶¦pªG§Aªº³øªí¦b²Õ¼ÐÀY±a°Ï¤¤¦³¸ê°T¡A°O¦í§â²Õ¼ÐÀYªº°ª«×¼W¥[¨ì§A­è¤~­pºâªº¤Ø¤o¤¤¥h¡C

To be continued¡]«ÝÄò¡^...

¨C·í²Õ¥]§t©ó¤@­Ó³øªí¡A¨Ã¥B§A¨S¦³¿ï¾Ü±q·sªº¤@­¶¤W¶}©l¨C­Ó²Õªº®É­Ô¡A§A´N­n«_µÛ¤@­Ó²Õ¥æ¤e¸ó¶V¨â­Ó©Î§ó¦h­¶ªº¦MÀI¡C¦³®É³o¥i¯à¨ÏŪ³øªíªº¬Y¤H·P¨ì²V²c¡A¤×¨ä¬O¦pªG²Õ¼ÐÀY¦b¨C­¶¤W³Q­«´_ªº±¡ªp¡C·í¬Ý¨ì²Ä¤G­¶ªº®É­Ô¡A¤@­ÓŪªÌ¥¼¥²¯à·NÃѨ쥦¬O«e¤@­¶ªº©µÄò¡C©Ò¥H,¦]爲§A¬O³o¼Ë¤@­Ó­t³dªºµ{¦¡®v¡A§A·|·Q­n爲ŪªÌ´£¨Ñ¤@­Óªí¥Ü³øªí¬O±q«e¤@­¶©µÄòªº¼Ð»x¡CHeck¡A§A¬O­t³dªºµ{¦¡®vªº¸Ü¡A·í¤@­Ó²Õ±N­n©µÄò¨ì¤U¤@­¶ªº®É­Ô¡A§A¬Æ¦Ü¥i¯à·Q¦b²Ä¤@­¶ªº©³³¡«ü¥X¥¦¡C

¦b­¶ªº³»³¡¦C¦L " continued.. ."

²Ä¤@³¡¤À-·í¤@­Ó²Õ¬O±q«e¤@­¶©µÄòªº®É­Ôªº¼Ð»x¤@¥i¥H¬Û·í»´¦Ó©öÁ|ªº¥Î¤@­Ó³øªíÅܼƨӰµ¨ì¡C±q«Ø¥ß¤@­Ó¦³°ò¥»¸ê°Tªº«È¤á¥Ø¿ý³øªí¶}©l¡A¤ñ¦p¦b²Ó¸`±a°Ï¤¤ªº¤½¥q¦WºÙ¡B«°¥«¡A©M¦a°Ï²Ó¸`±a°Ïµ¥µ¥¡C¨ä¦¸¡A«Ø¥ß¤@­Ó¦b¤U¦C¹Bºâ¦¡¤W¤¤Â_ªº²Õ∶

LEFT(comp_name,1)

爲¤F¦b²Õ¼ÐÀY±a°Ï¤¤²K¥[¤@­Ó±aµÛ¥ÕÅé¦rªº¶Â®æ¨Ó«ü¥Ü¦C¦Lªº¬O­þ­Ó¦r¥À¡A±q²K¥[¤@­Ó¯x§Î±±¨î¶µ¶}©l¡C§â³o­Ó¯x§Îªº¶ñ¥R¦â§ï爲¶Â¦â¡C¤U¤@¨B¡A¦b³o­Ó¯x§Îªº³»³¡²K¥[¤@­Ó±aµÛ¤U¦C¹Bºâ¦¡ªº°ì±±¨î¶µ∶

LEFT(comp_name,1)

§â°ì±±¨î¶µªº¤å¥»顔¦â§ïÅÜ爲¥Õ¦â¡B²ÊÅé¡A¨Ã¥B§ó§ï¦rÅé爲¤@­Ó¸û¤jªº¼Æ¦ì¡C§A²{¦bÀ³¸Ó¦³¤F¤@­Ó¦b¶Â¦â¯x§Î¤§¤Wªº¥ÕÅé¦r¡A´N¶H¤@­Ó¹q¸Ü¸¹½Xï¤@¼Ë¡C

­n§â"continued..."¤å¥»²K¥[¨ì³o­Ó¼ÐÀY¤¤¥h¡A§A»Ý­n³q¹L²K¥[¤@­Ó·sªº¦W爲"nGrpLines"ªº³øªíÅܼƶ}©l¡C§â"­nÀx¦sªº­È"³]¸m爲"1"¡A¿ï¾Ü²Î­p¿ï¶µ¡A¨Ã§âÅܼƳ]¸m爲¦b²Õªº¥½ºÝ­«¸m¡C¦b¨º²Õ¼ÐÀY±a°Ï¡A¦b¯x§ÎªºÃä¤W¼W¥[¤@·sªº°ì±±¨î¶µ¡C¨Ï¥Î¶H¤U­±¨º¼Ëªº¹Bºâ¦¡∶

IIF(nGrpLines = 0, '', 'continued ...')

³Ì«á¤@¨B¬O§i¶D³øªí½s¿è¾¹¦b¨C­¶ªº³»³¡¦C¦L²Õ¼ÐÀY¡A§Y¨Ï¥¦¨S¦³¶}©l¤@­Ó·s²Õ¡C³o¬O³q¹LÀˬd¨º­Ó¯x§Î¨Ó°µ¨ìªº¡A³o­Ó¯x§Îªí¥Ü"¦b«áÄòªº­¶¤W­«·s¦C¦L¼ÐÀY"¡]¦pªG¨Ï¥ÎVFP¡A«h¬O"¦b¨C­¶¤W­«·s¦C¦L²Õ¼ÐÀY"¡^¡C§A¥i¥H¦b§A¿é¤J¤Ø¤o¥H¨¾¤î©t¥ßªº²Õªº¦P¤@­Ó¹ï¸Üµøµ¡ùاä¨ì³o­Ó®Ö¨ú¤è¶ô¡]¨£«e­±ªº´y­z¡^¡C

´N³o¼Ë¹B¦æ³o­Ó³øªí¡A§A±N¦b¨C­Ó²Õ¶}©l±o¨ì¤@­Ó¦n¬Ýªº¯x§Î®Ø©M¦r¥À¡C©M¨C·í¤@²Õ¥æ¤e¸ó¶V¨â­¶ªº®É­Ô¡A§A±N¬Ý¬ÛÀ³ªº" continued¡K"¸ê°T¡C

§A¥i¯à·|Åå³Y¡G爲¤°麽§Ú¥Î¤@­Ó±aµÛIIF ()©R¥Oªº°ì±±¨î¶µ¡A¦Ó¤£¬O¤@­ÓTEXT±±¨î©M¤@¨ÇPrint WhenÅÞ¿è±ø¥ó¨ÓÀò¨ú¦C¦L" continued..."¤å¥»¡C¹ï©ó³o¤@ÂI¦³¤@­Ó«Ü¦nªº²z¥Ñ -³o­ÓPrint WhenÅÞ¿è±ø¥ó¤£·|¤u§@!³oºØ±¡ªp¤U¡A³øªí½s¿è¾¹³B²zÅܼơB²Õ©MPrint WhenÅÞ¿è±ø¥óªº¦¸§ÇµL§U©ó¦b²Õ¼ÐÀY¤¤¨Ï¥ÎPrint When¡C°O¦í³o­Ó¤p®ø®§¡A§A¥i¥H爲§A¦Û¤v¬Ù¤U¤j¶q´dµh©M´o«ã¡C

¦b­¶ªº©³³¡¦C¦L" continued.. ."

·í¤@­Ó²Õ¸ó¶V¦h­¶®É¡A¦b¤@­¶ªº©³³¡¦C¦L" continued.. ."¼Ð°O¤£¨º麽®e©ö¡C§A¥i¥H¥Î´X¥G¦P¼ËªºnGrpLines³øªíÅܼƩM·§©À¨Ó°µ¨ì³o¥ó¨Æ¡AµM¦Ó¨Ã«D§¹¥þ¬Û¦P¡C·í§A¦b¤W­¶ªº®É­Ô¡A§AµLªkª¾¹D·|¸I¨ì¤°麽±¡ªp¡C§Y¨Ï©úÅã¦a¨S¦³©µÄò¡A§A¤]±N¦b¤W­¶ªº©³³¡¥H" continued.. ."¸ê°Tµ²§ô¡CÃþ¦ü©ó§Ú­è¤~´£¨ìÃö©óPrint When¤£¯à§¹¥þ¥¿±`¦b²Õ¼ÐÀY¤¤¤u§@ªº®ø®§¡A¦b­¶¸}ªºEOF ()¦P¼Ë爲true¡C¦pªG§A©Ò¦³­n°µªº¥u¬OEOF¡]¡^´N¦n¤F¡A¦ý¬O¡A¤£©¯¦a¬O¡A³o­Ó¿ìªk¦b­¶¸}¤£³»¥Î¡C

爲Àˬd¤å¥óªº¥½§À¡A¦b¹B¦æ³o³ø§i¤§«e¡A§A¤£±o¤£¨Ï¥Î¤@­Ó³]¸m¦b§Aªº½Õ¥Îµ{¦¡ªºÅܼơC¦b½Õ¥Î§Aªº³øªíªºµ{¦¡¤¤¿é¤J¥H¤U¥N½X¡]§â¥¦©ñ¦bREPORT FORM©R¥O¤§«e¡^∶

* Get Last Record
PRIVATE nLastRec
GOTO BOTTOM
nLastRec = RECNO()

³o¬q¥N½X±N«Ø¥ß¤@­ÓÅܼÆ爲¦b§Aªºªíùتº¤W¤@­Ó°O¿ýªºRECNO ()¡]°ò©ó·í«eªº¯Á¤Þ¶¶§Ç¡^¡C²{¦b§Aª¾¹D¤W¤@­Ó°O¿ý¸¹¡A§A¥i¥H¨Ï¥ÎnGrpLinesÅܼƩM§A­è¤~«Ø¥ßªºnLastRecÅܼƨӥ¿½T¦a¨M©w¦ó®É¦C¦Lcontinued¸ê°T¡C½Õ¾ã­¶¸}ªº¤j¤p¥H¯à®e¯Ç¤@­Ó°ì±±¨î¶µ¡C¼W¥[¤@­Ó±aµÛ¥H¤U¹Bºâ¦¡ªº°ì±±¨î¶µ∶

IIF(nGrpLines > 0 AND NOT RECNO() = nLastRec, ;
'Continued on next page ...', '')

µM«á§A±N¦³¤@­Ó¦b­¶ªº³»³¡©M©³³¡¦C¦L¾A·íªº" continued.. ."¸ê°Tªº³øªí¡A¦Ó§Aªº¥Î¤á±N爲§AªºªA°È©P¨ì¦ÓÆg´­§A¡I

±j¨î¤@­Ó²Õ¦b¤@­Ó"°¸¼Æ"­¶¤Wµ²§ô

§Ú¥i¥H·Q¨ì§A¥i¯à·Q­n±j¨î¨C­Ó²Õ±q¤@­Ó©_¼Æ­¶¶}©l¡B©Î±q¤@­Ó°¸¼Æ­¶¶}©l¡B©ÎªÌ¦b¤@­Ó©_¼Æªº­¶µ²§ô¡B©ÎªÌ....ªº´XºØ¤£¦Pªº±¡ªp¡A¦n¡A§A¸ÓÁA¸Ñ·§²¤ªº±¡ªp¤F¡C¨Ò¦p¡G·í¦C¦L¤@¥»¤j«¬¹Ï®Ñ®É¡X¡X´N¹³³øªí¡A§A¥i¯à·Q­n¦b¤@­Ó©_¼Æ­¶¤W¶}©l¨C­Ó·s"³¹"¡C©ÎªÌ¡A¦pªG§A¬O¦b¦C¦L¤@­ÓÂù­±¦C¦Lªº³øªí¡A§A¥i¯à·Q­n½T«O¨C­Ó·s²Õ±q¤@­¶ªº«e­±¶}©l¦Ó¤£¬O¤W¤@­¶ªº­I­±¡C

ªì¬Ý°_¨Ó¡A¥Î¦Û±aªº³øªí½s¿è¾¹°µ¨ì³o¤@ÂI´X¥G¤£¥i¯à¡C¦ý¬O¥Î¤@ÂI¡X¡X¤£¹ï¡A¤j¶q¡X¡Xªº³Ð³y¤O¡A³o­Ó§Þ¥©¬O¥i¥H³Qµo²{ªº¡Cªi¤h¹yªº nadya nosonovsky¦]爲³o­Ótip¦Ó¨ü¨ì·í¤§µL·\ªºÆg´­¡C·í¦o­±Á{³oºØ±¡ªpªº®É­Ô¡A³q¹Lµ´¹ïªº¨M¤ß©M¼Ý¤O¡A¦o®©¥X¤F³o­Ó§Þ¥©¨Ã¤j¤èªºµo§G¦b Universal Thread¡]ĶªÌª`¡G¤@­Ó°ê¥~µÛ¦WªºVFPºô¯¸¡^¤W»P§O¤H¦@¥Î¡CÁÂÁ§A¡Anadya !

¦b³o­Ó§Þ¥©«á­±ªº°ò¥»·§©À¬O§A¥²¶·­º¥ý§â³øªí¦C¦L¨ì¤@­Ó¤å¥ó¡C·í³øªí¦C¦L¨ì¤å¥óªº®É­Ô¡A§A§â僞°O¿ý²K¥[¨ì³o­Ó³øªí¥Hµêºc¥²­nªºªÅ¥Õ­¶¡C¤@¥¹³o³o­ÓµêÀÀªº¶Ç»¼§¹¦¨¨Ã¥B©Ò¦³ªºµêºcªºªÅ¥Õ°O¿ý¤w¸g³Q²K¥[¡A§A¥i¥H¹wÄý©ÎªÌ¦C¦L¯u¥¿ªº³øªí¤F¡A¨Ã¥B§A©Ò¦³ªº²Õ³£±N±q¥¿½Tªº­¶¶}©l¡C§Ú¬O±N­n爲§A®i¥Üªº¬O¦p¦ó­×§ï¥H«e¦b" To be continued¡K"¸`´y­zªº«È¤á¥Ø¿ý³øªí¡C»P¨º­Ó³øªíÃþ¦ü¡A³o­Ó³øªí¦³¤@­Ó°ò©ó³o­Ó¤½¥q¦WºÙªº²Ä¤@¦r¥Àªº²Õ¡CµM¦Ó¡A°Ï§O¬O³o­Ó³øªíªº¨C­Ó·s¦r¥À±N±q¤@­Ó©_¼Æ­¶¶}©l¡C

²Ä¤@¨B±N«Ø¥ß½Õ¥Î³o­Ó³øªíªºµ{¦¡¡C¤U­±ªº¥N½X¬O¦C¦L³o­Ó³øªíªºµ{¦¡ªº§¹¾ã¦Cªí¡C¥¦¬Ý°_¨Ó¦³ÂI¥O¤H²¿®§¡A¦ý¬O¤£¥²¾á¤ß¡X¡X§Ú±N爲§A¸ÑÄÀ¨C­Ó³¡¤À¨s³º¬O°µ¤°麽ªº¡C?

* ¥´¶}¤å¥ó
SELECT 0
USE customer

* «Ø¥ßÁ{®É´å¼Ð
PRIVATE cCursor
cCursor = SYS(3)
SELECT *, ;
' ' AS blnkpage, ;
0000 AS pageno ;
FROM customer ;
INTO CURSOR csrTemp
SELECT 0 USE DBF("csrTemp") again alias csrReport
USE IN csrTemp
SELECT csrReport
INDEX ON comp_name + blnkpage TAG SortOrder

* ªì©l¤ÆÅܼÆ
PRIVATE nPageNo, bProcessing, cTemp
nPageNo = 0
bProcessing = .t.
cTemp = SUBSTR(SYS(2015), 3, 10) + '.txt'

* ³B²z³øªí
REPORT FORM vfpcust6 NOCONSOLE TO FILE &cTEMP
ERASE (cTemp)
bProcessing = .f.
WAIT CLEAR

* ¹wÄý/¦C¦L³øªí
REPORT FORM vfpcust6 TO PRINTER PROMPT PREVIEW

* Ãö³¬¤å¥óClose files
USE IN csrReport
SELECT customer
USE

****************** PROCEDURE BlnkPage ******************
* ¦pªG³o­Ó­¶¤£¬O°¸¼Æ­¶¡A¦b³o­Ó²Õ«á±j¨î¤@­ÓªÅ¥Õ­¶

IF bProcessing AND MOD(_PAGENO,2) <> 0 AND ;
blnkpage <> 'Y'
SCATTER MEMVAR BLANK
m.comp_name = comp_name
m.blnkpage = 'Y'
APPEND BLANK
GATHER MEMVAR ENDIF RETURN ''

****************** PROCEDURE IncrPage ******************
* ¥[¤j­¶½X¡A¨ÃÀx¦s³o­Ó°O¿ý

IF NOT bProcessing AND pageno = 0
nPageNo = nPageNo + 1
REPLACE pageno WITH nPageNo
ENDIF
RETURN ''

¥N½Xªº²Ä¤@³¡¤À¥´¶}«È¤áªí¡AµM«á«Ø¥ß¤@­Ó°ò©ó«È¤áªíªº´å¼Ð¡C¡]¦b VFP 7.0¤¤ªºDBF¥\¯à¨Ï§A¤£»Ý­n¦A¦¸¥´¶}¤@­Ó´å¼Ð¡A¦]爲§A¥i¥H«Ø¥ß¤@­Ó¥i¼gªº´å¼Ð¤F¡C¡^ª`·N¡A·í§Ú«Ø¥ß·sªíªº®É­Ô§Úµ¹¥¦²K¥[¤F¨â­ÓÃB¥~ªºÄæ¦ì¡CblnkpageÄæ¦ì±N³Q¥Î¨Ó¼Ð°O³o­Ó§Ú²K¥[ªº僞°O¿ý¡A³o¼Ë§Ú´N·|ª¾¹D­þ­Ó°O¿ý¬O¥Î¨Ó±j¨î¤@­ÓªÅ¥Õ­¶ªº僞°O¿ý¡CpagenoÄæ¦ì¥Î¨Ó¦C¦L¬ÛÀ³ªº­¶½X¡]µy­Ô§Ú±N°µ§ó¦hªº¸ÑÄÀ¡^¡C§ÚÁÙ²K¥[¤F¤@­Ó¯Á¤Þ¡A§Ú±NÀH«á¸ÑÄÀ¥¦¡C

¤U¤@¨B¡A§Úªì©l¤Æ§ÚªºÅܼơCbProcessingÅܼƬO¤@­Ó«ü¥X§Ú¬O¦b¹B¦æ²Ä¤@­ÓµêÀÀªº¶Ç»¼¹Lµ{³B²z¸ê®ÆÁÙ¬O¹B¦æ¯u¥¿ªº¦C¦L³øªí¹Lµ{ªº¼Ð°O¡CnpagenoÅܼƱN³Q¥Î¨Ó¦b³o­Ó³øªí¤W¦C¦L­¶½X¡C¦ý¬O爲¤°麽§Ú´N¬O¤£¨Ï¥Î _pageno¨t²ÎÅܼơH³o¦³¤@­Ó«Ü¦nªº²z¥Ñ¡C爲¤F¥¿½T¦a§Q¥Î³o­Ó§Þ¥©¡A§A¥²¶·§â³o­Ó²Õ¼Ð°O爲¡§¨C²Õªº­¶¸¹­«·s±q1¶}©l¡¨¡C§Ú¤£§Æ±æ§Úªº³øªí¤¤ªº¨C­Ó²Õ³£±q­¶1¶}©l¡C©Ò¥H§Ú±N­n¨Ï¥Î³o­ÓÅܼÆ,³s¦P³Q¥[¨ì³o­Óªíªº pagenoÄæ¦ì¨Ó«Ø¥ß§Ú¦Û¤v­¶­±­p¼Æ¾¹¡C­nªì©l¤Æªº³Ì«á¤@­ÓÅܼƬO·í¦C¦L³o­Óµêºc³øªí®É­n¨Ï¥Îªº¼È¦sÀÉ®×ÀɮצW¡C

¥N½X¤U¤@³¡¤À¦C¦L³øªí¨ì¤@­Ó¼È¦sÀÉ®×,µM«á§R°£³o­Ó¼È¦sÀɮסC·í¥¦§¹¦¨®É¡A¥¦§â bProcessing¼Ð°O³]¸m爲.f.¨Ó«ü¥X¥¦¤w¸g§¹¦¨¤F³B²z¡C¦b¤@­ÓÀ³¥Îµ{¦¡産«~¤¤¡A¦b³o­Ó°Ï°ìªº¥N½XÀ³¸Ó§ó½ÆÂø¤@ÂI¡A¥H½T«O¿ï¾Ü¤F¥¿½Tªº¦Lªí¾÷¡A¨Ã¥B§Ú§Æ±æ±»»\" Printing..."¹ï¸Ü¤è¶ô¡C¦b³o­Ó¨t¦C¤å³¹ªº¹L¥h³¡¤Àùاڴy­z¤F¦p¦ó°µ¨ì³o¨Çªº¤èªk¡]¬d¬Ý foxtalk 2001¦~¤G¤ë¥Zùتº²Ä¤G³¡¤À¡^¡A¦]¦¹¦b³oùاڤ£¦A­«´_¤F¡C

¤@¥¹³o­Ó僞³B²z³øªí¹B¦æ¤w§¹¦¨¡A§Ú´N¯u¥¿¦C¦L³o­Ó³øªí¡AµM«áÃö³¬©Ò¦³¨Ï¥Îªº¤å¥ó¡C

¨º麽¥N½Xªº³Ì«á¨â­Ó¹Lµ{¬O¤°麽¥Øªº©O¡H¦nªº¡Aduh--¥¦­Ì¬O¥Î¨Ó¦b»Ý­nªº¦a¤è±j¨î¤@­ÓªÅ¥Õ­¶¡C¦ý¬O³o­Óµ{¦¡ªº¥ô¦ó¦a¤è³£¨S¦³½Õ¥Î¥¦­Ì§r¡A§A»¡©O¡H«D±`¥J²Ó!¥¦­Ì³Q±q³o­Ó³øªí¥»¨­©Ò½Õ¥Î¡C§Ú²q´ú§Ú³Ì¦n¸ÑÄÀ¤@¤U³o­Ó¡C¦^¨ì¶}ÀY¨Ã«Ø¥ß¤@­Ó¥H«È¤áªí爲°ò¦ªº³øªí¡C§â¤½¥q¦WºÙ¤Î§A»Ý­nªº¨ä¥LÄæ¦ì©ñ¤J²Ó¸`±a°Ï¡C½T«O¨Ï¥Î¤£±a§O¦WªºÄæ¦ì¦W¡]°O¦í¡A§A¬O¾r¿m±aµÛ¤@­Ó´å¼Ðªº³øªí¡^¡C

¤U¤@¨B¡A«Ø¥ß¤@­Ó°ò©ó¤½¥q¦WºÙªº²Ä¤@­Ó¦r¥Àªº²Õ¡C¦pªG§A§Ñ¤F¡A¨º麽³o­Ó¹Bºâ¦¡¬O LEFT¡]comp_name¡A1¡^¡C¤@¥¹§A¤w¸g«Ø¥ß³o­Ó²Õ¡A¿ï¤¤¬ÛÀ³ªº"±q·sªº¤@­¶¤W¶}©l¨C­Ó²Õ"¿ï¶µ¡A¨Ã¥B爲¨C­Ó²Õ³]¸m­¶½X­«¸m爲1¡C§A¥i¯àÁÙ·QÅý²Õ¼ÐÀY¦b¨C­Ó­¶¤W­«·s¦C¦L¡C§A¥i¥Hµ¹³o­Ó²Õ¼ÐÀY²K¥[§A·Q­nªºµL½×¤°麽¸ê°T¡C§Ú·|±ÀÂ˸ò³Q¥Î©ó" To be continued¡K"³¡¤À¦P¼Ëªº¶Â¦â¯x§Î®Ø©M¥ÕÅé¦r¡C

²{¦b,²K¥[¤@­Ó¹ï BlnkPage¡]¡^¹Lµ{ªº½Õ¥Î¡C¦bVFP¤¤¡A§A³q¹L¦b²Õª`¸}±a°Ïªº"¥X¤f³B"³¡¤À²K¥[¥H¤U¹Bºâ¦¡¨Ó°µ¨ì³o¤@ÂI∶

BlnkPage()

¦b FoxPro 2.6¤¤¡A³o¦³ÂI´Æ¤â¨Ã¥B¯A¤Î¤@¨Ç§ó¦hªº¨BÆJ¡C­º¥ý¡A¦V²Õª`¸}±a°Ï²K¥[¤@­Ó°ìª«¥ó¨Ã¨Ï¥Î»P VFP¤¤¦P¼Ëªº¹Bºâ¦¡¡C¦b§A¤w¸g²K¥[³o­Ó°ìª«¥ó¤§«á¡A¿ï¾Ü¥¦¨Ã¿ï¾Ü"¸m«á"¿ï¶µ¡C³o«OÃÒ³o­Ó±`¦¡¬O¦b³o­Ó²Ó¸`±a°Ïùس̫á³Q³B²zªºªF¦è¡]¥H§K§A¦³¦b³o­Ó±a°Ïùبä¥Lªºª«¥ó¡^¡C¤U¤@¨B¡A§â³o­Ó²Õª`¸}±a°Ïªº°ª«×§ï¦^爲0¡A³o¼Ë¥¦¤£·|¦b³o­Ó³øªí¤W¦û¾Ú¥ô¦óªÅ¶¡¡C§_«h¡A¥¦¥i¯à¼vÅTµêºcªº­¶³Q²K¥[ªº³~®|¡C

¨º麽³o­Ó¹ï BlnkPage¡]¡^ªº½Õ¥Î¤S¬O«ç麽°µªº©O¡H¾¨ºÞ°Ç¦í§Aªº°¨--§Ú±N·|§i¶D§Aªº¡C¹M¾\¥N½X¡A§A±N·|²M·¡ªº¬Ý¨ì¥¦©Ò°µªº²Ä¤@¥ó¨Æ¬O§PÂ_³o­Ó±`¦¡¨s³º¬O§_»Ý­n³Q¹B¦æ¡C²Ä¤@­ÓÀˬd¬O bProcessing³Q³]¸m爲true¡C§Ú­Ì¶È·Q¦b³o¬O³øªíªº²Ä¤@­ÓµêÀÀ¹Lµ{ªº±¡ªp¤U¹B¦æ³o­Ó±`¦¡--¦pªG³o­Ó¬O¯u¹êªº¦C¦L¹Lµ{«h¤£¹B¦æ¡CÀˬdªº¤U¤@¨B±N¬O¬Ý¬Ý³o­Ó­¶½X¬O§_¬O°¸¼Æ¡C¦pªG¥¦¤£¬O°¸¼Æ¡A§Ú­Ì»Ý­n²K¥[僞°O¿ý¨Óµêºc¤@­ÓªÅ¥Õ­¶¡C¦pªG¥¦¬O°¸¼Æ¡A§Ú­Ì¤£»Ý­n爲³o­Ó²Õ²K¥[¤@­Ó僞°O¿ý¡C¥¦Àˬdªº³Ì«á¤@¥ó¨Æ±¡¬O blnkpage¬O§_³]¸m爲"Y"¡C¦pªG¬O¡A³o­Ó·N¨ýµÛ³o¤w¸g¬O¤@­Ó僞°O¿ý¤F¡C¦]¦¹¡A§Ú­Ì´N¤£»Ý­n²K¥[¥t¤@­Ó¤F¡C

¤@¥¹§A¤w¸g¨M©w§A½T¹ê»Ý­n²K¥[僞°O¿ý¡A¦^¨ì¶}ÀY¨Ã°µ¦n¥¦¡C±q°õ¦æ¤@­ÓSCATTER MEMVAR BLANK¨Óªì©l¤Æ©M²M°£¥þ³¡Åܼƶ}©l¡C¤U¤@¨B¡A§â M.COMP_NAMEÅܼƳ]¸m爲¦b·í«e°O¿ýùتº¨º­Ó¡A¨Ã§â M.BLNKPAGEÅܼƳ]¸m爲" Y"¡C³Ì«á¡A§â³o­Ó·s°O¿ý²K¥[¨ìÁ{®Éªí¤W¡C³o­Ó·s²K¥[ªº°O¿ý±N³Q´¡¤J¨ì§A¥¿¦b³B²zªº°O¿ýªº«á­±¡C³o¬O¦]爲¯Á¤Þ¬O°ò©ó¤½¥q¦WºÙ©MblnkpageÄæ¦ìªº¡C·sªº°O¿ý¦³µÛ¦P¼Ëªº¤½¥q¦WºÙªº­È¡A¦ý¬OBlnkPageÄæ¦ì³Q³]¸m爲"Y"¡A¦Ó¦b©Ò¦³¥¿±`ªº°O¿ýùسo­ÓÄæ¦ìªº­È³£¬OªÅªº¡C¦]¦¹¡A³o­Ó·s°O¿ý±N§@爲»Ý­n©ñ¦b³o­Ó²Õ«á­±ªºµêºc­¶ªº±±¨î¾¹¡C

§A¥i¯à¬O°Ý爲¤°麽§Ú¨Ï¥Î¤@­Ó¦r¤¸" Y"¦Ó¤£¬O¤@­Ó³q±`ªº".t ."¡Cµª®×¬O¡GÅý§Ú§ó»´ÃP¤@ÂI¡CÁ{®Éªíªº¯Á¤Þ¹Bºâ¦¡¬Ocomp_name + blnkpage¡C³o¼Ë¡A³q¹L§â·sÄæ¦ì°µ¦¨¤@­Ó¦r¤¸«¬Äæ¦ì¡A§Ú¤£¥²爲³o­Ó¯Á¤Þ°µ¥ô¦óÂà´«¡C

³Ñ¤U»Ý­n°µªº¥u¦³¤@¥ó¨Æ±¡¤F¡A¨º´N¬O³B²z­¶­±­p¼Æ¾¹¡C¶H§Ú«e­±´£¨ìªº¨º¼Ë¡A§A¥²¶·§â³o­Ó³øªí³]¸m爲¨C²Õªº­¶¸¹­«·s±q1¶}©l¡C¦pªG¨º¥¿¬O§A©Ò§Æ±æªº¡A¨º麽«Ü¦n¡I¤£¦A»Ý­n¨ä¥Lªº¤u§@¤F¡C¥uºÞ¨Ï¥Î _pageno¨t²ÎÅܼƨӦC¦L­¶½X¡A§A´N¥þ³¡³]¸m¦n¤F¡C¦ý¬O§Ú¬O¤@­Ó³g¦Yªº¤H¡A§@爲³B»@¡A§Ú±N­n爲§A®i¥Ü¦p¦ó«Ø¥ß§A¦Û¤vªº­¶­±­p¼Æ¾¹¡C

µ¹­¶¼ÐÃD±a°Ï²K¥[¤@­Ó°ìª«¥ó¡]¦pªG§AÁÙ¨S¦³°µ¤@­Óªº¸Ü¡^¨Ã¨Ï¥Î¥H¤U¹Bºâ¦¡∶

pageno

¤U¤@¨B¡A²K¥[¤@­Ó¹ï¥[¤j­¶­±­p¼Æ¾¹ªº±`¦¡ªº½Õ¥Î¡C¦bVFP¤¤¡A¦b­¶¼ÐÀY±a°Ïªº"¤J¤f"³¡¤À¿é¤J¥H¤U¹Bºâ¦¡∶


IncrPage()

¦bFoxPro 2.x¤¤¡A²K¥[¤@­Ó±a¦³«e­±¹Bºâ¦¡ªº°ìª«¥ó¡AµM«á¿ï¾Ü¡§¸m«e¡¨¿ï¶µ¥H¤¹«OÃÒ³o¬O¦b³o­Ó­¶¼ÐÃD¤¤¨M©w­º¥ý³B²zªº¨Æ±¡¡C¦pªG§A¤£¥ý§¹¦¨³o­Ó¡A§A«Ü¥i¯à·|¥H¤£¥¿½Tªº­¶½Xµ²§ô¡A¨Ã¥B§A±N¶}©l°g´b³o¬O爲¤°麽¡C­ì¦]¬O³o¬O¦b­¶½X±`¦¡³Q½Õ¥Î¨Ó¥¿½Tªº­pºâ­¶½X«eªº­¶½X¡C

¨º麽IncrPage¡]¡^«ç¼Ë¤u§@¡H«Ü¦n¡A¦pªG§Ú½T¹ê¦Û¤v³o麽»¡¤F!§â§Oªº¨Æ±¡©ñ¦b¤@Ãä¡A³oùØ´N¬O¥¦©Ò°µªº¡G­º¥ý¡B¥¦Àˬd¨Ó½T«O§A¤£¦b¹B¦æ僞³B²z¾Þ§@¡C­¶½X¥u·|¦b¯u¥¿ªº¦C¦L¹Lµ{¤¤³]¸m¡C¤U¤@¨B¬OÀˬd³o­Ó°O¿ýªºpagenoÅܼƬO§_³Q³]¸m爲¹s¡A¦]爲§A¶È·Q­n¦b¥¦ÁÙ¨S¦³³Q³]¸mªº±¡ªp¤U³]¸m¥¦¡C爲¤°麽¡H¦]爲§Ú³o¼Ë»¡¹L¤F¡]§A¯à»¡¥¦¿ð¨ì¤F¶Ü¡H¡^¡C

µª®×»P¹wÄý³øªí¦³Ãö¡C¤ñ¦p¡A¥Î¤á¥i¯à·|±q²Ä¤@­¶¶}©l¹wÄý³o­Ó³øªí¡BµM«á¸õ¨ì²Ä10­¶¡BµM«á¸õ¨ì«e¤@­¶¡BµM«á¸õ¨ì¤U¤@­¶¡BµM«á¸õ¦^¨ì²Ä¢´­¶¡Bµ¥µ¥¡C¦pªG§A¨C¦¸·í¤@­Ó­¶³QÅã¥Üªº®É­Ô³]¸m­¶½X¡A§A±N¥H¨ì³B³£¤£¥¿½Tªº­¶½Xµ²§ô¡C¥u¦³¦b­º¦¸¤@­Ó­¶³Q³B²zªº®É­Ô³]¸m­¶½X¡A§A¤~¯à«OÃÒ­¶½Xªº¦¸§Ç¥¿½T¡C

¨º麽¦^¨ì IncrPage¡]¡^¹Lµ{¡C¤@¥¹§A¤w¸g½T©w§AÀ³¸Ó¼W¥[­¶­±­p¼Æ¡A´N¼W¥[¥¦¨Ã§â¥¦«O¦s¨ì·í«e°O¿ý¤¤¥h¡C

Whew¡]§j­ïÁn¡^!¯u¬O¯E¤jªº¤uµ{!¦ý¬O·í§A­±Á{³oºØ±¡ªp¨Ã¥B§Aªº¥Î¤á­n¨D¨C­Ó²Õ±q¤@­Ó©_¼Æ­¶¶}©lªº®É­Ô¡A©ñ¤ß¡A³o¬O¿ì±o¨ìªº¡C¥u¬O½T«O§Aªº¥Î¤á»{ÃѨì¥L­Ì±N爲¦¹¦Ó¥I¥Xªº¥N»ù¡C¤£¶È§A±N­n¦V¥L­Ì¦¬¨ú©ù¶Qªº¶O¥Î¡A¦Ó¥B³øªíªº©Ê¯à¤]±N¨ü¨ì¼vÅT¡A¦]爲³øªí³B²z¨ì¤å¥ó¤@¦¸´Ç¦Ó¨º¬O½wºCªº´ÇµM«á¤~µo°e¨ì¦Lªí¾÷¡C

®i±æ¥¼¨Ó

ª¾ÃÑ´N¬O¤O¶q!¤U¤ë¡B§Ú±N爲§A®i¥Ü¨Ï¥Î FoxPro ³øªí½s¿è¾¹ªº§ó¦h§Þ¥©©M´£¥Ü¡C©¯¹Bªº¬O¡A§Ú爲§A®i¥Üªº¶V¦h¡A§A´N·|Åܱo¶V±j¤j¡C¤£¤[¡A©Ò¦³ foxtalk ŪªÌ³£±NÅܦ¨爲³nÅéµ{¦¡®v¸sÅéùتº Suppermen¡]©M Wonder Women¡^!§Ú±N­n»¡¡§¥Í¤Æ¨k¤H©M¤k¤H¡¨¦ý¨º»P§ÚµLÃö¡C¦pªG§A¨S¦³Å¥¨ì¡§na - nah, na - nah, na - nah, nah!¡¨¡B¨Ã¥B¦b§AŪ¨ì«e­±ªº¥y¤lªº®É­Ô¨S¦³¬Ý¨ì Lee ¤Ö®Õ©M Lindsey Wagner ¥HºC°Ê§@¦b¤ÑÃä°¸¹J¡A§A´N¤£¹³§Ú¨º麽¦Ñ¡I

Download 03POUNSC.ZIP

_________________
#############################
§Ö¼Ö¶ý«}¨t¦C©¯ºÖ¦v°t,³Ü¤Q¥þÂû´ö~­ì¨Ó©¯ºÖ¨º»ò²³æ!!

¾Ç·|VFP¨Ï¥ÎªÌªÀ°Ïªº·j´M,Code¤~·|§ó¦³½ì~
#############################
¦^³»ºÝ
À˵ø·|­û­Ó¤H¸ê®Æ µo°e¨p¤H°T®§
±q¤§«eªº¤å³¹¶}©lÅã¥Ü:   
µoªí·s¥DÃD   ¦^ÂÐ¥DÃD    VFP ·R¥ÎªÌªÀ°Ï ­º­¶ -> VFP °Q½×°Ï ©Ò¦³ªº®É¶¡§¡¬° ¥x¥_®É¶¡ (GMT + 8 ¤p®É)
²Ä1­¶(¦@1­¶)

 
«e©¹:  
±z µLªk ¦b³o­Óª©­±µoªí¤å³¹
±z µLªk ¦b³o­Óª©­±¦^ÂФ峹
±z µLªk ¦b³o­Óª©­±½s¿è¤å³¹
±z µLªk ¦b³o­Óª©­±§R°£¤å³¹
±z µLªk ¦b³o­Óª©­±¶i¦æ§ë²¼
±z µLªk ¦b³o­Óª©­±ªþ¥[ÀÉ®×
±z µLªk ¦b³o­Óª©­±¤U¸üÀÉ®×


Powered by phpBB © 2001, 2005 phpBB Group
¥¿Å餤¤å»y¨t¥Ñ phpbb-tw ºûÅ@»s§@