仓酷云 发表于 2015-1-16 22:48:52

MYSQL网页编程之怎样在FOXPRO的REPORT中F列印la功...

你碰到的问题可能已经在社区中被别的人已经问过,即使没有MySQL学习教程,你也可以提出问题或通过Google来搜索答案。社区的相关负责人士:“MySQL社区是活跃、友好和内容渊博的。”
怎样在FOXPRO的REPORT中F列印la功效

作者sCCBZZP



以下是我之前做的一在FOXPRO的FORM{用REPORT中F列印la功效(次要是39la),
F在⒋a共享o人人,但愿能o列位助!

1.起首⒆痔逦募C39HDW3.TTF拷到你的X的FONTS面前目今.
2.在窗体FORM中新增添程序BC_CODE39和BC_OCODE39
3.程序BC_CODE39的热菔:
Parametersm
rtnp=THISFORM.BC_OCode39(m,"Basic",0)
returnrtnp
4.程序BC_OCODE39的热菔:
Parametersm,full,check
privatet,x,p,cval,chktot
settalkoff
iftype(m)"C"
return""
endif
***verifyfullparameter
iftype(full)"C"
full="BASIC"
cval=2
else
full=upper(full)
iffull"FULL"
full="BASIC"
cval=2
else
cval=3
endif
endif

***verifycheckparameter
iftype(check)N
check=0
else
ifcheck1
check=0
endif
endif

***Checktoseeifuseraddedstop/start
***characterandreturnsnulliftrue
ifat("*",""+m)>1
return""
endif

***decodemessageintobarcodecharacterpatternandplace
***itintothevariable

*initializetheoutputstringandaddthestartcodetoit
p="*"

*Dimensiontheconversionarray
dimensioncvtarr

*Definetheconversionarray
cvtarr=chr(0)
cvtarr=""
cvtarr="%U"
cvtarr=0
cvtarr=chr(1)
cvtarr=""
cvtarr="$A"
cvtarr=0
cvtarr=chr(2)
cvtarr=""
cvtarr="$B"
cvtarr=0
cvtarr=chr(3)
cvtarr=""
cvtarr="$C"
cvtarr=0
cvtarr=chr(4)
cvtarr=""
cvtarr="$D"
cvtarr=0
cvtarr=chr(5)
cvtarr=""
cvtarr="$E"
cvtarr=0
cvtarr=chr(6)
cvtarr=""
cvtarr="$F"
cvtarr=0
cvtarr=chr(7)
cvtarr=""
cvtarr="$G"
cvtarr=0
cvtarr=chr(8)
cvtarr=""
cvtarr="$H"
cvtarr=0
cvtarr=chr(9)
cvtarr=""
cvtarr="$I"
cvtarr=0
cvtarr=chr(10)
cvtarr=""
cvtarr="$J"
cvtarr=0
cvtarr=chr(11)
cvtarr=""
cvtarr="$K"
cvtarr=0
cvtarr=chr(12)
cvtarr=""
cvtarr="$L"
cvtarr=0
cvtarr=chr(13)
cvtarr=""
cvtarr="$M"
cvtarr=0
cvtarr=chr(14)
cvtarr=""
cvtarr="$N"
cvtarr=0
cvtarr=chr(15)
cvtarr=""
cvtarr="$O"
cvtarr=0
cvtarr=chr(16)
cvtarr=""
cvtarr="$P"
cvtarr=0
cvtarr=chr(17)
cvtarr=""
cvtarr="$Q"
cvtarr=0
cvtarr=chr(18)
cvtarr=""
cvtarr="$R"
cvtarr=0
cvtarr=chr(19)
cvtarr=""
cvtarr="$S"
cvtarr=0
cvtarr=chr(20)
cvtarr=""
cvtarr="$T"
cvtarr=0
cvtarr=chr(21)
cvtarr=""
cvtarr="$U"
cvtarr=0
cvtarr=chr(22)
cvtarr=""
cvtarr="$V"
cvtarr=0
cvtarr=chr(23)
cvtarr=""
cvtarr="$W"
cvtarr=0
cvtarr=chr(24)
cvtarr=""
cvtarr="$X"
cvtarr=0
cvtarr=chr(25)
cvtarr=""
cvtarr="$Y"
cvtarr=0
cvtarr=chr(26)
cvtarr=""
cvtarr="$Z"
cvtarr=0
cvtarr=chr(27)
cvtarr=""
cvtarr="%A"
cvtarr=0
cvtarr=chr(28)
cvtarr=""
cvtarr="%B"
cvtarr=0
cvtarr=chr(29)
cvtarr=""
cvtarr="%C"
cvtarr=0
cvtarr=chr(30)
cvtarr=""
cvtarr="%D"
cvtarr=0
cvtarr=chr(31)
cvtarr=""
cvtarr="%E"
cvtarr=0
cvtarr=chr(32)
cvtarr=""
cvtarr=""
cvtarr=38
cvtarr="!"
cvtarr=""
cvtarr="/A"
cvtarr=0
cvtarr=chr(34)
cvtarr=""
cvtarr="/B"
cvtarr=0
cvtarr="#"
cvtarr=""
cvtarr="/C"
cvtarr=0
cvtarr="$"
cvtarr="$"
cvtarr="/D"
cvtarr=39
cvtarr="%"
cvtarr="%"
cvtarr="/E"
cvtarr=42
cvtarr="&"
cvtarr=""
cvtarr="/F"
cvtarr=0
cvtarr=chr(39)
cvtarr=""
cvtarr="/G"
cvtarr=0
cvtarr="("
cvtarr=""
cvtarr="/H"
cvtarr=0
cvtarr=")"
cvtarr=""
cvtarr="/I"
cvtarr=0
cvtarr="*"
cvtarr=""
cvtarr="/J"
cvtarr=0
cvtarr="+"
cvtarr="+"
cvtarr="/K"
cvtarr=41
cvtarr=","
cvtarr=""
cvtarr="/L"
cvtarr=0
cvtarr="-"
cvtarr="-"
cvtarr="-"
cvtarr=36
cvtarr="."
cvtarr="."
cvtarr="."
cvtarr=37
cvtarr="/"
cvtarr="/"
cvtarr="/O"
cvtarr=40
cvtarr="0"
cvtarr="0"
cvtarr="0"
cvtarr=0
cvtarr="1"
cvtarr="1"
cvtarr="1"
cvtarr=1
cvtarr="2"
cvtarr="2"
cvtarr="2"
cvtarr=2
cvtarr="3"
cvtarr="3"
cvtarr="3"
cvtarr=3
cvtarr="4"
cvtarr="4"
cvtarr="4"
cvtarr=4
cvtarr="5"
cvtarr="5"
cvtarr="5"
cvtarr=5
cvtarr="6"
cvtarr="6"
cvtarr="6"
cvtarr=6
cvtarr="7"
cvtarr="7"
cvtarr="7"
cvtarr=7
cvtarr="8"
cvtarr="8"
cvtarr="8"
cvtarr=8
cvtarr="9"
cvtarr="9"
cvtarr="9"
cvtarr=9
cvtarr=":"
cvtarr=""
cvtarr="/Z"
cvtarr=0
cvtarr=";"
cvtarr=""
cvtarr="%F"
cvtarr=0
cvtarr="<"
cvtarr=""
cvtarr="%G"
cvtarr=0
cvtarr="="
cvtarr=""
cvtarr="%H"
cvtarr=0
cvtarr=">"
cvtarr=""
cvtarr="%I"
cvtarr=0
cvtarr="?"
cvtarr=""
cvtarr="%J"
cvtarr=0
cvtarr="@"
cvtarr=""
cvtarr="%V"
cvtarr=0
cvtarr="A"
cvtarr="A"
cvtarr="A"
cvtarr=10
cvtarr="B"
cvtarr="B"
cvtarr="B"
cvtarr=11
cvtarr="C"
cvtarr="C"
cvtarr="C"
cvtarr=12
cvtarr="D"
cvtarr="D"
cvtarr="D"
cvtarr=13
cvtarr="E"
cvtarr="E"
cvtarr="E"
cvtarr=14
cvtarr="F"
cvtarr="F"
cvtarr="F"
cvtarr=15
cvtarr="G"
cvtarr="G"
cvtarr="G"
cvtarr=16
cvtarr="H"
cvtarr="H"
cvtarr="H"
cvtarr=17
cvtarr="I"
cvtarr="I"
cvtarr="I"
cvtarr=18
cvtarr="J"
cvtarr="J"
cvtarr="J"
cvtarr=19
cvtarr="K"
cvtarr="K"
cvtarr="K"
cvtarr=20
cvtarr="L"
cvtarr="L"
cvtarr="L"
cvtarr=21
cvtarr="M"
cvtarr="M"
cvtarr="M"
cvtarr=22
cvtarr="N"
cvtarr="N"
cvtarr="N"
cvtarr=23
cvtarr="O"
cvtarr="O"
cvtarr="O"
cvtarr=24
cvtarr="P"
cvtarr="P"
cvtarr="P"
cvtarr=25
cvtarr="Q"
cvtarr="Q"
cvtarr="Q"
cvtarr=26
cvtarr="R"
cvtarr="R"
cvtarr="R"
cvtarr=27
cvtarr="S"
cvtarr="S"
cvtarr="S"
cvtarr=28
cvtarr="T"
cvtarr="T"
cvtarr="T"
cvtarr=29
cvtarr="U"
cvtarr="U"
cvtarr="U"
cvtarr=30
cvtarr="V"
cvtarr="V"
cvtarr="V"
cvtarr=31
cvtarr="W"
cvtarr="W"
cvtarr="W"
cvtarr=32
cvtarr="X"
cvtarr="X"
cvtarr="X"
cvtarr=33
cvtarr="Y"
cvtarr="Y"
cvtarr="Y"
cvtarr=34
cvtarr="Z"
cvtarr="Z"
cvtarr="Z"
cvtarr=35
cvtarr="["
cvtarr=""
cvtarr="%K"
cvtarr=0
cvtarr=""
cvtarr=""
cvtarr="%L"
cvtarr=0
cvtarr="]"
cvtarr=""
cvtarr="%M"
cvtarr=0
cvtarr="^"
cvtarr=""
cvtarr="%N"
cvtarr=0
cvtarr="_"
cvtarr=""
cvtarr="%O"
cvtarr=0
cvtarr=chr(96)
cvtarr=""
cvtarr="%W"
cvtarr=0
cvtarr="a"
cvtarr=""
cvtarr="+A"
cvtarr=0
cvtarr="b"
cvtarr=""
cvtarr="+B"
cvtarr=0
cvtarr="c"
cvtarr=""
cvtarr="+C"
cvtarr=0
cvtarr="d"
cvtarr=""
cvtarr="+D"
cvtarr=0
cvtarr="e"
cvtarr=""
cvtarr="+E"
cvtarr=0
cvtarr="f"
cvtarr=""
cvtarr="+F"
cvtarr=0
cvtarr="g"
cvtarr=""
cvtarr="+G"
cvtarr=0
cvtarr="h"
cvtarr=""
cvtarr="+H"
cvtarr=0
cvtarr="i"
cvtarr=""
cvtarr="+I"
cvtarr=0
cvtarr="j"
cvtarr=""
cvtarr="+J"
cvtarr=0
cvtarr="k"
cvtarr=""
cvtarr="+K"
cvtarr=0
cvtarr="l"
cvtarr=""
cvtarr="+L"
cvtarr=0
cvtarr="m"
cvtarr=""
cvtarr="+M"
cvtarr=0
cvtarr="n"
cvtarr=""
cvtarr="+N"
cvtarr=0
cvtarr="o"
cvtarr=""
cvtarr="+O"
cvtarr=0
cvtarr="p"
cvtarr=""
cvtarr="+P"
cvtarr=0
cvtarr="q"
cvtarr=""
cvtarr="+Q"
cvtarr=0
cvtarr="r"
cvtarr=""
cvtarr="+R"
cvtarr=0
cvtarr="s"
cvtarr=""
cvtarr="+S"
cvtarr=0
cvtarr="t"
cvtarr=""
cvtarr="+T"
cvtarr=0
cvtarr="u"
cvtarr=""
cvtarr="+U"
cvtarr=0
cvtarr="v"
cvtarr=""
cvtarr="+V"
cvtarr=0
cvtarr="w"
cvtarr=""
cvtarr="+W"
cvtarr=0
cvtarr="x"
cvtarr=""
cvtarr="+X"
cvtarr=0
cvtarr="y"
cvtarr=""
cvtarr="+Y"
cvtarr=0
cvtarr="z"
cvtarr=""
cvtarr="+Z"
cvtarr=0
cvtarr="{"
cvtarr=""
cvtarr="%P"
cvtarr=0
cvtarr="|"
cvtarr=""
cvtarr="%Q"
cvtarr=0
cvtarr="}"
cvtarr=""
cvtarr="%R"
cvtarr=0
cvtarr="~"
cvtarr=""
cvtarr="%S"
cvtarr=0
cvtarr=chr(127)
cvtarr=""
cvtarr="%T"
cvtarr=0
chktot=0
***processthemessage
FORx=1TOlen(m)
t=substr(m,x,1)
rtnc=asubscript(cvtarr,ascan(cvtarr,t,aelement(cvtarr,1,1),128),2)
ifrtnc0
p=p+cvtarr
chktot=chktot+cvtarr
endif
endfor
ifcheck=1
chkstr=43-(chktot%43)
rtnc=asubscript(cvtarr,ascan(cvtarr,chkstr,aelement(cvtarr,4,1),128),2)
ifrtnc0
p=p+cvtarr
endif
endif
p=p+"*"
returnp

5.在REPORT中增添稻莪h境表,再增添一谖(字段)好比CON_NO
@谖坏倪算式是:THISFORM.BC_CODE39(CON_NO)
格局是:@J
6.⒋REPORTM行PREVIEWORPRINTER便可列印出l目.





尽管MySQL也有一个认证培训项目,但是它的培训却要比Oracle或MS-SQL相差很远。尽管有的使用MySQL的用户表示,MySQL很容易上手,但是对于具有企业级数据库需求的用户来说,

精灵巫婆 发表于 2015-1-17 15:02:23

having子句的作用是筛选满足条件的组,即在分组之后过滤数据,条件中经常包含聚组函数,使用having条件显示特定的组,也可以使用多个分组标准进行分组。

飘飘悠悠 发表于 2015-1-17 20:07:54

两个月啃那本sqlserver2005技术内部-存储引擎,花了几个月啃四本书

第二个灵魂 发表于 2015-1-21 07:44:53

但是随着数据量的增大,这种成本差距会逐渐减小,趋于相等。(500万数量级只相差10%左右)

飘灵儿 发表于 2015-2-6 10:56:24

其中最有名的应该是row_number了。这个终于解决了用临时表生成序列号的历史,而且SQLServer2005的row_number比Oracle的更先进。因为它把Orderby集成到了一起,不用像Oracle那样还要用子查询进行封装。

仓酷云 发表于 2015-2-16 00:22:15

SP4是一个累积性的ServicePack,包含自以前的ServicePack发布以来所有的修补程序(包括MS03-031安全公告)。

蒙在股里 发表于 2015-3-11 20:46:16

如安全管理、备份恢复、性能监控和调优等,SQL只要熟悉基本操作就可以,只要程序设计部分只要稍加了解即可(如存储过程、触发器等)。

深爱那片海 发表于 2015-3-19 12:37:22

原来公司用过MYSQL自己也只是建个表写个SQL

admin 发表于 2015-3-28 01:36:15

理解了存储结构,再阅读下性能优化的章节基本上会对sqlserver有个清晰地认识
页: [1]
查看完整版本: MYSQL网页编程之怎样在FOXPRO的REPORT中F列印la功...