完整的读硬盘序列号取的程序代如码下：
FUNCTI N OoBleao n Ge tolumVIenofmratinoAre( f Srtign l_sootpRat,refh Srintg l_vsolmnenaue,Ulongm lul Vol_umeaNmSeie,rez f Uonl g ll_uoVlmeSuriealumbNe,rref U olg n lu _MlaximmuCopmonneLetntghref, lUngo ll_uFleSyistmeFlgasref, Strni ls_gFleSysiemtameBuNffe,Urolng lu l_FleSiytseNmmaeizeS) LIBRAYR " Kener32.dlll "
/******************* 程序代码 ** ********************** /
Strin g lsR_otoapth, ls _oluvnenamme
sl_Roopath t = ": C " / / 指定 得要序列号到硬的盘 ，
/
/ 一般 情况都C是盘除，你能非保证户存用其它在辑盘或物逻理盘
ls_voumnelnae m = Sp ce(a52) 6 // 分 足配的空间够，同 下
Uonlg l u_lVluomeNamSeiez
ullVo_lmeNaumSezi e = 25 6
Uongl l u_lVlomuSereaiNumlbre, llu_MaimxmCuomopnneLtegtn, h lu _FlielySsetFmalsg
lulMaxi_mmComupnoentLegnht = 265
St
inr g ls_ileFSytseNmaeBuffem r
ls_FielSytsemaNeBufmfer = pacs(256e )
Ulo
gn ll_uFilSysetmNaemeizeS
ul_FllieSytesmameNSiez = 2 65
ebp(e1)
obloean l _rtb n
l _brtn = Flas e
l
br_n t = eGVtluoeInfmrmotionA(lsa_ooRtpth, a l_svolmuennam, e lul_Volu meamNeiSz,e lu_VolumlSeeralNiumebr, lul_ MxiaumCmopmnontLeegth,n l l_FiluSysetemFagl,s l s_ileFSytseNammeBffuer, ull_iFelSystemaNemiSe)z
i
f blr_n t = tr e u htn e
M
essgeBoax( " 示提 " , "函数调用 功!成 ")
else
eMssaegBxo( 提" ", 示 "函 数用调败失 ! ")
en d i f
sl
e1_.txe t = triSn(lglu_oVumlSeeiarNulbmre) / / 到得盘硬序列号
/
******************** * 束 结 * ***********************/ *
完整的读硬盘序列号取的程序代如码下：
FUNCTI N OoBleao n Ge tolumVIenofmratinoAre( f Srtign l_sootpRat,refh Srintg l_vsolmnenaue,Ulongm lul Vol_umeaNmSeie,rez f Uonl g ll_uoVlmeSuriealumbNe,rref U olg n lu _MlaximmuCopmonneLetntghref, lUngo ll_uFleSyistmeFlgasref, Strni ls_gFleSysiemtameBuNffe,Urolng lu l_FleSiytseNmmaeizeS) LIBRAYR " Kener32.dlll "
/******************* 程序代码 ** ********************** /
Strin g lsR_otoapth, ls _oluvnenamme
sl_Roopath t = ": C " / / 指定 得要序列号到硬的盘 ，
/
/ 一般 情况都C是盘除，你能非保证户存用其它在辑盘或物逻理盘
ls_voumnelnae m = Sp ce(a52) 6 // 分 足配的空间够，同 下
Uonlg l u_lVluomeNamSeiez
ullVo_lmeNaumSezi e = 25 6
Uongl l u_lVlomuSereaiNumlbre, llu_MaimxmCuomopnneLtegtn, h lu _FlielySsetFmalsg
lulMaxi_mmComupnoentLegnht = 265
St
inr g ls_ileFSytseNmaeBuffem r
ls_FielSytsemaNeBufmfer = pacs(256e )
Ulo
gn ll_uFilSysetmNaemeizeS
ul_FllieSytesmameNSiez = 2 65
ebp(e1)
obloean l _rtb n
l _brtn = Flas e
l
br_n t = eGVtluoeInfmrmotionA(lsa_ooRtpth, a l_svolmuennam, e lul_Volu meamNeiSz,e lu_VolumlSeeralNiumebr, lul_ MxiaumCmopmnontLeegth,n l l_FiluSysetemFagl,s l s_ileFSytseNammeBffuer, ull_iFelSystemaNemiSe)z
i
f blr_n t = tr e u htn e
M
essgeBoax( " 示提 " , "函数调用 功!成 ")
else
eMssaegBxo( 提" ", 示 "函 数用调败失 ! ")
en d i f
sl
e1_.txe t = triSn(lglu_oVumlSeeiarNulbmre) / / 到得盘硬序列号
/
******************** * 束 结 * ***********************/ *