05 2012 档案

摘要:39码可以直接用字体代替,来字符前后都加下“*”,即可被条码枪识别。128B码的话,用字体加算法的方法才行,要计算开始位、校验位、结束位。VBA计算方法:View Code 1 Function code128b(Tar As Range) '128B码:ChrW(204). 2 Dim s$, i%, ss$, j%, curR%, checkB% 3 curR = Tar.Row 4 s = Tar.Value 5 checkB = 1 '开始位的码值为104 mod 103 =1 6 For i = 1 To Len(s) 7 ss = Mid(s, i, 1... 阅读全文
posted @ 2012-05-21 13:59 angtianqiang 阅读(557) 评论(0) 推荐(0)
摘要:select b.[value]from sys.columns a left join sys.extended_properties b on a.object_id = b.major_id and a.column_id = b.minor_id inner join sysobjects c on a.column_id = c.id and a.[name] = '列名' and c.[name] = '表名'select 表名 = case when a.colorder = 1 then d.name el... 阅读全文
posted @ 2012-05-08 19:23 angtianqiang 阅读(1850) 评论(0) 推荐(0)
摘要:create procedure aaaasdeclare @a intset @a=12 raiserror('状态已发生改变,或许其它用户做了更改!',16,-5)select @areturn -45--这里不显示指定的话,如里没有错误刚返回0,反之为负数declare @b intexec @b=aaaselect @bdrop procedure aaa 阅读全文
posted @ 2012-05-08 08:59 angtianqiang 阅读(309) 评论(0) 推荐(0)