|
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¸ü.
|
¤W¤@½g¥DÃD :: ¤U¤@½g¥DÃD |
µoªí¤H |
¤º®e |
Ruey
µù¥U®É¶¡: 2003-03-12 ¤å³¹: 1698 ¨Ó¦Û: tunglo
²Ä 1 ¼Ó
|
µ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ªº³øªí¤¤¨Ï¥ÎÅܼƩMpºâªº¤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¥Ü«ç¼Ë¨Ï¥Î²³æ³øªíÅܼƩMpºâ¡A¨Ò¦p²Õªº¤pp©MÁ`p¡C§ÚÁÙ±N爲§A®i¥Ü«ç¼Ë¨Ï¥Î½ÆÂøÅܼƩMpºâ¡A¨Ò¦p¦b²Õªº¤pp©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
³øªíÅܼƩMpºâ
FoxPro ªº³øªí½s¿è¾¹¾Ö¦³°ÊºA¨Ï¥ÎÅܼƩMpºâªº¯à¤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ªº³øªí¤¤¦³ÅܼƩMpºâ¡A§ó°Ê±NÅܱo«D±`ªº½ÆÂø¡C
¨º´N¬O»¡¡A§Ú±N¦b¤j¦h¼Æ§Ú³]pªº³øªí¤WÄ~Äò¨Ï¥ÎÅܼƩMpºâ¡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§Ú©ÒÃö¤ßªº¥Dn°ÝÃD¤¤ªº¤@Ó¬O爲§Úªº¥Î¤á´£¨Ñªº©Ê¯à¡A¦Ó¦b«Ø¥ß´å¼Ðªº®ÉÔÅý¥Î¤áµ¥«Ý¥u·|Åý§Ú¬Û«H¿ï¿ù¤F¸ô¡C©Ò¥H¿ï¾ÜþÓ¤èªk·|®Ú¾Ú§Ú¥¿¦b³]pªº³øªíªº±¡ªp©M»Ýn¨Ó¨M©w¡C
¤@Ó²³æªº¨Ò¤l
³øªíÅܼƩMpºâ«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·Qn¦bÅܼƤ¤Àx¦s¤°麽ªF¦è¡C³o¬O³q¹L¡§nÀx¦sªºÈ¡¨©Mpºâ¿ï¶µ¨Ó°µ¨ìªº¡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«Ø¥ß²Õ¤pp©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¤@Ó¤pp¡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°Ï¤¤«Ø¥ß¤pp¤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 ¤¤¡An¿ï¤¤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¤@Ó¤pp¡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«á±¸òµÛ¤@Ó¤pp¡FµM«á¬OBÌ©M¥¦Ìªº¤pp¡Aµ¥µ¥¡Bµ¥µ¥¡Aª½¨ì§A¨ì¤F³øªíªº¥½§À¡A§A¦b¨ºùرN¬Ý¨ì¤@ÓÁ`p¡C
½ÆÂøÅܼƩMpºâ
¬JµM§A¤w¸g¦³¤F«ç¼Ë¦b³øªí¤¤¨Ï¥ÎÅܼƩMpºâªº°ò¥»ª¾ÃÑ¡A¬O®ÉԾDzߤ@¨Ç§ó½ÆÂøªº¤º®e¤F¡C¦A¦¸¦b¦P¤@ӫȤá¦Cªíªº¨Ò¤l¤W®i¶}¡A§Ú±Nn爲§A®i¥Ü«ç¼Ë¼W¥[¥t¤@Ó¾P°â¦C¨ì³øªí¤W¡C°Ï§O¬O³oÓ¦C¥u¦³·í³oӫȤá¦b¬ü°ê®É¤~·|¦C¦L¡C³o¤]·N¨ýµÛ³oÓ·s¦Cªº¤pp©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¸Ó¤pp©MÁ`pÁÙ¥]¬A¥þ³¡ªº«È¤á--¦Ó³o¤£¬O§A·Qnªº¡C¨º¬O爲¤°麽©O¡Hµª®×¬O¨ºÓÅÞ¿è©Êªº Print When°µªº¥u¤£¹L¬O¥¦©Ò»¡ªº¨º¼Ë¡A¥¦¥u±±¨î¤°麽®ÉÔ¤@Ó¸ê®Æ¶µ¥Ø»Ýn³Q¦C¦L¡C¦ý¤£±±¨î¸Ó¸ê®Æ¶µ¥Ø¬O§_¥Î©ópºâ¡C³o¬On°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©Mpºâ¸ê°T¥i¥HÄ~Äò«O¯d¡C¹B¦æ³oÓ³øªí¡A¸Ó¤pp©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·Qn¦b¤@¶ªº©³³¡¯d¥Xªº³Ì¤pªÅ¶¡ªº¤Ø¤o¡C¨Ò¦p¡G¦pªG³æÓ²Ó¸`½u±ø¦³0.25 "°ª¡A¦Ó§A·Qn¦C¦L¦Ü¤Ö¤GÓ½u±ø¡A«h¦b³oÓ°Ï°ìÁä¤J0.5 "¡C³o§i¶D FoxPro,·í¥¦¶}©l¤@Ó·sªº²Õ®É¡AnÀˬd¨Ã½T«O¦b¤@¶ªº©³³¡¦Ü¤Ö¯d¥X 0.5 "¡C¦pªG¨S¦³¥R¨¬ªº¦ì¸m¡A·sªº²Õ±Nn±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´Nn«_µÛ¤@Ó²Õ¥æ¤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·|·Qn爲ŪªÌ´£¨Ñ¤@Óªí¥Ü³øªí¬O±q«e¤@¶©µÄòªº¼Ð»x¡CHeck¡A§A¬Ot³dªºµ{¦¡®vªº¸Ü¡A·í¤@Ó²Õ±Nn©µÄò¨ì¤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±ªº´yz¡^¡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¯à·Qn±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¯à·Qn¦b¤@Ó©_¼Æ¶¤W¶}©l¨CÓ·s"³¹"¡C©ÎªÌ¡A¦pªG§A¬O¦b¦C¦L¤@ÓÂù±¦C¦Lªº³øªí¡A§A¥i¯à·Qn½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±Nn爲§A®i¥Üªº¬O¦p¦óקï¥H«e¦b" To be continued¡K"¸`´yzªº«È¤á¥Ø¿ý³øªí¡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§Ú±Nn¨Ï¥Î³oÓÅܼÆ,³s¦P³Q¥[¨ì³oÓªíªº pagenoÄæ¦ì¨Ó«Ø¥ß§Ú¦Û¤v¶±p¼Æ¾¹¡Cnªì©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³¡¤Àùاڴyz¤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·Qnªºµ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§Ú±Nn爲§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¶È·Qn¦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ªº¥Î¤á»{ÃѨì¥ḺN爲¦¹¦Ó¥I¥Xªº¥N»ù¡C¤£¶È§A±Nn¦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¡^!§Ú±Nn»¡¡§¥Í¤Æ¨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¤~·|§ó¦³½ì~
############################# |
|
¦^³»ºÝ |
|
|
|
|
±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§@
|