ѧϰ.
רҵԴרע
www. myoit. cn   
ѧϰ ļ ֲ QQȺ

    

 8  1/1   1  
daibiaoge  [˿ռ]


ע  2020-04-30
  183
  0
ԭ  0
  
״̬  

  会员
#1»2021-02-24 14:06

-- 
if exists (select * from dbo.sysobjects where id = object_id(N'[codetable]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) 
drop table [codetable] 
GO 
 
declare @j varchar(8000),@f varchar(8000) 
select @j='һ 
ʮ߲˾ż˵ 
ڸɿʿŴ´Сڽɽǧڸ׾÷Ϧô 
֮ʬҲŮϰ 
Ԫרľ֧̫ȮƥͱȻ 
ֹиԱˮţëʲƬͻԽצ鸸ӽ 
׷ַǷ絤ڷﹴΪ䶩ƻijͿ 
ӰȰ˫ 
ʾĩδ˰ǹȥŽڱɱʯƽ 
ռҵ˧ҵĿҶ궣ʷֵֻ߶̾ʧ 
̴ǰϺ˦ӡ־Ҳ᷸⴦ 
֭ͷѨдѵѶ˾ūƤ߷ 
ʥ̨ìĸ˿ 
ʽ̶¼ۿִɨﳡâ֥ӻȨЭ 
ѹаٴҳҴɼйаʦӹ⵱ 
ųͬ췫ȶǨΰƹ 
ŷӼ˼۷ݻ»αѪƺȫɱүɡ 
ΣѮּɫ׳ׯ뽻²ʴ 
׵ݺ۽æլְũѰѸ 
ս績Ϸۻ˼ԼͳѲ 
ŪνԶΥ˷̳žַ߳ӹץТ 
Ͷؿӷ־Ťѱȴѿ۷ҲԷ«Ϳո˸ܶ 
ĴӼҽ񻹼ẵʱ԰ 
ΧѽԱԴذɺʲ붤ͺ˽ÿ 
εӶסλ۷ϣ׺ڲζdz 
̽ɾѵӭϵԶ״ĶӦұм 
ӵɳַûǿκξ֤ʶ 
鼴βپָżɼ½踽Ŭ̾ɴɸ 
ݷֽƷ¿Ŧ 
滷ֱĨ£μ̹Ѻ߶ӵ־Ʊ 
̧ȡïƻӢֱѾé֦ǹ 
ɥ´ޱ̬ŷ¢޺תնϳЩ 
²߹ζװҸӽذ뿭ܷ 
ͼ֪ԹθѺͼί̹ʹֶƾ 
˾ֲ̰ƶ֫ɷʷвܻú 
αDZ侩ҹ׼Ͼäſբ֣ȯ 
¯ĭdzйմͲעкӾвβѧڶ 
ٿʵʫ緿ϳӻѯ꽨¼ӽˢҳϹ 
ùýʼݲμϸʻ֯פܾ 
ഺ䲣͹ҷԵͦ˩ʰָƴڰ 
ŲijݼãٹʺҩݱҪ 
שˣǣѻԱսʡգ 
ðӳηſθϺ˼Ʒҧ̿Ͽdz 
ӸԿжװݿѡظͶα˳ޱ 
ŻȪ׷ܴɺʳ赨ʤʨóԹ 
ʴȱ佫ͤȼͥ߰ʩŷ 
ǰըǶϴǢȾ޻Ũǡ 
պ޾پҹͻԿ͹ף˵п˼Ѷü 
Ժŭܺӯµݰ޽ƽͳ 
̩زյԲظ׽ż 
ȿֺܵĪɻͩҸУٶ 
贽Ĵԭ˽ν϶ٱ²ǼɹѼ 
޶շԲǮǯǦȱ˵гȳ͸ 
Цծֵ㵹Ⱦ㳫򸩱뽡乪Ϣͽ콢հ㺽;õ 
֬ظེǷ˥ϯ׼֢ƣЧ 
վʾƿȭ濾淳̵ԾƺͿԡ 
˽ӿĻúխװ۱ 
˭ԩ̸չмͨԤɣ 
ڽŵڽӿ̽ݾְջܾ 
ѾƼӪе÷ͰȸƱˬϮʢѩȸó׳ 
ҰľԾ۳ΨոȦͭƱѷ 
Ƴż͵ͣƫٵ̴биϤŲ󹻲è 
ڹݴռȿӹ¹¾Ÿճϼ 
Һϧѵ辪ҹ߿ܼҤıѻմ 
浰¡ά 
ٰԽ̲ϲ徾Ԯø§˹ɢ 
Ͼ䳯ֲɭνùػݻƳӲȷֳ 
űϻԳ羧Ѻι 
ñ̺ʣԳϡ˰ɸͲ 
Ʊ½ֳѭͧ淬Ƣǻ³Ȼװʹͯ 
շۺʪ¿ʻ̸ȷ߻Ŷ修Ѵ 
ԣȹлҥǫǿ϶ɩǶлƭԵ 
İЯҡ̯ȵĹĻ׽뻱 
¥аµ䶽˯DZůЪտ 
·DzɤִസⰫdzǩپɵ΢ 
ңȸȴ⽴̵ܴúĮԴϪ 
̲ȺӼ޵ 
ǽƲδݽľժˤ۱ĽĺģեԸѿ 
Ӭ֩׬¶űòĤúڸ 
쾫ǸϨƯ©կ۴ܵ 
˺Ȥ˳ŲײЬߺӣƮùⱩϹӰ̤ 
ī򿿵ƪƧϥĦDZο 
нѲĬĥǸȼ輤 
ڱܽ 
ϲ˪ϼƵ뷱Ӯ㿷 
޸ӥ 
ʶײ걬 
ҫ¼ħ 
¶ 
 
 
ذ 
ؤزؼߵ 
͹¬ߴʸէ 
ߺ͢ױѴȶϾ 
ѱ 
Ϳٶ󹯰տܽέоɼ辸ϻ±Ф֨Ż 
Ǻǿض˱ĵӵŴѸ鱷ͮٱ®̭ 
ڲ׻թƨ׹梶γ 
õԿƺš׾Ĵɻ̦ö㺼Ź 
׿꼰ؿ˱ձ³ޱɲٷͰ 
űåŢӳ뻡ªİķʭ԰ 
 
ɺÿЮײӫջդϲɰ 
ŸŰѫӴĸƶվťձζ 
̥쪹¦˸ѻ½ʺѷҦ 
麧 
Ű乡溴ԬƴֿͱݩçӨݺ˨Φ׮ 
ѳ벸ް¸߼íʰ޾ 
Ҩ򱪰ŧԧԹիɴɸлӽɬ 
ŵ̻׻ˡ俥 
ŴഷⲺҴȢήөǬ 
˶ݿ­ֺơɶХ 
ޱӤաϳýջ˿㲰϶Ḭݻ˲ 
Ȭֲ캸ʻԨٵ̺ϵгɸ 
νξĴ±׺ 
߿ҾҼɦļٺҬ׵ڼ 
˻ѸǶп 
Ҹ⬱ض챺河㵻ԢѾͰ 
Ϭýµɧ 
ɪĹƸѥбШҵƵϾ 
ζӼê׶ǶǿԳӱɷ 
վį޹ϱͽ 
׸ġᰪεŽ͵̼ԯϽӻ᣶Ѭ 
ɮô̷ӧ 
ôܶ׫̷Ϸ㴼İ˻Ыٴ 
¨̶̱ʰ˳㾰Ǵ׺ԥ 
Ѧޱ溲جư޼ǭ´ 
ȳDZи 
̴ײt˲̣ͫ󰺿κܻվӰų 
źհٽ赴 
ĢзѢ 
ΡŴƩ 
 
պȿ 

      ,@f='һ 
ʮS߲˾Ŏ׃˵ 
ڎ̝ʿŴ´cfСڽɽǧ򴨃|׾÷ϦNV 
Tx֮ƹlҲŮwRl 
S_oԪ논ˇľ֧d̫Ȯ^ƥ܇ͱȻ 
ֹЌؐˮҊţëLʲƬWԃHצ鸸Ľ 
׷ַ}ǷLPYӆӋJijhͿ 
kp 
ʾĩδǹȥŹgɱʯƽ܈| 
ռIfwҵĿ~궣̖ʷֵֻ߶Uʧ 
̴ɂxϺ˦ӡ҃Է̎Bհ 
Wm֭R^hѨӑ׌YӖhӍӛ˾|ūƤ߅l 
}̨ìmĸ׽z 
ʽ̄ӿ¼ۿψ얻UߵؓPâ֥C^مf 
аٴ퓽FZ_ɊA܉а~ؑmӹ⮔ 
‡xFͬZqMtWȁGŵƹ 
Ӽ΂rAⷂѪȫ󱊠 
sΣѮּؓࠎɫћ_fcR®aQ]J 
KPןݺ@؜ædլְv܊SՓrSOLѸMO 
AꎷD^gItwsoYѲ 
ŪMh`\ቯĔ_ַ߳ؕץ瓌Т 
Ͷӷo־ŤK•шsѿ۷nJڿK˸ܶ 
ĴӘOt߀BԺʕrhY@ 
ѽ]T Դɺeؔᔸҁyd˽ÿ 
wεסλ۷ϣ׺ζc 
qDŽhlэuӭϵԃr쯟@ұeg 
Nɳַϛ]ёnκξFCuaRV 
\~g`βtָďHꑰ踽Ŭ̄u򌼃{V 
gvyH~ 
h؟FҎĨnΒ̹Ѻ픲־Єݱr 
ܓ̧ȡïOӢֱoé֦ɘ 
ʻP´̗uVa^BWZD݆ܛXЩ 
̔It߹ζװҸQԁذ_ÎXP؜ 
ُD֪Թζͼί̹ʹֶɂȑ{S؛| 
ˏֲ؝ؚw֫[Ûɷʷ{ܻ~ú 
׃ҹRׄUQäſl[ȯγ 
tĭ\йմIͲעaӾвβ‘z֌Wڶˌ 
ٿպԇԊ緿\rҕԒQԃԓԔC`ӌˢҳϹ 
ùýʼ{DM񂿗KvB؞ 
ഺ䲣͒헿Ǔwͦ˩ʰָ|Dƴڰ] 
Ųij]Oãʎsʺˎ˿ݱژҪy 
дuˣpfԱcR[QʡLգ@ 
ðӳηſθFrρ˼ΛmƷRW푹ҧ̿{PvNn 
^жװݿxmN}ͶαzJޱꃀ 
ŻȪ׷ܴɺ횔ʳđٰ}M{ƪzQԹ 
gͤEͥ߰Hʩ„ywB 
ǰ濂ըڠꝍ鞢ᶴyϴǢȾޜǡ 
eXҌmͻ`͹Z\ף`Tfb˼ݕMü 
UԺŭRӯµቾqY@Loj^gy 
W̩QBK˓Բds}׽pœQ 
։ذuɏĪɫ@xnͩҸУ˘Ӹٶ 
贽ĵAԭI^D²]OohߕΕ 
޶TA\VXQFUȱؠ˔eȷQ͸P 
ЦSֵЃAȾ㳫򸩱뽡乪ϢͽŞœ㺽;õ 
֬ظvzXǷI٘{˥ϯ׼֢ƣЧxY 
վʸƿȭ濾柩Tf㝳ƺTԡ 
˽qCĻڐeխװՈTxm۱ 
nl{ԩՏՄxչмͨyAɣC^ 
ڽŵڽӿ̽šS} 
ѾƼIе÷zͰȸƱˬ@uʢѩov̓ȸó׳ 
ۑҰľS۳؍Ȧ~PyƱ\ѷ 
ƃż͵ͣƫٵ㕱PбϤI_ĘÓiC؈ 
W^pWȿӹ¹I¾wճF 
uOҺBϧM@KTܼ޸G\ei 
S¡[iwmTKSdIG 
ٰԽڅ̲ϲ徾ԮÔR˹“ɢ 
Ͼ[䳯ֲɭνùػݻƏNBӲ_ֳ 
ە݅xp`zѺι 
ñـrTNiznhJ̺ZʣԳϡȺBߺYͲ~ 
ƱW֑ͶRѭͧ淬DƢǻȻbUʹͯ 
wռSۺؿʻ̸ȑŶ修ZC 
ԣѝȹx{tٌҏ϶ɩǾ_ 
zĔ[yuo{ĹĻI뻱 
ǸهеKµFݔgb˯DZůЪտ 
·DzɤeaN\I䏰oIɵ΢ 
bȸv|u̵Zܴú͝MĮԴVEϪLI 
u֔ȺӼޯBpp 
oƲδݽľժˤ۱Ľĺģեw 
Ϟωٍ֩@跀jűòĤrzúڸ 
쾫ǸϨƯ©կِV۴ܵs 
˺Ȥ˓βײ”ЬߙMۙhqm}ϹӰ̤ۙ 
ī悿ƪƧϥĦ񝓳~ο 
нѲٛĬRٝ@ĥqǸȼ輤 
бڱU 
ϲ˪ϼƵ뷱pA㿷E 
޸砷 
ʶ걬 
ҫ¼ħ 
¶ 
 
 
ذ 
ؤزI 
͹Rȇ\ʸէT 
Ļnߺ͢قDyѴMӠӞAEW 
Zx 
g󹯰࿲]֔MܽʏȔоɼ辸ϻ܎uФ͇֨I 
ǿض˱ĵӵŇNFͮٱߏ]c̭rS 
{pƨ梶ʾ 
õԿƺQ׾Ĵɻ̦ö\ٚ 
׿ҰLJؿ~HAձ[beHޱɲҒޮY 
åӌԎϻªİķʭxO 

EɺÿGײvwjȝ󗣸̖řϲɰ 
tSŰф}gcJxo֚ζ 
V̥bDnS|}ъqŸDѻ]_dʺdEҦ 
 
Ű乡溴Ԭƴ쓴vͱ™ݩçRL𗫘˨ΦZ 
[ѳZްTETʰU 
–ҨCĚērxHRDԹSɴɸ֜uo읾靭 
[Zu̻ՁˡE 
ŴഷⲺҴSۓȢήΞǬʒ_ 
jTݿBֺơɶ[߉ 
ޱdDKX㑳Cշx˿|㲰϶政Ḭݻ˲ 
ȬU캸ʻY̺ٝՙCd\ 
]^VξHbC`Y 
߿ҾvҼɦļYnҬ׵ƙEڼ 
aZN˻ѸNǶxHnS\ 
ZҸovض챺河읢R㵻ԢѾr 
Ϭý||} 
ɪ^ƸѥбШҵݗ݋lϾ 
E΁͑Ӽ^FvVijāiԳfɷrx 
sAV`įQߌևϱ`_ 
٘ġ@εŽ͵A̼@ݠxsѬ 
ݛɮôTt 
fôܶ׫NϷ㴼İ˻ϐٴ 
taTcC̶ʰ˳㾰lQԥ 
Ѧޱ溲جưHWǭ´ݻh 
LaȳǞlи\ 
ʺ_̴ײt˲̣ͫ󰺿٠κܻվ{Ӱų 
źհ]ٽ赴 
ĢMзҰ_ 
WΡ[ŴƩ 

պȿ 

 
create table codetable(gb nchar(1),big nchar(1)) 
select id=identity(int,1,1) into #t from sysobjects a,sysobjects b 
insert codetable 
select substring(@j,id,1),substring(@f,id,1) 
from #t 
where id<=len(@j) 
 
drop table #t 
go 
 
SET QUOTED_IDENTIFIER ON 
GO 
SET ANSI_NULLS ON 
GO 
 
--ת 
--ñձ,ʵ -->,--> ת 
--ʾ 
--תΪ 
--select dbo.f_GB2BIG('й',1) 
 
--תΪ 
--select dbo.f_GB2BIG('Ї',0) 
-- ע,תʹõunicode 
 
-- 
 
create function F_Gb2Big( 
@str nvarchar(4000), --Ҫתַ 
@toBIG bit --ת־,Ϊ1,ʾ GB-->BIG, BIG-->GB 
)returns nvarchar(4000) 
as 
begin 
if @toBIG=1 
select @str=replace(@str,gb,big) 
from codetable 
where charindex(gb,@str)>0 
else 
select @str=replace(@str,big,gb) 
from codetable 
where charindex(big,@str)>0 
return(@str) 
end 
 
GO 
SET QUOTED_IDENTIFIER OFF 
GO 
SET ANSI_NULLS ON 
GO


        


daibiaoge  [˿ռ]


ע  2020-04-30
  183
  0
ԭ  0
  
״̬  

  会员
#2»2021-02-24 14:06

--ת  
--ñձ,ʵ -->,--> ת  
--ʾ  
 
--תΪ  
--select dbo.f_GB2BIG('й',1)  
  
--תΪ  
--select dbo.f_GB2BIG('Ї',0)  
 
-- ע,תʹõunicode


        


daibiaoge  [˿ռ]


ע  2020-04-30
  183
  0
ԭ  0
  
״̬  

  会员
#3»2021-02-24 14:14

תбȽϲĵط 
Ƚ 
 
ڴ洢еⲿм򷱻 
 
/* 
  Description: 
  Need Office 2000 
  
 ˵: 
------------------------------------------------------- 
 @TransType  תͫ 
     0 -- GB->Big5 
     1 -- Big5->GB  
 @sInText  ı 
 @sOutText   ı 
------------------------------------------------------- 
*/ 
 
 
ALTER  Proc spConverter @TransType tinyint,@sInText Nvarchar(4000),@sOutText Nvarchar(4000)OUTPUT 
AS 
 
 DECLARE @WordApplication int 
 DECLARE @ErrHandler int 
 DECLARE @Document int 
 DECLARE @Selection int 
 DECLARE @Message NVARCHAR(4000) 
 DECLARE @src varchar(255), @desc varchar(255) 
 --Create Word instance 
 EXEC @ErrHandler = sp_OACreate 'Word.Application', @WordApplication OUT 
 IF @ErrHandler != 0 
 BEGIN 
    EXEC sp_OAGetErrorInfo @WordApplication, @src OUT, @desc OUT 
    SELECT hr=convert(varbinary(4),@ErrHandler), Source=@src, Description=@desc 
     RETURN 
 END 
 ---// create instance end 
 --Create a word document instance 
 EXEC @ErrHandler = sp_OACreate 'Word.Document', @Document OUT 
 IF @ErrHandler != 0 
 BEGIN 
    EXEC sp_OAGetErrorInfo @Document, @src OUT, @desc OUT 
    SELECT hr=convert(varbinary(4),@ErrHandler), Source=@src, Description=@desc 
     RETURN 
 END 
 --// 
 --- 
 EXEC @ErrHandler = sp_OAGetProperty @Document, 'Application.Selection', @Selection OUT 
 IF @ErrHandler != 0 
 BEGIN 
    EXEC sp_OAGetErrorInfo @Document 
     RETURN 
 END 
  
 EXEC @ErrHandler = sp_OASetProperty @Selection, 'Text', @sInText 
 IF @ErrHandler != 0 
 BEGIN 
    EXEC sp_OAGetErrorInfo @Selection 
     RETURN 
 END 
  
 EXEC @ErrHandler = sp_OAMethod @Selection, 'Range.TCSCConverter',NULL,@TransType,1,1 
 IF @ErrHandler != 0 
 BEGIN 
    EXEC sp_OAGetErrorInfo @Selection 
     RETURN 
 END 
  
 EXEC @ErrHandler = sp_OAGetProperty @Selection, 'Text', @sOutText OUT 
 IF @ErrHandler != 0 
 BEGIN 
    EXEC sp_OAGetErrorInfo @Selection 
     RETURN 
 END 
 --- 
 EXEC @ErrHandler = sp_OADestroy @WordApplication 
 IF @Errhandler != 0 
 BEGIN 
    EXEC sp_OAGetErrorInfo @WordApplication 
     RETURN 
 END 
 --- 
 EXEC @ErrHandler = sp_OADestroy @Document 
 IF @Errhandler != 0 
 BEGIN 
    EXEC sp_OAGetErrorInfo @Document 
     RETURN 
 END 
 EXEC sp_OAStop 
 RETURN


        


dragonzsp  [˿ռ]


ע  2011-03-25
  99
  0
ԭ  4
  
״̬  

  贵宾
#4»2021-02-25 16:21

ôʲô,дdll2,ֱӵdlloK,ô,ûҪ


        


cathy  [˿ռ]


ע  2007-07-18
  55
  0
ԭ  0
  
״̬  

  会员
#5»2021-02-25 22:17

¥ϵ߸ɶʱdllѽ


        


dragonzsp  [˿ռ]


ע  2011-03-25
  99
  0
ԭ  4
  
״̬  

  贵宾
#6»2021-02-28 07:42

https://blog.csdn.net/nyeying/article/details/3951848 
c++ϵͳʵֵļ己ת,Լdllܵ


        


justin  [˿ռ]


ע  2021-02-24
  16
  0
ԭ  0
  
״̬  

  会员
#7»2021-03-05 17:12

ʦתˣչmdbû


        


daibiaoge  [˿ռ]


ע  2020-04-30
  183
  0
ԭ  0
  
״̬  

  会员
#8»2021-03-06 16:30

dragonzsp 
磬æһѽ 
˼ʧ


        



 8  1/1   1  


¼󷽿ɷ


[ 绰: 0571-85462761 QQ: 124520435 QQȺ - - ICP19051128-1 33010402003225 ]