DBServerDlg.cpp 226 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542354335443545354635473548354935503551355235533554355535563557355835593560356135623563356435653566356735683569357035713572357335743575357635773578357935803581358235833584358535863587358835893590359135923593359435953596359735983599360036013602360336043605360636073608360936103611361236133614361536163617361836193620362136223623362436253626362736283629363036313632363336343635363636373638363936403641364236433644364536463647364836493650365136523653365436553656365736583659366036613662366336643665366636673668366936703671367236733674367536763677367836793680368136823683368436853686368736883689369036913692369336943695369636973698369937003701370237033704370537063707370837093710371137123713371437153716371737183719372037213722372337243725372637273728372937303731373237333734373537363737373837393740374137423743374437453746374737483749375037513752375337543755375637573758375937603761376237633764376537663767376837693770377137723773377437753776377737783779378037813782378337843785378637873788378937903791379237933794379537963797379837993800380138023803380438053806380738083809381038113812381338143815381638173818381938203821382238233824382538263827382838293830383138323833383438353836383738383839384038413842384338443845384638473848384938503851385238533854385538563857385838593860386138623863386438653866386738683869387038713872387338743875387638773878387938803881388238833884388538863887388838893890389138923893389438953896389738983899390039013902390339043905390639073908390939103911391239133914391539163917391839193920392139223923392439253926392739283929393039313932393339343935393639373938393939403941394239433944394539463947394839493950395139523953395439553956395739583959396039613962396339643965396639673968396939703971397239733974397539763977397839793980398139823983398439853986398739883989399039913992399339943995399639973998399940004001400240034004400540064007400840094010401140124013401440154016401740184019402040214022402340244025402640274028402940304031403240334034403540364037403840394040404140424043404440454046404740484049405040514052405340544055405640574058405940604061406240634064406540664067406840694070407140724073407440754076407740784079408040814082408340844085408640874088408940904091409240934094409540964097409840994100410141024103410441054106410741084109411041114112411341144115411641174118411941204121412241234124412541264127412841294130413141324133413441354136413741384139414041414142414341444145414641474148414941504151415241534154415541564157415841594160416141624163416441654166416741684169417041714172417341744175417641774178417941804181418241834184418541864187418841894190419141924193419441954196419741984199420042014202420342044205420642074208420942104211421242134214421542164217421842194220422142224223422442254226422742284229423042314232423342344235423642374238423942404241424242434244424542464247424842494250425142524253425442554256425742584259426042614262426342644265426642674268426942704271427242734274427542764277427842794280428142824283428442854286428742884289429042914292429342944295429642974298429943004301430243034304430543064307430843094310431143124313431443154316431743184319432043214322432343244325432643274328432943304331433243334334433543364337433843394340434143424343434443454346434743484349435043514352435343544355435643574358435943604361436243634364436543664367436843694370437143724373437443754376437743784379438043814382438343844385438643874388438943904391439243934394439543964397439843994400440144024403440444054406440744084409441044114412441344144415441644174418441944204421442244234424442544264427442844294430443144324433443444354436443744384439444044414442444344444445444644474448444944504451445244534454445544564457445844594460446144624463446444654466446744684469447044714472447344744475447644774478447944804481448244834484448544864487448844894490449144924493449444954496449744984499450045014502450345044505450645074508450945104511451245134514451545164517451845194520452145224523452445254526452745284529453045314532453345344535453645374538453945404541454245434544454545464547454845494550455145524553455445554556455745584559456045614562456345644565456645674568456945704571457245734574457545764577457845794580458145824583458445854586458745884589459045914592459345944595459645974598459946004601460246034604460546064607460846094610461146124613461446154616461746184619462046214622462346244625462646274628462946304631463246334634463546364637463846394640464146424643464446454646464746484649465046514652465346544655465646574658465946604661466246634664466546664667466846694670467146724673467446754676467746784679468046814682468346844685468646874688468946904691469246934694469546964697469846994700470147024703470447054706470747084709471047114712471347144715471647174718471947204721472247234724472547264727472847294730473147324733473447354736473747384739474047414742474347444745474647474748474947504751475247534754475547564757475847594760476147624763476447654766476747684769477047714772477347744775477647774778477947804781478247834784478547864787478847894790479147924793479447954796479747984799480048014802480348044805480648074808480948104811481248134814481548164817481848194820482148224823482448254826482748284829483048314832483348344835483648374838483948404841484248434844484548464847484848494850485148524853485448554856485748584859486048614862486348644865486648674868486948704871487248734874487548764877487848794880488148824883488448854886488748884889489048914892489348944895489648974898489949004901490249034904490549064907490849094910491149124913491449154916491749184919492049214922492349244925492649274928492949304931493249334934493549364937493849394940494149424943494449454946494749484949495049514952495349544955495649574958495949604961496249634964496549664967496849694970497149724973497449754976497749784979498049814982498349844985498649874988498949904991499249934994499549964997499849995000500150025003500450055006500750085009501050115012501350145015501650175018501950205021502250235024502550265027502850295030503150325033503450355036503750385039504050415042504350445045504650475048504950505051505250535054505550565057505850595060506150625063506450655066506750685069507050715072507350745075507650775078507950805081508250835084508550865087508850895090509150925093509450955096509750985099510051015102510351045105510651075108510951105111511251135114511551165117511851195120512151225123512451255126512751285129513051315132513351345135513651375138513951405141514251435144514551465147514851495150515151525153515451555156515751585159516051615162516351645165516651675168516951705171517251735174517551765177517851795180518151825183518451855186518751885189519051915192519351945195519651975198519952005201520252035204520552065207520852095210521152125213521452155216521752185219522052215222522352245225522652275228522952305231523252335234523552365237523852395240524152425243524452455246524752485249525052515252525352545255525652575258525952605261526252635264526552665267526852695270527152725273527452755276527752785279528052815282528352845285528652875288528952905291529252935294529552965297529852995300530153025303530453055306530753085309531053115312531353145315531653175318531953205321532253235324532553265327532853295330533153325333533453355336533753385339534053415342534353445345534653475348534953505351535253535354535553565357535853595360536153625363536453655366536753685369537053715372537353745375537653775378537953805381538253835384538553865387538853895390539153925393539453955396539753985399540054015402540354045405540654075408540954105411541254135414541554165417541854195420542154225423542454255426542754285429543054315432543354345435543654375438543954405441544254435444544554465447544854495450545154525453545454555456545754585459546054615462546354645465546654675468546954705471547254735474547554765477547854795480548154825483548454855486548754885489549054915492549354945495549654975498549955005501550255035504550555065507550855095510551155125513551455155516551755185519552055215522552355245525552655275528552955305531553255335534553555365537553855395540554155425543554455455546554755485549555055515552555355545555555655575558555955605561556255635564556555665567556855695570557155725573557455755576557755785579558055815582558355845585558655875588558955905591559255935594559555965597559855995600560156025603560456055606560756085609561056115612561356145615561656175618561956205621562256235624562556265627562856295630563156325633563456355636563756385639564056415642564356445645564656475648564956505651565256535654565556565657565856595660566156625663566456655666566756685669567056715672567356745675567656775678567956805681568256835684568556865687568856895690569156925693569456955696569756985699570057015702570357045705570657075708570957105711571257135714571557165717571857195720572157225723572457255726572757285729573057315732573357345735573657375738573957405741574257435744574557465747574857495750575157525753575457555756575757585759576057615762576357645765576657675768576957705771577257735774577557765777577857795780578157825783578457855786578757885789579057915792579357945795579657975798579958005801580258035804580558065807580858095810581158125813581458155816581758185819582058215822582358245825582658275828582958305831583258335834583558365837583858395840584158425843584458455846584758485849585058515852585358545855585658575858585958605861586258635864586558665867586858695870587158725873587458755876587758785879588058815882588358845885588658875888588958905891589258935894589558965897589858995900590159025903590459055906590759085909591059115912591359145915591659175918591959205921592259235924592559265927592859295930593159325933593459355936593759385939594059415942594359445945594659475948594959505951595259535954595559565957595859595960596159625963596459655966596759685969597059715972597359745975597659775978597959805981598259835984598559865987598859895990599159925993599459955996599759985999600060016002600360046005600660076008600960106011601260136014601560166017601860196020602160226023602460256026602760286029603060316032603360346035603660376038603960406041604260436044604560466047604860496050605160526053605460556056605760586059606060616062606360646065606660676068606960706071607260736074607560766077607860796080608160826083608460856086608760886089609060916092609360946095609660976098609961006101610261036104610561066107610861096110611161126113611461156116611761186119612061216122612361246125612661276128612961306131613261336134613561366137613861396140614161426143614461456146614761486149615061516152615361546155615661576158615961606161616261636164616561666167616861696170617161726173617461756176617761786179618061816182618361846185618661876188618961906191619261936194619561966197619861996200620162026203620462056206620762086209621062116212621362146215621662176218621962206221622262236224622562266227622862296230623162326233623462356236623762386239624062416242624362446245624662476248624962506251625262536254625562566257625862596260626162626263626462656266626762686269627062716272627362746275627662776278627962806281628262836284628562866287628862896290629162926293629462956296629762986299630063016302630363046305630663076308630963106311631263136314631563166317631863196320632163226323632463256326632763286329633063316332633363346335633663376338633963406341634263436344634563466347634863496350635163526353635463556356635763586359636063616362636363646365636663676368636963706371637263736374637563766377637863796380638163826383638463856386638763886389639063916392639363946395639663976398639964006401640264036404640564066407640864096410641164126413641464156416641764186419642064216422642364246425642664276428642964306431643264336434643564366437643864396440644164426443644464456446644764486449645064516452645364546455645664576458645964606461646264636464646564666467646864696470647164726473647464756476647764786479648064816482648364846485648664876488648964906491649264936494649564966497649864996500650165026503650465056506650765086509651065116512651365146515651665176518651965206521652265236524652565266527652865296530653165326533653465356536653765386539654065416542654365446545654665476548654965506551655265536554655565566557655865596560656165626563656465656566656765686569657065716572657365746575657665776578657965806581658265836584658565866587658865896590659165926593659465956596659765986599660066016602660366046605660666076608660966106611661266136614661566166617661866196620662166226623662466256626662766286629663066316632663366346635663666376638663966406641664266436644664566466647664866496650665166526653665466556656665766586659666066616662666366646665666666676668666966706671667266736674667566766677667866796680668166826683668466856686668766886689669066916692669366946695669666976698669967006701670267036704670567066707670867096710671167126713671467156716671767186719672067216722672367246725672667276728672967306731673267336734673567366737673867396740674167426743674467456746674767486749675067516752675367546755675667576758675967606761676267636764676567666767676867696770677167726773677467756776677767786779678067816782678367846785678667876788678967906791679267936794679567966797679867996800680168026803680468056806680768086809681068116812681368146815681668176818681968206821682268236824682568266827682868296830683168326833683468356836683768386839684068416842684368446845684668476848684968506851685268536854685568566857685868596860686168626863686468656866686768686869687068716872687368746875687668776878687968806881688268836884688568866887688868896890689168926893689468956896689768986899690069016902690369046905690669076908690969106911691269136914691569166917691869196920692169226923692469256926692769286929693069316932693369346935693669376938693969406941694269436944694569466947694869496950695169526953695469556956695769586959696069616962696369646965696669676968696969706971697269736974697569766977697869796980698169826983698469856986698769886989699069916992699369946995699669976998699970007001700270037004700570067007700870097010701170127013701470157016701770187019702070217022702370247025702670277028702970307031703270337034703570367037703870397040704170427043704470457046704770487049705070517052705370547055705670577058705970607061706270637064706570667067706870697070707170727073707470757076707770787079708070817082708370847085708670877088708970907091709270937094709570967097709870997100710171027103710471057106710771087109711071117112711371147115711671177118711971207121712271237124712571267127712871297130713171327133713471357136713771387139714071417142714371447145714671477148714971507151715271537154715571567157715871597160716171627163716471657166716771687169717071717172717371747175717671777178717971807181718271837184718571867187718871897190719171927193719471957196719771987199720072017202720372047205720672077208720972107211721272137214721572167217721872197220722172227223722472257226722772287229723072317232723372347235723672377238723972407241724272437244724572467247724872497250725172527253725472557256725772587259726072617262726372647265726672677268726972707271727272737274727572767277727872797280728172827283728472857286728772887289729072917292729372947295729672977298729973007301730273037304730573067307730873097310731173127313731473157316731773187319732073217322732373247325732673277328732973307331733273337334733573367337733873397340734173427343734473457346734773487349735073517352735373547355735673577358735973607361736273637364736573667367736873697370737173727373737473757376737773787379738073817382738373847385738673877388738973907391739273937394739573967397739873997400740174027403740474057406740774087409741074117412741374147415741674177418741974207421742274237424742574267427742874297430743174327433743474357436743774387439744074417442744374447445744674477448744974507451745274537454745574567457745874597460746174627463746474657466746774687469747074717472747374747475747674777478747974807481748274837484748574867487748874897490749174927493749474957496749774987499750075017502750375047505750675077508750975107511751275137514751575167517751875197520752175227523752475257526752775287529753075317532753375347535753675377538753975407541754275437544754575467547754875497550755175527553755475557556755775587559756075617562756375647565756675677568756975707571757275737574757575767577757875797580758175827583758475857586758775887589759075917592759375947595759675977598759976007601760276037604760576067607760876097610761176127613761476157616761776187619762076217622762376247625762676277628762976307631763276337634763576367637763876397640764176427643764476457646764776487649765076517652765376547655765676577658765976607661766276637664766576667667766876697670767176727673767476757676767776787679768076817682768376847685768676877688768976907691769276937694769576967697769876997700770177027703770477057706770777087709771077117712771377147715771677177718771977207721772277237724772577267727772877297730773177327733773477357736773777387739774077417742774377447745774677477748774977507751775277537754775577567757775877597760776177627763776477657766776777687769777077717772777377747775777677777778777977807781778277837784778577867787778877897790779177927793779477957796779777987799780078017802780378047805780678077808780978107811781278137814781578167817781878197820782178227823782478257826782778287829783078317832783378347835783678377838783978407841784278437844784578467847784878497850785178527853785478557856785778587859786078617862786378647865786678677868786978707871787278737874787578767877787878797880788178827883788478857886788778887889789078917892789378947895789678977898789979007901790279037904790579067907790879097910791179127913791479157916791779187919792079217922792379247925792679277928792979307931793279337934793579367937793879397940794179427943794479457946794779487949795079517952795379547955795679577958795979607961796279637964796579667967796879697970797179727973797479757976797779787979798079817982798379847985798679877988798979907991799279937994799579967997799879998000800180028003800480058006800780088009801080118012801380148015801680178018801980208021802280238024802580268027802880298030803180328033803480358036803780388039804080418042804380448045804680478048804980508051805280538054805580568057805880598060806180628063806480658066806780688069807080718072807380748075807680778078807980808081808280838084808580868087808880898090809180928093809480958096809780988099810081018102810381048105810681078108810981108111811281138114811581168117811881198120812181228123812481258126812781288129813081318132813381348135813681378138813981408141814281438144814581468147814881498150815181528153815481558156815781588159816081618162816381648165816681678168816981708171817281738174817581768177817881798180818181828183818481858186818781888189819081918192819381948195819681978198819982008201820282038204820582068207820882098210821182128213821482158216821782188219822082218222822382248225822682278228822982308231823282338234823582368237823882398240824182428243824482458246824782488249825082518252825382548255825682578258825982608261826282638264826582668267826882698270827182728273827482758276827782788279828082818282828382848285828682878288828982908291829282938294829582968297829882998300830183028303830483058306830783088309831083118312831383148315831683178318831983208321832283238324832583268327832883298330833183328333833483358336833783388339834083418342834383448345834683478348834983508351835283538354835583568357835883598360836183628363836483658366836783688369837083718372837383748375837683778378837983808381838283838384838583868387838883898390839183928393839483958396839783988399840084018402840384048405
  1. /****************************************************************/
  2. /* */
  3. /* ApplicationDlg.cpp */
  4. /* */
  5. /* Implementation of the CDBServerDlg class. */
  6. /* This class is a part of the Date Server. */
  7. /* */
  8. /* Programmed by LYFZ van der Meer */
  9. /* Copyright LYFZ Software Solutions 2002 */
  10. /* http://www.LYFZvandermeer.nl */
  11. /* */
  12. /* Last updated: 10 july 2002 */
  13. /* */
  14. /****************************************************************/
  15. //在ApplicationDlg.cpp文件中实现主窗口界面的设计。及其主窗口相应控件的功能和参数的映射。 D4F876E2-w78F-22D5-q98A-Y0B0D07B847C
  16. #include "stdafx.h"
  17. #include "DBServer.h"
  18. #include "theDBServer.h"
  19. #include "DBServerDlg.h"
  20. //#include "UserAccountsDlg.h"
  21. //#include "WizardPages.h"
  22. #include "AboutDlg.h"
  23. #include <afxpriv.h>
  24. #include <process.h>
  25. //#include "Shlwapi.h"
  26. #include "ClientCenter.h"
  27. #include "MyLock.h"
  28. #include "mysqldata.h"
  29. #include "./helper/ffsco.h"
  30. //#include <tlhelp32.h>
  31. #include "ShowPic3.h"
  32. #include "my32.h"
  33. #include "SoftKey.h"
  34. #include "DogTimeOutDlg.h"
  35. #include "InputAuthDlg.h"
  36. #include "AdoImplSvr.h"
  37. #include "CreateSmallPhoto.h"
  38. #include "PhotoBackupMgr.h"
  39. #include <WinSvc.h>
  40. #include "ConnectThread.h"
  41. #pragma comment(lib, "NETAPI32.LIB ")
  42. #include "SelYear.h"
  43. #include "BranchInfo.h"
  44. using namespace helper_coffs;
  45. /*********ErrorExit(...)函数头文件************/
  46. //#include <strsafe.h>
  47. /***********************************/
  48. #ifdef _DEBUG
  49. #define new DEBUG_NEW
  50. #undef THIS_FILE
  51. static char THIS_FILE[] = __FILE__;
  52. #endif
  53. #define LIMITCOUNT 1 //历史数据每次转10个 autorun
  54. extern BOOL g_bSteal;
  55. extern BOOL g_bConvertHisAll;
  56. extern CDBServer theApp;
  57. extern CtheDBServer theServer;
  58. #define WM_ICON_NOTIFY WM_USER+12
  59. CDBServerDlg *g_pMainWnd = NULL;
  60. //#define IPC_CUSTOM_MSG2 _T("{D4F876E2-w78F-22D5-q98A-Y0B0D07B847C}")
  61. #define IPC_CUSTOM_MSG2 _T("{E4F876E2-Q78F-22D5-C98A-Y0B0D07B847C}")
  62. UINT g_wmClose = RegisterWindowMessage(IPC_CUSTOM_MSG2);
  63. //extern BOOL EncryptFile2(BYTE *buffer, DWORD leng, PCHAR szPassword);
  64. //extern CStringArray g_conniparray;
  65. CArray<CDatabase*, CDatabase*>g_pHistoryDBarray[200];
  66. CDatabase *g_pDB[200];
  67. CConnectThread *g_pThreadPt[200];
  68. int g_nDBCount = 0;
  69. /////////////////////////////////////////////////////////////////////////////
  70. // CDBServerDlg dialog
  71. #pragma comment(lib, "Shlwapi.lib")
  72. extern DWORD g_nSendCode;
  73. extern BOOL g_bReturned;
  74. static UINT auIDStatusBar[] =
  75. {
  76. ID_SEPARATOR,
  77. ID_INDICATOR_DATA_RECEIVED,
  78. ID_INDICATOR_DATA_SEND,
  79. ID_INDICATOR_ONLINELED,
  80. ID_INDICATOR_OFFLINELED
  81. };
  82. /********************************************************************/
  83. /* */
  84. /* Function name : CDBServerDlg::CDBServerDlg */
  85. /* Description : Constructor */
  86. /* */
  87. /********************************************************************/
  88. CDBServerDlg::CDBServerDlg(CWnd* pParent /*=NULL*/): CDialog(CDBServerDlg::IDD, pParent)
  89. {
  90. m_hIcon = AfxGetApp()->LoadIcon(IDI_DBServer);
  91. m_bTerminate = false;
  92. m_bRunning = false;
  93. m_hThread = NULL;
  94. hInst = NULL;
  95. CString version = _T("Version 1.0");
  96. g_bAutoRun = AfxGetApp()->GetProfileInt(version, "brun", 0);
  97. m_hExitCheckSvc = NULL;
  98. m_hWaitTimeOut = NULL;
  99. m_hCheckSvcThread = NULL;
  100. m_bStartCheckSvc = FALSE;
  101. for (int i = 0; i < 200; i++)
  102. {
  103. g_pDB[i] = NULL;
  104. g_pThreadPt[i] = NULL;
  105. }
  106. }
  107. /********************************************************************/
  108. /* */
  109. /* Function name : CDBServerDlg::~CDBServerDlg */
  110. /* Description : Destructor */
  111. /* */
  112. /********************************************************************/
  113. CDBServerDlg::~CDBServerDlg()
  114. {
  115. for (int i = 0; i < 200; i++)
  116. {
  117. CDatabase *db = g_pDB[i];
  118. if (db)
  119. {
  120. db->Close();
  121. delete db;
  122. }
  123. for (int j = 0; j < g_pHistoryDBarray[i].GetSize(); j++)
  124. {
  125. CDatabase *db = g_pHistoryDBarray[i].ElementAt(j);
  126. if (db)
  127. {
  128. db->Close();
  129. delete db;
  130. }
  131. }
  132. g_pHistoryDBarray[i].RemoveAll();
  133. }
  134. }
  135. /********************************************************************/
  136. /* */
  137. /* Function name : CDBServerDlg::DoDataExchange */
  138. /* Description : Called by the framework to exchange and validate */
  139. /* dialog data. */
  140. /* */
  141. /********************************************************************/
  142. void CDBServerDlg::DoDataExchange(CDataExchange* pDX)
  143. {
  144. CDialog::DoDataExchange(pDX);
  145. //{{AFX_DATA_MAP(CDBServerDlg)
  146. DDX_Control(pDX, IDC_INFOBAR, m_InfobarCtrl);
  147. DDX_Control(pDX, IDC_OUTLOOKBAR, m_OutlookBar);
  148. //}}AFX_DATA_MAP
  149. }
  150. BEGIN_MESSAGE_MAP(CDBServerDlg, CDialog)
  151. //{{AFX_MSG_MAP(CDBServerDlg)
  152. ON_WM_DESTROY()
  153. ON_COMMAND(ID_SERVER_START, OnServerStart)
  154. ON_UPDATE_COMMAND_UI(ID_SERVER_START, OnUpdateServerStart)
  155. ON_COMMAND(ID_SERVER_STOP, OnServerStop)
  156. ON_UPDATE_COMMAND_UI(ID_SERVER_STOP, OnUpdateServerStop)
  157. ON_COMMAND(ID_SERVER_EXIT, OnServerExit)
  158. ON_NOTIFY(NM_CLICK, IDC_OUTLOOKBAR, OnClickOutlookBar)
  159. ON_NOTIFY(LVN_KEYDOWN, IDC_OUTLOOKBAR, OnKeydownOutlookBar)
  160. ON_COMMAND(ID_USER_ACCOUNTS, OnUserAccounts)
  161. ON_WM_CLOSE()
  162. ON_COMMAND(IDC_VIEW_TRACE, OnViewTrace)
  163. ON_COMMAND(IDC_VIEW_ONLINE_USERS, OnViewOnlineUsers)
  164. ON_COMMAND(IDC_VIEW_CONFIGURATION, OnViewConfiguration)
  165. ON_UPDATE_COMMAND_UI(IDC_VIEW_TRACE, OnUpdateViewTrace)
  166. ON_UPDATE_COMMAND_UI(IDC_VIEW_ONLINE_USERS, OnUpdateViewOnlineUsers)
  167. ON_UPDATE_COMMAND_UI(IDC_VIEW_CONFIGURATION, OnUpdateViewConfiguration)
  168. ON_COMMAND(IDC_VIEW_STATISTICS, OnViewStatistics)
  169. ON_UPDATE_COMMAND_UI(IDC_VIEW_STATISTICS, OnUpdateViewStatistics)
  170. ON_COMMAND(IDC_VIEW_SECURITY, OnViewSecurity)
  171. ON_UPDATE_COMMAND_UI(IDC_VIEW_SECURITY, OnUpdateViewSecurity)
  172. ON_COMMAND(ID_ACCOUNT_WIZARD, OnAccountWizard)
  173. ON_WM_TIMER()
  174. ON_COMMAND(IDM_OPEN, OnOpen)
  175. ON_COMMAND(IDM_EXIT, OnExit)
  176. ON_COMMAND(IDM_AUTORUN, OnAutorun)
  177. ON_COMMAND(IDM_STARTBAKSVC, OnStartBackupSvc)
  178. ON_COMMAND(IDM_STARTDELSVC, OnStartDelPhotoSvc)
  179. ON_COMMAND(IDM_STOPBAKSVC, OnStopBackupSvc)
  180. ON_COMMAND(IDM_STOPDELSVC, OnStopDelPhotoSvc)
  181. ON_COMMAND(IDM_AUTOCHECKSVC, OnAutoCheckSvc)
  182. //}}AFX_MSG_MAP
  183. ON_MESSAGE(WM_ICON_NOTIFY, OnTrayNotification)
  184. ON_REGISTERED_MESSAGE(g_wmClose, OnAbortClose)
  185. END_MESSAGE_MAP()
  186. LRESULT CDBServerDlg::OnAbortClose(WPARAM wParam, LPARAM lParam)
  187. {
  188. if (wParam == 2)
  189. {
  190. WriteLogin("连接失败,服务将重启");
  191. OnExit2();
  192. }
  193. else if (wParam == 3)//更新分店
  194. {
  195. LoadBranchInfo();
  196. }
  197. return 1;
  198. }
  199. BOOL CDBServerDlg::OnInitDialog()
  200. {
  201. g_pMainWnd = this;
  202. CDialog::OnInitDialog();
  203. char server[50];
  204. DWORD leng = 50;
  205. ::GetComputerName(server, &leng);
  206. g_localip = server;
  207. MyGetIPByName(g_localip);
  208. // setup listview ctrl, so that it looks like the outbar control
  209. SetupOutlookBar();
  210. // Add statusbar to the dialog
  211. CreateStatusbar();
  212. CRect rect;
  213. GetDlgItem(IDC_STATIC1)->GetWindowRect(rect);
  214. ScreenToClient(rect);
  215. rect.right += 4;
  216. GetDlgItem(IDC_STATIC1)->MoveWindow(rect);
  217. // create property pages
  218. m_TracePage.Create(IDD_PROPPAGE_TRACE, this);
  219. m_OnlineUsersPage.Create(IDD_PROPPAGE_ONLINE, this);
  220. m_ConfigurationPage.Create(IDD_PROPPAGE_CONFIGURATION, this);
  221. m_StatisticsPage.Create(IDD_PROPPAGE_STATISTICS, this);
  222. m_SecurityPage.Create(IDD_PROPPAGE_SECURITY, this);
  223. // activate main page
  224. ActivatePage(0);
  225. // Set the icon for this dialog.
  226. SetIcon(m_hIcon, TRUE); // Set big icon
  227. SetIcon(m_hIcon, FALSE); // Set small icon
  228. // get registry values
  229. ENCODE_START
  230. #ifndef _DEBUG
  231. #ifdef TIMEDOG_VERSION
  232. try
  233. {
  234. CheckRegCode(); // 检查注册码;
  235. DWORD id;
  236. TCHAR HKey[50]="ffffffff",LKey[50]="ffffffff";
  237. TCHAR OutTime[50];
  238. TCHAR DevicePath[ 260];
  239. if(FindPort(0,DevicePath)!=0)
  240. exit(1);
  241. //LIBC.LIB,libcp.lib,msvcprt.lib
  242. TCHAR year[10],month[10],day[10],hour[10],minute[10],second[10];
  243. ReadTimeAuthFromEprom(HKey,LKey, OutTime, &id, 30128, HKey, LKey, DevicePath);
  244. CString str=OutTime;
  245. CString temp="年";
  246. int pos=str.Find (temp);
  247. temp=str.Left (pos);
  248. str=str.Right (str.GetLength ()-pos-2);
  249. strcpy(year, temp.GetBuffer (0));temp.ReleaseBuffer ();
  250. temp="月";
  251. pos=str.Find (temp);
  252. temp=str.Left (pos);
  253. str=str.Right (str.GetLength ()-pos-2);
  254. strcpy(month, temp.GetBuffer (0));temp.ReleaseBuffer ();
  255. temp="日";
  256. pos=str.Find (temp);
  257. temp=str.Left (pos);
  258. str=str.Right (str.GetLength ()-pos-2);
  259. strcpy(day, temp.GetBuffer (0));temp.ReleaseBuffer ();
  260. temp="小时";
  261. pos=str.Find (temp);
  262. temp=str.Left (pos);
  263. str=str.Right (str.GetLength ()-pos-4);
  264. strcpy(hour, temp.GetBuffer (0));temp.ReleaseBuffer ();
  265. temp="分钟";
  266. pos=str.Find (temp);
  267. temp=str.Left (pos);
  268. str=str.Right (str.GetLength ()-pos-4);
  269. strcpy(minute, temp.GetBuffer (0));temp.ReleaseBuffer ();
  270. temp="0";
  271. strcpy(second, temp.GetBuffer (0));temp.ReleaseBuffer ();
  272. long time1=ConvertStringToTimerReal(year, month, day, hour, minute, second);
  273. GetRunTimer(year, month, day, hour, minute, second, DevicePath);
  274. long time2=ConvertStringToTimerReal(year, month, day, hour, minute, second);
  275. // 软件可运行时间;
  276. g_dwSoftRunTime = time1 - time2;
  277. if( (time1-time2) <0)
  278. {
  279. AfxMessageBox("加密锁已过期, 请与经销商联系!!!");
  280. InputAuthDlg authdlg;
  281. authdlg.m_id=id;
  282. authdlg.m_time1=time1;
  283. authdlg.m_time2=time2;
  284. if(authdlg.DoModal ()!=IDOK)
  285. {
  286. CDialog::OnCancel ();
  287. return false;
  288. }
  289. }
  290. else if((time1-time2) < 288000 ) // 10天 = 10*8*3600=360000 能用天数小于10个工作日(8小时一工作日).
  291. {
  292. DogTimeOutDlg dlg;
  293. dlg.hour=(time1-time2)/3600;
  294. if(dlg.DoModal ()==IDOK)
  295. {
  296. InputAuthDlg authdlg;
  297. authdlg.m_id=id;
  298. authdlg.m_time1=time1;
  299. authdlg.m_time2=time2;
  300. authdlg.DoModal ();
  301. }
  302. }
  303. BOOL bOK=1;
  304. int d[8];double f[8];
  305. char s0[50]="",s1[50]="",s2[50]="",s3[50]="",s4[50]="",s5[50]="",s6[50]="",s7[50]="";
  306. //运行自定义函数
  307. // SoftKey ytSoftKey;
  308. int ret=0;//ytSoftKey.Ini();
  309. ret=ytSoftKey.checktime(&d[0],&d[1],&d[2],&d[3],&d[4],&d[5],&d[6],&d[7],
  310. &f[0],&f[1],&f[2],&f[3],&f[4],&f[5],&f[6],&f[7],
  311. s0,s1,s2,s3,s4,s5,s6,s7);
  312. if(ret!=0 && ret!=-43)
  313. {
  314. bOK=0;
  315. }
  316. ////////////////////////写申请码
  317. if(bOK)
  318. {
  319. str=GetRegCode(id, time1, time2);
  320. char path[MAX_PATH];
  321. ::GetSystemDirectory (path, MAX_PATH);
  322. CString sysdir=path;
  323. sysdir+="\\regcode.txt";
  324. CStdioFile fp;
  325. if(fp.Open (sysdir, CFile::modeWrite|CFile::modeCreate))
  326. {
  327. fp.WriteString (str);
  328. fp.Close ();
  329. }
  330. }
  331. /////////////////////////
  332. }
  333. catch(...)
  334. {
  335. }
  336. #endif
  337. #endif
  338. g_curdb = &g_db;
  339. ENCODE_END
  340. OnButton1(); // Jeff 初始化服务端,内含定时器1;
  341. GetFileDate(); // Jeff获取文件信息;
  342. LoadHistoryDB();//Jeff加载历史数据库;
  343. int aaaa = 15;
  344. while (aaaa--)
  345. AddOneConn();//添加数据库连接;
  346. SetTimer(2, 10, NULL);
  347. //CheckBakState();// 检查相片备份情况
  348. hInst = LoadLibrary("SENSAPI.DLL"); //加载动态库 ;
  349. if (hInst)
  350. {
  351. typedef BOOL(WINAPI *MYFUNC)(LPDWORD);
  352. MYFUNC IsNetworkConnect = NULL;
  353. //取得IsNetworkAlive函数指针
  354. IsNetworkConnect = (MYFUNC)GetProcAddress(hInst, "IsNetworkAlive");
  355. if (IsNetworkConnect)
  356. {
  357. DWORD dwActiveWan = 1;
  358. if (IsNetworkConnect(&dwActiveWan))
  359. m_bNetWorkOK = 1;
  360. else
  361. m_bNetWorkOK = 0;
  362. SetTimer(5, 10000, NULL);
  363. }
  364. else
  365. m_bNetWorkOK = 0;
  366. }
  367. else
  368. m_bNetWorkOK = 0;
  369. if ( !CBranchInfo::GetInstance() )
  370. {
  371. AfxMessageBox(_T("内存分配错误"));
  372. return FALSE;
  373. }
  374. if ( !CBranchInfo::GetInstance()->InitCatalog(g_dwDBServerPort, g_szDBSource, g_szDBAccount, g_szDBPassWord, g_szDBName) )
  375. {
  376. AfxMessageBox(_T("初始化数据库连接对象失败"));
  377. return FALSE;
  378. }
  379. CBranchInfo::GetInstance()->GetTblVersion();
  380. CBranchInfo::GetInstance()->GetTblCatalogInfo();
  381. CBranchInfo::GetInstance()->GetTblNetShareInfo();
  382. // 1小时检测一次自动备份和自动删除服务是否启动
  383. // 是否自动检查服务
  384. if(g_bAutoCheckSvc == TRUE)
  385. {
  386. m_hExitCheckSvc = CreateEvent(NULL, FALSE, FALSE, NULL);
  387. m_hWaitTimeOut = CreateEvent(NULL, FALSE, FALSE, NULL);
  388. SetEvent(m_hWaitTimeOut);
  389. unsigned int nThreadID = 0;
  390. m_bStartCheckSvc = TRUE;
  391. m_hCheckSvcThread = (HANDLE)_beginthreadex(NULL, 0, CheckSvcWork, this, 0, &nThreadID);
  392. }
  393. return TRUE;
  394. }
  395. /********************************************************************/
  396. /* */
  397. /* Function name : OnDestroy */
  398. /* Description : Handle WM_DESTROY message */
  399. /* */
  400. /********************************************************************/
  401. void CDBServerDlg::OnDestroy()
  402. {
  403. OnServerStop();
  404. KillTimer(1);
  405. KillTimer(2);
  406. KillTimer(3);
  407. KillTimer(4);
  408. KillTimer(5);
  409. KillTimer(6);
  410. KillTimer(7);
  411. KillTimer(8);
  412. CDialog::OnDestroy();
  413. }
  414. /********************************************************************/
  415. /* */
  416. /* Function name : OnServerStart */
  417. /* Description : Start Date Server -> start listening on port 21 */
  418. /* */
  419. /********************************************************************/
  420. //启动数据服务器,使其在指定端口侦听
  421. void CDBServerDlg::OnServerStart()
  422. {
  423. ServerStart();
  424. }
  425. BOOL CDBServerDlg::ServerStart()
  426. {
  427. if (theServer.Start())
  428. {
  429. m_wndStatusBar.SetPaneText(0, "数据服务已启动", TRUE);
  430. SetOnlineLed(TRUE);
  431. SetOfflineLed(FALSE);
  432. WriteLogin("启动成功");
  433. return 1;
  434. }
  435. else
  436. {
  437. WriteLogin("启动失败");
  438. CDialog::OnCancel();
  439. return 0;
  440. }
  441. }
  442. /********************************************************************/
  443. /* */
  444. /* Function name : OnUpdateServerStart */
  445. /* Description : Update 'Start' status */
  446. /* */
  447. /********************************************************************/
  448. void CDBServerDlg::OnUpdateServerStart(CCmdUI* pCmdUI)
  449. {
  450. pCmdUI->Enable(!theServer.IsActive());
  451. }
  452. /********************************************************************/
  453. /* */
  454. /* Function name : OnServerStop */
  455. /* Description : Stop Date Server */
  456. /* */
  457. /********************************************************************/
  458. //停止服务器
  459. void CDBServerDlg::OnServerStop()
  460. {
  461. theServer.Stop();
  462. m_wndStatusBar.SetPaneText(0, "数据服务已停止", TRUE);
  463. SetOnlineLed(FALSE);
  464. SetOfflineLed(TRUE);
  465. }
  466. /********************************************************************/
  467. /* */
  468. /* Function name : OnUpdateServerStop */
  469. /* Description : Update 'Stop' status */
  470. /* */
  471. /********************************************************************/
  472. void CDBServerDlg::OnUpdateServerStop(CCmdUI* pCmdUI)
  473. {
  474. pCmdUI->Enable(theServer.IsActive());
  475. }
  476. /********************************************************************/
  477. /* */
  478. /* Function name : OnServerExit */
  479. /* Description : Let's get out of here... */
  480. /* */
  481. /********************************************************************/
  482. void CDBServerDlg::OnServerExit()
  483. {
  484. OnCancel();
  485. }
  486. /********************************************************************/
  487. /* */
  488. /* Function name : CDBServerDlg::SetupOutlookBar */
  489. /* Description : Initialize listview, change color/iconspacing to */
  490. /* make it look a little bit like the outlook bar. */
  491. /* */
  492. /********************************************************************/
  493. void CDBServerDlg::SetupOutlookBar()
  494. {
  495. m_ImageList.Create(32, 32, ILC_COLOR16 | ILC_MASK, 1, 4);
  496. HICON hIcon = ::LoadIcon(AfxGetResourceHandle(), MAKEINTRESOURCE(IDI_LOG));
  497. m_ImageList.Add(hIcon);
  498. hIcon = ::LoadIcon(AfxGetResourceHandle(), MAKEINTRESOURCE(IDI_ONLINE_USERS));
  499. m_ImageList.Add(hIcon);
  500. hIcon = ::LoadIcon(AfxGetResourceHandle(), MAKEINTRESOURCE(IDI_CONFIGURATION));
  501. m_ImageList.Add(hIcon);
  502. hIcon = ::LoadIcon(AfxGetResourceHandle(), MAKEINTRESOURCE(IDI_SECURITY));
  503. m_ImageList.Add(hIcon);
  504. hIcon = ::LoadIcon(AfxGetResourceHandle(), MAKEINTRESOURCE(IDI_STATISTICS));
  505. m_ImageList.Add(hIcon);
  506. m_OutlookBar.SetImageList(&m_ImageList, LVSIL_NORMAL);
  507. CRect rc;
  508. m_OutlookBar.GetClientRect(rc);
  509. // set new icon spacing
  510. m_OutlookBar.SetIconSpacing(rc.Width(), 64);
  511. // change colors
  512. m_OutlookBar.SetTextColor(RGB(255, 255, 255));
  513. m_OutlookBar.SetTextBkColor(RGB(128, 128, 128));
  514. m_OutlookBar.SetBkColor(RGB(128, 128, 128));
  515. // insert items
  516. m_OutlookBar.InsertColumn(0, "OutlookBar");
  517. m_OutlookBar.InsertItem(0, "服务器日志", 0);
  518. m_OutlookBar.InsertItem(1, "在线用户", 1);
  519. m_OutlookBar.InsertItem(2, "关于", 2);
  520. m_OutlookBar.InsertItem(3, "功能区", 3);
  521. }
  522. /********************************************************************/
  523. /* */
  524. /* Function name : CDBServerDlg::MoveChilds */
  525. /* Description : Move child windows into place holder area. */
  526. /* */
  527. /********************************************************************/
  528. void CDBServerDlg::MoveChilds()
  529. {
  530. // position property pages
  531. CRect rcDlgs;
  532. // get dialog area rect
  533. GetDlgItem(IDC_DIALOG_AREA)->GetWindowRect(rcDlgs);
  534. ScreenToClient(rcDlgs);
  535. m_ConfigurationPage.MoveWindow(rcDlgs);
  536. m_TracePage.MoveWindow(rcDlgs);
  537. m_OnlineUsersPage.MoveWindow(rcDlgs);
  538. m_StatisticsPage.MoveWindow(rcDlgs);
  539. m_SecurityPage.MoveWindow(rcDlgs);
  540. }
  541. /********************************************************************/
  542. /* */
  543. /* Function name : CDBServerDlg::ActivatePage */
  544. /* Description : Called when an icon on the outlookbar is pressed.*/
  545. /* */
  546. /********************************************************************/
  547. void CDBServerDlg::ActivatePage(int nIndex)
  548. {
  549. switch (nIndex)
  550. {
  551. case 0:
  552. m_OnlineUsersPage.ShowWindow(SW_HIDE);
  553. m_ConfigurationPage.ShowWindow(SW_HIDE);
  554. m_StatisticsPage.ShowWindow(SW_HIDE);
  555. m_SecurityPage.ShowWindow(SW_HIDE);
  556. m_TracePage.ShowWindow(SW_SHOW);
  557. m_InfobarCtrl.SetText("服务器日志");
  558. break;
  559. case 1:
  560. m_TracePage.ShowWindow(SW_HIDE);
  561. m_ConfigurationPage.ShowWindow(SW_HIDE);
  562. m_StatisticsPage.ShowWindow(SW_HIDE);
  563. m_SecurityPage.ShowWindow(SW_HIDE);
  564. m_OnlineUsersPage.RefreshData();
  565. m_OnlineUsersPage.ShowWindow(SW_SHOW);
  566. m_InfobarCtrl.SetText("在线用户");
  567. break;
  568. case 2:
  569. m_OnlineUsersPage.ShowWindow(SW_HIDE);
  570. m_TracePage.ShowWindow(SW_HIDE);
  571. m_StatisticsPage.ShowWindow(SW_HIDE);
  572. m_SecurityPage.ShowWindow(SW_HIDE);
  573. m_ConfigurationPage.ShowWindow(SW_SHOW);
  574. m_InfobarCtrl.SetText("关于");
  575. break;
  576. case 4:
  577. m_OnlineUsersPage.ShowWindow(SW_HIDE);
  578. m_TracePage.ShowWindow(SW_HIDE);
  579. m_ConfigurationPage.ShowWindow(SW_HIDE);
  580. m_SecurityPage.ShowWindow(SW_HIDE);
  581. m_StatisticsPage.ShowWindow(SW_SHOW);
  582. m_InfobarCtrl.SetText("Statistics");
  583. break;
  584. case 3:
  585. m_OnlineUsersPage.ShowWindow(SW_HIDE);
  586. m_TracePage.ShowWindow(SW_HIDE);
  587. m_ConfigurationPage.ShowWindow(SW_HIDE);
  588. m_SecurityPage.ShowWindow(SW_SHOW);
  589. m_StatisticsPage.ShowWindow(SW_HIDE);
  590. m_InfobarCtrl.SetText("功能区");
  591. break;
  592. default:
  593. break;
  594. }
  595. MoveChilds();
  596. }
  597. /********************************************************************/
  598. /* */
  599. /* Function name : CDBServerDlg::OnClickOutlookBar */
  600. /* Description : User clicked on our listview -> activate page. */
  601. /* */
  602. /********************************************************************/
  603. void CDBServerDlg::OnClickOutlookBar(NMHDR* pNMHDR, LRESULT* pResult)
  604. {
  605. // get index of selected item
  606. int nIndex = m_OutlookBar.GetNextItem(-1, LVNI_ALL | LVNI_SELECTED);
  607. if (nIndex == -1)
  608. return;
  609. ActivatePage(nIndex);
  610. *pResult = 0;
  611. }
  612. /********************************************************************/
  613. /* */
  614. /* Function name : CDBServerDlg::OnKeydownOutlookBar */
  615. /* Description : User pressed a key -> activate page. */
  616. /* */
  617. /********************************************************************/
  618. void CDBServerDlg::OnKeydownOutlookBar(NMHDR* pNMHDR, LRESULT* pResult)
  619. {
  620. LV_KEYDOWN* pLVKeyDow = (LV_KEYDOWN*)pNMHDR;
  621. // get index of selected item
  622. int nIndex = m_OutlookBar.GetNextItem(-1, LVNI_ALL | LVNI_SELECTED);
  623. if (nIndex == -1)
  624. return;
  625. if (pLVKeyDow->wVKey == VK_DOWN)
  626. {
  627. if (m_OutlookBar.GetItemCount() - 1 > nIndex)
  628. {
  629. ActivatePage(nIndex + 1);
  630. }
  631. }
  632. else
  633. if (pLVKeyDow->wVKey == VK_UP)
  634. {
  635. if (nIndex > 0)
  636. {
  637. ActivatePage(nIndex - 1);
  638. }
  639. }
  640. else
  641. if (pLVKeyDow->wVKey == VK_NEXT)
  642. {
  643. ActivatePage(m_OutlookBar.GetItemCount() - 1);
  644. }
  645. else
  646. if (pLVKeyDow->wVKey == VK_PRIOR)
  647. {
  648. ActivatePage(0);
  649. }
  650. *pResult = 0;
  651. }
  652. /********************************************************************/
  653. /* */
  654. /* Function name : CreateStatusbar */
  655. /* Description : This function creates a statusbar on a dialogbox.*/
  656. /* */
  657. /********************************************************************/
  658. BOOL CDBServerDlg::CreateStatusbar()
  659. {
  660. // Create the Toolbar and attach the resource
  661. if (!m_wndToolBar.Create(this) || !m_wndToolBar.LoadToolBar(IDR_TOOLBAR1))
  662. {
  663. TRACE0("Failed to Create Dialog Toolbar\n");
  664. return FALSE;
  665. }
  666. m_wndToolBar.SetBarStyle(m_wndToolBar.GetBarStyle() | CBRS_SIZE_DYNAMIC | CBRS_TOOLTIPS | CBRS_FLYBY);
  667. // Make it flat.
  668. m_wndToolBar.ModifyStyle(0, m_wndToolBar.GetStyle() | TBSTYLE_FLAT);
  669. // Create status bar at the bottom of the dialog window
  670. if (m_wndStatusBar.Create(this))
  671. {
  672. m_wndStatusBar.SetIndicators(auIDStatusBar, sizeof(auIDStatusBar) / sizeof(UINT));
  673. m_wndStatusBar.SetPaneText(0, "Date Server is offline", TRUE);
  674. // Make a sunken or recessed border around the first pane
  675. m_wndStatusBar.SetPaneInfo(0, m_wndStatusBar.GetItemID(0), SBPS_STRETCH, NULL);
  676. SetOnlineLed(FALSE);
  677. SetOfflineLed(FALSE);
  678. m_wndStatusBar.SetPaneInfo(m_wndStatusBar.CommandToIndex(ID_INDICATOR_ONLINELED), ID_INDICATOR_ONLINELED, SBPS_NOBORDERS, 14);
  679. // m_wndStatusBar.GetStatusBarCtrl().SetTipText(m_wndStatusBar.CommandToIndex(ID_INDICATOR_ONLINELED), "This status light is green when the server is online");
  680. m_wndStatusBar.SetPaneInfo(m_wndStatusBar.CommandToIndex(ID_INDICATOR_OFFLINELED), ID_INDICATOR_OFFLINELED, SBPS_NOBORDERS, 14);
  681. // m_wndStatusBar.GetStatusBarCtrl().SetTipText(m_wndStatusBar.CommandToIndex(ID_INDICATOR_OFFLINELED), "This status light is green when the server is online");
  682. }
  683. // We need to resize the dialog to make room for control bars.
  684. // First, figure out how big the control bars are.
  685. CRect rcClientStart;
  686. CRect rcClientNow;
  687. GetClientRect(rcClientStart);
  688. RepositionBars(AFX_IDW_CONTROLBAR_FIRST, AFX_IDW_CONTROLBAR_LAST, 0, reposQuery, rcClientNow);
  689. // Now move all the controls so they are in the same relative
  690. // position within the remaining client area as they would be
  691. // with no control bars.
  692. CPoint ptOffset(rcClientNow.left - rcClientStart.left, rcClientNow.top - rcClientStart.top);
  693. CRect rcChild;
  694. CWnd* pwndChild = GetWindow(GW_CHILD);
  695. while (pwndChild)
  696. {
  697. pwndChild->GetWindowRect(rcChild);
  698. ScreenToClient(rcChild);
  699. rcChild.OffsetRect(ptOffset);
  700. pwndChild->MoveWindow(rcChild, FALSE);
  701. pwndChild = pwndChild->GetNextWindow();
  702. }
  703. // Adjust the dialog window dimensions
  704. CRect rcWindow;
  705. GetWindowRect(rcWindow);
  706. rcWindow.right += rcClientStart.Width() - rcClientNow.Width();
  707. rcWindow.bottom += rcClientStart.Height() - rcClientNow.Height();
  708. MoveWindow(rcWindow, FALSE);
  709. // And position the control bars
  710. RepositionBars(AFX_IDW_CONTROLBAR_FIRST, AFX_IDW_CONTROLBAR_LAST, 0);
  711. return TRUE;
  712. }
  713. /********************************************************************/
  714. /* */
  715. /* Function name : OnUserAccounts */
  716. /* Description : Show user accounts. */
  717. /* */
  718. /********************************************************************/
  719. void CDBServerDlg::OnUserAccounts()
  720. {
  721. /*
  722. CUserAccountsDlg dlg;
  723. theServer.m_UserManager.GetUserList(dlg.m_UserArray);
  724. if (dlg.DoModal() == IDOK)
  725. {
  726. theServer.m_UserManager.UpdateUserList(dlg.m_UserArray);
  727. }*/
  728. }
  729. /********************************************************************/
  730. /* */
  731. /* Function name : OnFTPUserConnected */
  732. /* Description : A user has connected to our server. */
  733. /* */
  734. /********************************************************************/
  735. void CDBServerDlg::OnFTPUserConnected(DWORD nThreadID, LPCTSTR lpszUser, LPCSTR lpszAddress)
  736. {
  737. m_OnlineUsersPage.AddUser(nThreadID, lpszUser, lpszAddress);
  738. }
  739. /********************************************************************/
  740. /* */
  741. /* Function name : OnFTPUserDisconnected */
  742. /* Description : A user has disconnected from our server. */
  743. /* */
  744. /********************************************************************/
  745. void CDBServerDlg::OnFTPUserDisconnected(DWORD nThreadID, LPCTSTR lpszUser)
  746. {
  747. m_OnlineUsersPage.RemoveUser(nThreadID);
  748. }
  749. /********************************************************************/
  750. /* */
  751. /* Function name : OnFTPStatusChange */
  752. /* Description : FTP Status changed. */
  753. /* */
  754. /********************************************************************/
  755. void CDBServerDlg::OnFTPStatusChange(int nType, LPCTSTR lpszText)
  756. {
  757. m_TracePage.AddTraceLine(nType, lpszText);
  758. switch (nType)
  759. {
  760. case 3:
  761. theApp.m_LogFile << error_lvl << date << time << lpszText << endl;
  762. break;
  763. default:
  764. theApp.m_LogFile << trace_lvl << date << time << lpszText << endl;
  765. break;
  766. }
  767. }
  768. /********************************************************************/
  769. /* */
  770. /* Function name : OnFTPReceivedBytesChange */
  771. /* Description : Number of received bytes has changed. */
  772. /* */
  773. /********************************************************************/
  774. void CDBServerDlg::OnFTPReceivedBytesChange(int nBytes)
  775. {
  776. m_StatisticsPage.SetValue(6, FormatSize(nBytes, 0));
  777. CString strStatus;
  778. strStatus.Format("%s received", FormatSize(nBytes, 0));
  779. m_wndStatusBar.SetPaneText(m_wndStatusBar.CommandToIndex(ID_INDICATOR_DATA_RECEIVED), strStatus, TRUE);
  780. CClientDC dc(this);
  781. CSize size = dc.GetTextExtent(strStatus);
  782. m_wndStatusBar.SetPaneInfo(m_wndStatusBar.CommandToIndex(ID_INDICATOR_DATA_RECEIVED), ID_INDICATOR_DATA_RECEIVED, SBPS_NORMAL, size.cx);
  783. }
  784. /********************************************************************/
  785. /* */
  786. /* Function name : OnFTPSentBytesChange */
  787. /* Description : Number of sent bytes has changed. */
  788. /* */
  789. /********************************************************************/
  790. void CDBServerDlg::OnFTPSentBytesChange(int nBytes)
  791. {
  792. m_StatisticsPage.SetValue(7, FormatSize(nBytes, 0));
  793. CString strStatus;
  794. strStatus.Format("%s sent", FormatSize(nBytes, 0));
  795. m_wndStatusBar.SetPaneText(m_wndStatusBar.CommandToIndex(ID_INDICATOR_DATA_SEND), strStatus, TRUE);
  796. CClientDC dc(this);
  797. CSize size = dc.GetTextExtent(strStatus);
  798. m_wndStatusBar.SetPaneInfo(m_wndStatusBar.CommandToIndex(ID_INDICATOR_DATA_SEND), ID_INDICATOR_DATA_SEND, SBPS_NORMAL, size.cx);
  799. }
  800. /********************************************************************/
  801. /* */
  802. /* Function name : OnViewTrace */
  803. /* Description : Handle menu selection. */
  804. /* */
  805. /********************************************************************/
  806. void CDBServerDlg::OnViewTrace()
  807. {
  808. ActivatePage(0);
  809. }
  810. /********************************************************************/
  811. /* */
  812. /* Function name : OnViewOnlineUsers */
  813. /* Description : Handle menu selection. */
  814. /* */
  815. /********************************************************************/
  816. void CDBServerDlg::OnViewOnlineUsers()
  817. {
  818. ActivatePage(1);
  819. }
  820. /********************************************************************/
  821. /* */
  822. /* Function name : OnViewConfiguration */
  823. /* Description : Handle menu selection. */
  824. /* */
  825. /********************************************************************/
  826. void CDBServerDlg::OnViewConfiguration()
  827. {
  828. ActivatePage(2);
  829. }
  830. /********************************************************************/
  831. /* */
  832. /* Function name : OnViewStatistics */
  833. /* Description : Handle menu selection. */
  834. /* */
  835. /********************************************************************/
  836. void CDBServerDlg::OnViewStatistics()
  837. {
  838. ActivatePage(3);
  839. }
  840. /********************************************************************/
  841. /* */
  842. /* Function name : OnViewSecurity */
  843. /* Description : Handle menu selection. */
  844. /* */
  845. /********************************************************************/
  846. void CDBServerDlg::OnViewSecurity()
  847. {
  848. ActivatePage(4);
  849. }
  850. /********************************************************************/
  851. /* */
  852. /* Function name : OnUpdateViewTrace */
  853. /* Description : Update menu state of Trace item. */
  854. /* */
  855. /********************************************************************/
  856. void CDBServerDlg::OnUpdateViewTrace(CCmdUI* pCmdUI)
  857. {
  858. pCmdUI->SetRadio(m_TracePage.IsWindowVisible());
  859. }
  860. /********************************************************************/
  861. /* */
  862. /* Function name : OnUpdateViewOnlineUsers */
  863. /* Description : Update menu state of Online Users item. */
  864. /* */
  865. /********************************************************************/
  866. void CDBServerDlg::OnUpdateViewOnlineUsers(CCmdUI* pCmdUI)
  867. {
  868. pCmdUI->SetRadio(m_OnlineUsersPage.IsWindowVisible());
  869. }
  870. /********************************************************************/
  871. /* */
  872. /* Function name : OnUpdateViewConfiguration */
  873. /* Description : Update menu state of Configuration item. */
  874. /* */
  875. /********************************************************************/
  876. void CDBServerDlg::OnUpdateViewConfiguration(CCmdUI* pCmdUI)
  877. {
  878. pCmdUI->SetRadio(m_ConfigurationPage.IsWindowVisible());
  879. }
  880. /********************************************************************/
  881. /* */
  882. /* Function name : OnUpdateViewStatistics */
  883. /* Description : Update menu state of Statistics item. */
  884. /* */
  885. /********************************************************************/
  886. void CDBServerDlg::OnUpdateViewStatistics(CCmdUI* pCmdUI)
  887. {
  888. pCmdUI->SetRadio(m_StatisticsPage.IsWindowVisible());
  889. }
  890. /********************************************************************/
  891. /* */
  892. /* Function name : OnUpdateViewSecurity */
  893. /* Description : Update menu state of Security item. */
  894. /* */
  895. /********************************************************************/
  896. void CDBServerDlg::OnUpdateViewSecurity(CCmdUI* pCmdUI)
  897. {
  898. pCmdUI->SetRadio(m_SecurityPage.IsWindowVisible());
  899. }
  900. /********************************************************************/
  901. /* */
  902. /* Function name : SetOnlineLed */
  903. /* Description : Turn online LED on/off. */
  904. /* */
  905. /********************************************************************/
  906. void CDBServerDlg::SetOnlineLed(BOOL bOnline)
  907. {
  908. HICON hIcon = (HICON)::LoadImage(AfxGetInstanceHandle(),
  909. bOnline ? MAKEINTRESOURCE(IDI_LED_GREEN) : MAKEINTRESOURCE(IDI_LED_OFF),
  910. IMAGE_ICON, 16, 16, LR_SHARED);
  911. m_wndStatusBar.GetStatusBarCtrl().SetIcon(m_wndStatusBar.CommandToIndex(ID_INDICATOR_ONLINELED), hIcon);
  912. m_wndStatusBar.GetStatusBarCtrl().Invalidate();
  913. m_wndStatusBar.GetStatusBarCtrl().UpdateWindow();
  914. DestroyIcon(hIcon);
  915. }
  916. /********************************************************************/
  917. /* */
  918. /* Function name : SetOfflineLed */
  919. /* Description : Turn offline LED on/off. */
  920. /* */
  921. /********************************************************************/
  922. void CDBServerDlg::SetOfflineLed(BOOL bOffline)
  923. {
  924. HICON hIcon = (HICON)::LoadImage(AfxGetInstanceHandle(),
  925. bOffline ? MAKEINTRESOURCE(IDI_LED_RED) : MAKEINTRESOURCE(IDI_LED_OFF),
  926. IMAGE_ICON, 16, 16, LR_SHARED);
  927. m_wndStatusBar.GetStatusBarCtrl().SetIcon(m_wndStatusBar.CommandToIndex(ID_INDICATOR_OFFLINELED), hIcon);
  928. m_wndStatusBar.GetStatusBarCtrl().Invalidate();
  929. m_wndStatusBar.GetStatusBarCtrl().UpdateWindow();
  930. DestroyIcon(hIcon);
  931. }
  932. void CDBServerDlg::OnFTPStatisticChange(int nType, int nValue)
  933. {
  934. m_StatisticsPage.SetValue(nType, nValue);
  935. }
  936. /********************************************************************/
  937. /* */
  938. /* Function name : FormatSize */
  939. /* Description : Format size, the way explorer diplays it */
  940. /* */
  941. /********************************************************************/
  942. char* CDBServerDlg::FormatSize(DWORD dwSizeLow, DWORD dwSizeHigh)
  943. {
  944. static char szBuff[100];
  945. unsigned __int64 nFileSize = ((unsigned __int64)(((DWORD)(dwSizeLow)) |
  946. ((unsigned __int64)((DWORD)(dwSizeHigh))) << 32));
  947. unsigned __int64 kb = 0;
  948. if (nFileSize > 1024)
  949. {
  950. kb = nFileSize / 1024;
  951. if (nFileSize % 1024)
  952. kb++;
  953. }
  954. // make it a string
  955. _ui64tot(kb, szBuff, 10);
  956. // add thousand seperators
  957. int nLength = lstrlen(szBuff);
  958. if (nLength > 3)
  959. {
  960. LPCTSTR ptr = szBuff;
  961. ptr += (nLength - 1);
  962. char szTemp[100];
  963. LPTSTR ptrTemp = szTemp;
  964. for (int i = 0; i < nLength; i++)
  965. {
  966. if (i && ((i % 3) == 0))
  967. {
  968. if (*ptrTemp != ',')
  969. {
  970. *ptrTemp = ',';
  971. ptrTemp = _tcsinc(ptrTemp);
  972. }
  973. }
  974. *ptrTemp = *ptr;
  975. ptrTemp = _tcsinc(ptrTemp);
  976. ptr = _tcsdec(szBuff, ptr);
  977. }
  978. // terminate string
  979. *ptrTemp = '\0';
  980. // reverse string
  981. _tcsrev(szTemp);
  982. lstrcpy(szBuff, szTemp);
  983. }
  984. // add 'KB' to it
  985. lstrcat(szBuff, " KB");
  986. return szBuff;
  987. }
  988. /********************************************************************/
  989. /* */
  990. /* Function name : OnAccountWizard */
  991. /* Description : Launch New Account Wizard */
  992. /* */
  993. /********************************************************************/
  994. void CDBServerDlg::OnAccountWizard()
  995. {/*
  996. CBitmap bmpHeader, bmpWatermark;
  997. VERIFY(bmpHeader.LoadBitmap(IDB_BANNER));
  998. VERIFY(bmpWatermark.LoadBitmap(IDB_WATERMARK));
  999. // show windows 2000-like wizard
  1000. CWizardSheet wizSheet("New Account Wizard", this, 0, bmpWatermark, NULL, bmpHeader);
  1001. wizSheet.m_psh.hInstance = ::GetModuleHandle(NULL);
  1002. if (wizSheet.DoModal() == ID_WIZFINISH)
  1003. {
  1004. CArray<CUser, CUser&> m_UserArray;
  1005. theServer.m_UserManager.GetUserList(m_UserArray);
  1006. int nIndex = -1;
  1007. for (int i = 0; i < m_UserArray.GetSize(); i++)
  1008. {
  1009. // if it already exists -> update it
  1010. if (m_UserArray[i].m_strName.CompareNoCase(wizSheet.m_Page1.m_strAccountName) == 0)
  1011. {
  1012. nIndex = i;
  1013. break;
  1014. }
  1015. }
  1016. // add new account ?
  1017. if (nIndex == -1)
  1018. {
  1019. CUser user;
  1020. nIndex = m_UserArray.Add(user);
  1021. }
  1022. m_UserArray[nIndex].m_bAccountDisabled = FALSE;
  1023. m_UserArray[nIndex].m_strName = wizSheet.m_Page1.m_strAccountName;
  1024. m_UserArray[nIndex].m_strPassword = wizSheet.m_Page2.m_strPassword;
  1025. // add home directory
  1026. CDirectory directory;
  1027. directory.m_strDir = wizSheet.m_Page3.m_strHomeDirectory;
  1028. directory.m_strAlias = "";
  1029. directory.m_bIsHomeDir = TRUE;
  1030. directory.m_bAllowCreateDirectory = wizSheet.m_Page4.m_bAllowCreateDirectory;
  1031. directory.m_bAllowDelete = wizSheet.m_Page4.m_bAllowDelete;
  1032. directory.m_bAllowDownload = wizSheet.m_Page4.m_bAllowDownload;
  1033. directory.m_bAllowRename = wizSheet.m_Page4.m_bAllowRename;
  1034. directory.m_bAllowUpload = wizSheet.m_Page4.m_bAllowUpload;
  1035. directory.m_strAlias = "";
  1036. m_UserArray[nIndex].m_DirectoryArray.Add(directory);
  1037. // update
  1038. theServer.m_UserManager.UpdateUserList(m_UserArray);
  1039. }*/
  1040. }
  1041. void CDBServerDlg::OnCancel()
  1042. {
  1043. }
  1044. void CDBServerDlg::OnOK()
  1045. {
  1046. }
  1047. void CDBServerDlg::OnButton1() // 启动服务;
  1048. {
  1049. // TODO: Add your control notification handler code here
  1050. try
  1051. {
  1052. theServer.Initialize(this);
  1053. if (ServerStart() == 0)
  1054. return;
  1055. if (g_pSkinData == NULL)
  1056. InitLia();
  1057. /////////////////////
  1058. CString logdays;
  1059. MyLock lock("dbaccessxiao");
  1060. CRecordset myset(&g_db);
  1061. CString sql = "select logdays from version";
  1062. myset.Open(CRecordset::forwardOnly, sql);
  1063. myset.GetFieldValue("logdays", logdays);
  1064. myset.Close();
  1065. int days = 180;
  1066. if (logdays == "1个月")
  1067. days = 31;
  1068. else if (logdays == "2个月")
  1069. days = 61;
  1070. else if (logdays == "3个月")
  1071. days = 92;
  1072. else
  1073. days = 183;
  1074. CTime tm = CTime::GetCurrentTime();
  1075. CTimeSpan dt(240, 0, 0, 0); // Jeff 不使用days,固定使用天数;
  1076. tm -= dt;
  1077. CString date = tm.Format("%Y-%m-%d");
  1078. // 删除日志前,取消触发器;2015-06-10
  1079. sql = _T("DROP TRIGGER ON_DELETE_USER_LOGS");
  1080. g_db.ExecuteSQL(sql);
  1081. sql = "delete from [log] where [date]<'" + date + "'";
  1082. g_db.ExecuteSQL(sql);
  1083. // 删除日志后,恢复触发器;2015-06-10
  1084. sql = _T("CREATE TRIGGER ON_DELETE_USER_LOGS ON [dbo].[log] FOR DELETE AS BEGIN rollback; END");
  1085. g_db.ExecuteSQL(sql);
  1086. ///////////////////
  1087. tm = CTime::GetCurrentTime();
  1088. CTimeSpan dt2(183, 0, 0, 0);
  1089. tm -= dt2;
  1090. date = tm.Format("%Y%m%d%H%M%S");
  1091. sql = "delete from sendreg where [status]='OK' and [timestamp]<'" + date + "'";
  1092. g_db.ExecuteSQL(sql);
  1093. //////////////////////////////////
  1094. sql = "select version from version";
  1095. myset.Open(CRecordset::forwardOnly, sql);
  1096. myset.GetFieldValue("version", sql);
  1097. myset.Close();
  1098. m_ConfigurationPage.m_versionno = sql;
  1099. m_ConfigurationPage.UpdateData(0);
  1100. /////////////////////
  1101. }
  1102. catch (CException *e)
  1103. {
  1104. TCHAR szError[1024] = { 0 };
  1105. e->GetErrorMessage(szError, 1024);
  1106. WriteLogin(CString(szError));
  1107. e->Delete();
  1108. }
  1109. }
  1110. void CDBServerDlg::OnClose()
  1111. {
  1112. m_TrayIcon.Create(this, WM_ICON_NOTIFY, "影楼管理系统服务器", m_hIcon, IDR_MENUtray); //构造
  1113. ShowWindow(SW_HIDE); //隐藏窗口
  1114. }
  1115. LRESULT CDBServerDlg::OnTrayNotification(WPARAM wParam, LPARAM lParam)
  1116. {
  1117. return m_TrayIcon.OnTrayNotification(wParam, lParam);
  1118. }
  1119. void CDBServerDlg::OnOpen()
  1120. {
  1121. ShowWindow(SW_SHOW);
  1122. }
  1123. void CDBServerDlg::OnExit2()
  1124. {
  1125. try
  1126. {
  1127. TerminateThread();
  1128. m_TrayIcon.RemoveIcon();
  1129. if (g_pSkinData)delete[]g_pSkinData; g_pSkinData = NULL;
  1130. g_db.Close();
  1131. for (int i = 0; i < g_dbHistoryArray.GetSize(); i++)
  1132. {
  1133. g_dbHistoryArray.ElementAt(i)->Close();
  1134. delete g_dbHistoryArray.ElementAt(i);
  1135. }
  1136. ReleaseBranchDB();
  1137. }
  1138. catch (...)
  1139. {
  1140. WriteLogin("出错在函数OnExit2中");
  1141. }
  1142. CDialog::OnCancel();
  1143. }
  1144. void CDBServerDlg::OnExit()
  1145. {
  1146. try
  1147. {
  1148. // 结束检查服务线程
  1149. TerminateCheckWork();
  1150. //结束一键生成小图线程
  1151. if(CreateSmallPhoto::GetInstance()->IsCreating())
  1152. {
  1153. if(AfxMessageBox("温馨提示:生成小图还未完成确定要退出程序吗", MB_YESNO|MB_ICONSTOP) == IDNO)
  1154. return;
  1155. CreateSmallPhoto::GetInstance()->TerminateThread();
  1156. }
  1157. TerminateThread();
  1158. DWORD id = FindAppProcessID("AutoRun.exe");
  1159. if (id != -1)
  1160. {
  1161. HANDLE ProcessHandle = OpenProcess(PROCESS_ALL_ACCESS, FALSE, id);
  1162. if (ProcessHandle)TerminateProcess(ProcessHandle, 0);
  1163. }
  1164. m_TrayIcon.RemoveIcon();
  1165. if (g_pSkinData)delete[]g_pSkinData; g_pSkinData = NULL;
  1166. g_db.Close();
  1167. for (int i = 0; i < g_dbHistoryArray.GetSize(); i++)
  1168. {
  1169. g_dbHistoryArray.ElementAt(i)->Close();
  1170. delete g_dbHistoryArray.ElementAt(i);
  1171. }
  1172. ReleaseBranchDB();
  1173. }
  1174. catch (...)
  1175. {
  1176. WriteLogin("出错在函数OnExit中");
  1177. }
  1178. CDialog::OnCancel();
  1179. }
  1180. void CDBServerDlg::OnTimer(UINT nIDEvent) //定时器;
  1181. {
  1182. try
  1183. {
  1184. if (nIDEvent == 1)
  1185. {// 生成小图;
  1186. KillTimer(nIDEvent);
  1187. LoadThumbImages();
  1188. }
  1189. else if (nIDEvent == 2)
  1190. {
  1191. KillTimer(nIDEvent);
  1192. OnClose();// 托盘显示;
  1193. try
  1194. {
  1195. CheckHistoryData(); // Jeff:back history db data;
  1196. LoadBranchInfo();
  1197. }
  1198. catch (...)
  1199. {
  1200. }
  1201. SetTimer(1, 2 * 60 * 1000, NULL);
  1202. SetTimer(4, 1000 * 60 * 2, NULL);
  1203. SetTimer(7, 1000 * 60 * 60 * 1, NULL);
  1204. SetTimer(8, 3000, NULL);
  1205. SetTimer(9, 10000, NULL);
  1206. }
  1207. else if (nIDEvent == 3)
  1208. {
  1209. g_pMainWnd->KillTimer(3);
  1210. HANDLE hMutex = ::OpenMutex(NULL, FALSE, _T("lyfzSMSHandle"));
  1211. if (GetLastError() == ERROR_FILE_NOT_FOUND)
  1212. {
  1213. CString autorunpath = g_mainpath + _T("\\SMSHandle.exe");
  1214. ShellExecute(NULL, _T("open"), autorunpath, NULL, NULL, SW_HIDE);
  1215. }
  1216. if(hMutex) CloseHandle(hMutex);
  1217. }
  1218. else if (nIDEvent == 4) //Jeff.这里也有自动启动MsgServer.exe服务处理,而且是2分钟/次的频率;
  1219. {
  1220. UpdateDate();
  1221. CheckMemberMsg();
  1222. BakPhoto();
  1223. }
  1224. else if (nIDEvent == 5)
  1225. {
  1226. typedef BOOL(WINAPI *MYFUNC)(LPDWORD);
  1227. MYFUNC IsNetworkConnect = NULL;
  1228. //取得IsNetworkAlive函数指针
  1229. IsNetworkConnect = (MYFUNC)GetProcAddress(hInst, "IsNetworkAlive");
  1230. if (IsNetworkConnect)
  1231. {
  1232. DWORD dwActiveWan = 1;
  1233. BOOL state;
  1234. if (IsNetworkConnect(&dwActiveWan))
  1235. state = 1;
  1236. else
  1237. state = 0;
  1238. if (m_bNetWorkOK != state)
  1239. {
  1240. KillTimer(nIDEvent);
  1241. WriteLogin("网络断开");
  1242. OnExit2();
  1243. }
  1244. }
  1245. }
  1246. else if (nIDEvent == 6)
  1247. {
  1248. KillTimer(nIDEvent);
  1249. ShutDown();
  1250. }
  1251. else if (nIDEvent == 7)
  1252. {
  1253. //CheckBakState();
  1254. GenUPhoneData();
  1255. }
  1256. else if (nIDEvent == 8)
  1257. {
  1258. CheckConnCount();
  1259. }
  1260. }
  1261. catch (...)
  1262. {
  1263. WriteLogin("出错在函数Timer中");
  1264. }
  1265. }
  1266. void LoadImageFromBuf(Image **img, BYTE *pData, DWORD leng)//g_bakserver1
  1267. {
  1268. try
  1269. {
  1270. if (pData == NULL)return;
  1271. if (*img)delete *img;
  1272. *img = NULL;
  1273. // Allocate global memory on which to create stream
  1274. HGLOBAL m_hMem = GlobalAlloc(GMEM_MOVEABLE, leng);
  1275. if (m_hMem == NULL)return;
  1276. BYTE* pmem = (BYTE*)GlobalLock(m_hMem);
  1277. memcpy(pmem, pData, leng);
  1278. IStream* pstm;
  1279. CreateStreamOnHGlobal(m_hMem, TRUE, &pstm);
  1280. // load from stream
  1281. *img = Gdiplus::Image::FromStream(pstm);
  1282. // free/release stuff
  1283. GlobalUnlock(m_hMem);
  1284. pstm->Release();
  1285. }
  1286. catch (...)
  1287. {
  1288. }
  1289. }
  1290. void LoadImageFromBuf(Image **img, CString path)
  1291. {
  1292. try
  1293. {
  1294. CFile fp;
  1295. if (fp.Open(path, CFile::modeRead))
  1296. {
  1297. DWORD leng = fp.GetLength();
  1298. BYTE *pData = new BYTE[leng];
  1299. fp.Read(pData, leng);
  1300. fp.Close();
  1301. LoadImageFromBuf(img, pData, leng);
  1302. delete[]pData;
  1303. }
  1304. }
  1305. catch (...)
  1306. {
  1307. }
  1308. }
  1309. void LoadImageFromRes(Image **img, LPCTSTR lpszResourceName, LPCTSTR ResourceType)
  1310. {
  1311. try
  1312. {
  1313. HGLOBAL hGlobal = NULL;
  1314. HRSRC hSource = NULL;
  1315. LPVOID lpVoid = NULL;
  1316. int nSize = 0;
  1317. BOOL bResult = FALSE;
  1318. hSource = FindResource(NULL, lpszResourceName, ResourceType);
  1319. if (hSource == NULL)return;
  1320. hGlobal = LoadResource(NULL, hSource);
  1321. if (hGlobal == NULL)return;
  1322. lpVoid = LockResource(hGlobal);
  1323. if (lpVoid == NULL)return;
  1324. nSize = (UINT)SizeofResource(NULL, hSource);
  1325. LoadImageFromBuf(img, (BYTE*)hGlobal, nSize);
  1326. UnlockResource(hGlobal); // 16Bit Windows Needs This
  1327. FreeResource(hGlobal); // 16Bit Windows Needs This (32Bit - Automatic Release)
  1328. }
  1329. catch (...)
  1330. {
  1331. }
  1332. }
  1333. // ---------------------------------------------------------------------------------------------------------------------------------------------------------------
  1334. // TimeAt: 2014-09-15 AM;
  1335. // Remark: Jeff;
  1336. // 函数:GenSPhoto
  1337. // 描述:对指定文件夹内的相片生成S或M缩略图;
  1338. // 参数:
  1339. // dir: 需要生成缩略图的文件目录;
  1340. // bMPhoto: 是否生成M缩略图;
  1341. // 其它:
  1342. // 在生成缩略图前,记录jpg文件总数nOldCount,每生成一个缩略图nOldCount++;
  1343. // 最后全部图生成完毕,获取新的jpg文件总数nNewCount,if(nOldCount == nNewCount)则表示所有相片已生成缩略图完毕,生成ok文件表示成功生成缩略图;
  1344. //
  1345. // 函数调用全局参数:
  1346. // g_bSteal:意义未明!
  1347. //
  1348. // 注意:该函数非线程安全!
  1349. // 非线程安全:
  1350. // 获取文件总数nOldCount结束后,若有新文件在本函数以外其他函数或进程、线程被添加,则生成缩略图完成后再次获取文件总数nNewCount就不会与nOldCount++后的结果相等;
  1351. // 而实际上本次缩略图已生成完毕。
  1352. // ---------------------------------------------------------------------------------------------------------------------------------------------------------------
  1353. void GenSPhoto(CString dir, BOOL bMPhoto) // 参数:bMPhoto:是否生成M缩略图;
  1354. {
  1355. // 如果是公告附件目录退出;
  1356. if (dir.Find("公告附件") != -1)return;
  1357. // 如果不是客户原片或修好的片目录,设置bMPhoto参数为0,不生成M缩略图;
  1358. if (dir.Find("客户原片(管理软件)$") != -1 || dir.Find("修好的片(管理软件)$") != -1)
  1359. {
  1360. }
  1361. else
  1362. bMPhoto = 0;
  1363. // 对指定文件目录dir进行指定后缀jpg文件遍历;
  1364. ffsco o;
  1365. o.dirs(1);
  1366. o.find(LPCSTR(dir), LPCSTR("*.*"));
  1367. ffsco::typeT coo;
  1368. ffsco::typeT::iterator it;
  1369. coo = o.co_file();
  1370. int oldsize = coo.size();
  1371. CString path, temp, spath, mpath;
  1372. for (it = coo.begin(); coo.end() != it; it++)
  1373. {
  1374. try
  1375. {
  1376. if (g_pMainWnd->m_bTerminate)return;
  1377. // 遍历到的jpg文件如果是缩略图则不处理,继续遍历;
  1378. path = (*it).c_str();
  1379. spath = path.Left(path.ReverseFind('\\') + 1);
  1380. mpath = spath;
  1381. spath += "s";
  1382. mpath += "m";
  1383. temp = path.Right(path.GetLength() - path.ReverseFind('\\') - 1);
  1384. if (temp.GetAt(0) == 's')continue;
  1385. if (temp.GetAt(0) == 'm')continue;
  1386. spath += path.Right(path.GetLength() - path.ReverseFind('\\') - 1);
  1387. mpath += path.Right(path.GetLength() - path.ReverseFind('\\') - 1);
  1388. if (g_bSteal)
  1389. {
  1390. Image *pImg = NULL;
  1391. ::LoadImageFromBuf(&pImg, path);
  1392. if (pImg == NULL)continue;
  1393. if (pImg->GetWidth() == 0)continue; // Jeff.continue前未释放pImg;
  1394. delete pImg;
  1395. EncryptFile3(path);
  1396. if (path.Find("客户原片") != -1)
  1397. {
  1398. int pos = path.Find("管理软件)$");
  1399. if (pos != -1)
  1400. {
  1401. path = g_bakserver1 + path.Right(path.GetLength() - pos - 10);
  1402. EncryptFile3(path);
  1403. }
  1404. }
  1405. else if (path.Find("修好的片") != -1)
  1406. {
  1407. int pos = path.Find("管理软件)$");
  1408. if (pos != -1)
  1409. {
  1410. path = g_bakserver2 + path.Right(path.GetLength() - pos - 10);
  1411. EncryptFile3(path);
  1412. }
  1413. }
  1414. else if (path.Find("精修好的片") != -1)
  1415. {
  1416. int pos = path.Find("管理软件)$");
  1417. if (pos != -1)
  1418. {
  1419. path = g_bakserver3 + path.Right(path.GetLength() - pos - 10);
  1420. EncryptFile3(path);
  1421. }
  1422. }
  1423. else if (path.Find("设计好的片") != -1)
  1424. {
  1425. int pos = path.Find("管理软件)$");
  1426. if (pos != -1)
  1427. {
  1428. path = g_bakserver4 + path.Right(path.GetLength() - pos - 10);
  1429. EncryptFile3(path);
  1430. }
  1431. }
  1432. oldsize++;
  1433. }
  1434. else if (!CheckFileExist(spath)) // 没有判断后续是否为jpg或jpeg.
  1435. {
  1436. Image *pImg = NULL;
  1437. ::LoadImageFromBuf(&pImg, path);
  1438. if (pImg == NULL)continue;
  1439. if (pImg->GetWidth() == 0)
  1440. {
  1441. // 由于没有判断spath是否是jpg或jpeg的相片文件,导致这里泄漏;
  1442. if (pImg)
  1443. delete pImg;
  1444. pImg = NULL;
  1445. continue; // Jeff.返回前未释放pImg;
  1446. }
  1447. CRect rc(0, 0, 100, 90);
  1448. RectFitDes(pImg->GetWidth(), pImg->GetHeight(), rc);
  1449. Image *simg = pImg->GetThumbnailImage(rc.Width(), rc.Height(), NULL, NULL);
  1450. if (simg == NULL)
  1451. {
  1452. if (pImg)
  1453. delete pImg;
  1454. pImg = NULL;
  1455. continue;// Jeff.返回前未释放pImg;
  1456. }
  1457. Image *simg2 = NULL;
  1458. if (bMPhoto)
  1459. {
  1460. CRect rc2(0, 0, 2000, 2000);
  1461. RectFitDes(pImg->GetWidth(), pImg->GetHeight(), rc2);
  1462. simg2 = pImg->GetThumbnailImage(rc2.Width(), rc2.Height(), NULL, NULL);
  1463. if (simg2 == NULL)
  1464. {
  1465. if (pImg)
  1466. delete pImg;
  1467. pImg = NULL;
  1468. continue;// Jeff.返回前未释放pImg;
  1469. }
  1470. }
  1471. Graphics graphic(simg);//防止GetThumbnailImage影响质量
  1472. graphic.Clear(Color(255, 255, 255, 255));
  1473. graphic.DrawImage(pImg, 0, 0, simg->GetWidth(), simg->GetHeight());
  1474. if (bMPhoto)
  1475. {
  1476. Graphics graphic2(simg2);//防止GetThumbnailImage影响质量
  1477. graphic2.Clear(Color(255, 255, 255, 255));
  1478. graphic2.DrawImage(pImg, 0, 0, simg2->GetWidth(), simg2->GetHeight());
  1479. }
  1480. ///////////////////////////////
  1481. UINT totalBufferSize;
  1482. UINT numProperties;
  1483. pImg->GetPropertySize(&totalBufferSize, &numProperties);
  1484. // Allocate the buffer that will receive the property items.
  1485. PropertyItem* pAllItems = (PropertyItem*)malloc(totalBufferSize);
  1486. // Fill the buffer.
  1487. pImg->GetAllPropertyItems(totalBufferSize, numProperties, pAllItems);
  1488. // Print the id data member of each property item.
  1489. for (UINT j = 0; j < numProperties; ++j)
  1490. {
  1491. if (PropertyTagOrientation == pAllItems[j].id)
  1492. {
  1493. short* ptrLong = (short*)(pAllItems[j].value);
  1494. int ret = (int)*ptrLong;
  1495. // CString str;
  1496. // str.Format ("%d", ret);
  1497. // AfxMessageBox(str);
  1498. if (ret == 8)
  1499. {
  1500. if (simg2)simg2->RotateFlip(Rotate270FlipNone);
  1501. simg->RotateFlip(Rotate270FlipNone);
  1502. }
  1503. else if (ret == 6)
  1504. {
  1505. if (simg2)simg2->RotateFlip(Rotate90FlipNone);
  1506. simg->RotateFlip(Rotate90FlipNone);
  1507. }
  1508. break;
  1509. }
  1510. }
  1511. free(pAllItems);
  1512. ///////////////////////////////
  1513. ::SaveImageToFile(simg, spath); oldsize++;
  1514. delete simg;
  1515. delete pImg;
  1516. if (bMPhoto)
  1517. {
  1518. ::SaveImageToFile2(simg2, mpath, 100); oldsize++;
  1519. delete simg2;
  1520. }
  1521. }
  1522. }
  1523. catch (...)
  1524. {
  1525. WriteLogin("出错在函数GenSPhoto中");
  1526. }
  1527. }
  1528. try
  1529. {
  1530. ffsco o;
  1531. o.dirs(1);
  1532. o.find(LPCSTR(dir), LPCSTR("*.*"));
  1533. ffsco::typeT coo;
  1534. ffsco::typeT::iterator it;
  1535. coo = o.co_file();
  1536. int newsize = coo.size();
  1537. if (oldsize == newsize)
  1538. {
  1539. path = dir + "\\ok";
  1540. CFile fp;
  1541. fp.Open(path, CFile::modeCreate | CFile::modeWrite);
  1542. fp.Close();
  1543. }
  1544. }
  1545. catch (...)
  1546. {
  1547. WriteLogin("出错在函数GenSPhoto2中");
  1548. }
  1549. }
  1550. //--------------------------------------------------------------------------------
  1551. // Remark by Jeff 2014.10.22
  1552. // 函数:LoadThumbNail
  1553. // 描述:S或M缩略图线程
  1554. // 参数:
  1555. // 返回:
  1556. //
  1557. // 调用关系:SetTimer(1);
  1558. // 1.
  1559. // 2.
  1560. // 3.
  1561. //--------------------------------------------------------------------------------
  1562. unsigned __stdcall LoadThumbNail(LPVOID lpParam)
  1563. {
  1564. BOOL bMphoto = 0;
  1565. if (g_bSteal == 0)
  1566. {
  1567. CRecordset myset(&g_db);
  1568. CString sql = "select * from version";
  1569. myset.Open(CRecordset::forwardOnly, sql);
  1570. myset.GetFieldValue("setcheck15", sql); // 选片时是否使用m缩略图来代替原片放大使用;
  1571. myset.Close();
  1572. bMphoto = atoi(sql);
  1573. }
  1574. CString initialPhotoPath = _T("");
  1575. CString initialModifyPath = _T("");
  1576. CString designPhotoPath = _T("");
  1577. CString excellentModifyPath = _T("");
  1578. char server[50] = {0};
  1579. DWORD leng = 50;
  1580. ::GetComputerName(server, &leng);
  1581. initialPhotoPath = initialModifyPath = designPhotoPath = excellentModifyPath = server;
  1582. initialPhotoPath = "\\\\" + initialPhotoPath + "\\客户原片(管理软件)$";
  1583. initialModifyPath = "\\\\" + initialModifyPath + "\\修好的片(管理软件)$";
  1584. designPhotoPath = "\\\\" + designPhotoPath + "\\设计好的片(管理软件)$";
  1585. excellentModifyPath = "\\\\" + excellentModifyPath + "\\精修好的片(管理软件)$";
  1586. GetPathFromNetShareName("客户原片(管理软件)$", initialPhotoPath);
  1587. GetPathFromNetShareName("修好的片(管理软件)$", initialModifyPath);
  1588. GetPathFromNetShareName("设计好的片(管理软件)$", designPhotoPath);
  1589. GetPathFromNetShareName("精修好的片(管理软件)$", excellentModifyPath);
  1590. int i = 0;
  1591. CDBServerDlg *pDlg = (CDBServerDlg*)lpParam;
  1592. try
  1593. {
  1594. CStringArray dirarray;
  1595. // Remark:Jeff.
  1596. // 遍历原片、修好片、设计片、精修片目录,查看是否有ok或ok.dat文件存在;
  1597. // 说明:ok文件在客户端再次导入相片时会被删除;
  1598. // 只有服务端生成小图后,ok才被重新生成;
  1599. if(CBranchInfo::GetInstance()->m_TblNetShareInfo.size() != 0)
  1600. {
  1601. vector<TblNetShareInfo*>::iterator iter = CBranchInfo::GetInstance()->m_TblNetShareInfo.begin();
  1602. for(; iter != CBranchInfo::GetInstance()->m_TblNetShareInfo.end();)
  1603. {
  1604. TblNetShareInfo* p = (*iter);
  1605. if(p != NULL)
  1606. {
  1607. CString strDir = p->szShareDirectory;
  1608. if(strDir.Find(_T("$\\")) != -1)
  1609. strDir = strDir.TrimRight(_T("\\"));
  1610. pDlg->CheckOkFileExistence(strDir, dirarray);
  1611. }
  1612. ++iter;
  1613. }
  1614. CString patharray[2] = { designPhotoPath, excellentModifyPath };
  1615. //int i = 0;
  1616. for (i = 0; i < 2; i++)
  1617. {
  1618. if (pDlg->m_bTerminate)
  1619. break;
  1620. pDlg->CheckOkFileExistence(patharray[i], dirarray);
  1621. }
  1622. }
  1623. else
  1624. {
  1625. CString patharray[4] = { initialPhotoPath, initialModifyPath, designPhotoPath, excellentModifyPath };
  1626. for (i = 0; i < 4; i++)
  1627. {
  1628. if (pDlg->m_bTerminate)
  1629. break;
  1630. pDlg->CheckOkFileExistence(patharray[i], dirarray);
  1631. }
  1632. }
  1633. for (i = 0; i < dirarray.GetSize(); i++)
  1634. {
  1635. if (pDlg->m_bTerminate)
  1636. break;
  1637. GenSPhoto(dirarray.ElementAt(i), bMphoto);
  1638. }
  1639. }
  1640. catch (...)
  1641. {
  1642. WriteLogin("出错在函数GenThumb中");
  1643. }
  1644. pDlg->m_bRunning = false;
  1645. pDlg->m_bTerminate = false;
  1646. pDlg->SetTimer(1, 60 * 1000, NULL);
  1647. _endthreadex(0);
  1648. return 0;
  1649. }
  1650. //--------------------------------------------------------------------------------
  1651. // 函数:CheckOkFileExistence
  1652. // 描述:OK文件是否存在
  1653. // 参数:
  1654. // const CString& strPath 需要搜索的目录
  1655. // CStringArray& arr 返回文件目录
  1656. // 返回:TRUE成功,FALSE失败
  1657. //--------------------------------------------------------------------------------
  1658. BOOL CDBServerDlg::CheckOkFileExistence(const CString& strPath, CStringArray& arr)
  1659. {
  1660. CString path(_T("")), path2(_T(""));
  1661. if(strPath == _T(""))
  1662. return FALSE;
  1663. ffsco o;
  1664. o.dirs(1);
  1665. o.find(LPCSTR(strPath), LPCSTR("*.*"));
  1666. ffsco::typeT coo;
  1667. ffsco::typeT::iterator it;
  1668. coo = o.co_dir();
  1669. it = coo.begin();
  1670. it++;
  1671. for(; coo.end() != it; it++)
  1672. {
  1673. if (m_bTerminate)
  1674. break;
  1675. path = (*it).c_str();
  1676. path.TrimRight("\\");
  1677. path2 = path;
  1678. path2 += "\\ok2.dat";
  1679. path += "\\ok";
  1680. if (CheckFileExist(path2) && path2.Find(".ly.com") == -1)
  1681. {
  1682. ::DeleteFile(path); // 删除ok文件;
  1683. ::DeleteFile(path2); // 删除ok.dat文件;
  1684. }
  1685. // g_bCheckAll g_bSteal的意义???
  1686. // g_bCheckAll没有任何其他赋值的代码,只有最开始初始化值0;下这if不执行;
  1687. if (g_bCheckAll || g_bSteal)
  1688. {
  1689. if (FindArray(&arr, (*it).c_str()) == -1)
  1690. arr.Add((*it).c_str());
  1691. }
  1692. else if (CheckFileExist(path) == 0)
  1693. {
  1694. if (FindArray(&arr, (*it).c_str()) == -1)
  1695. arr.Add((*it).c_str());
  1696. }
  1697. }
  1698. return 1;
  1699. }
  1700. //自动生成小图线程;
  1701. void CDBServerDlg::LoadThumbImages() // 自动生成小图线程;
  1702. {
  1703. if (m_bRunning)return;
  1704. TerminateThread();
  1705. m_bRunning = true;
  1706. m_hThread = (HANDLE)_beginthreadex(NULL, 0, LoadThumbNail, (LPVOID)this, 0/* CREATE_SUSPENDED*/, &m_dwThreadID);
  1707. }
  1708. BOOL CDBServerDlg::TerminateThread()
  1709. {
  1710. try
  1711. {
  1712. if (!m_bRunning)
  1713. return TRUE;
  1714. m_bTerminate = true;
  1715. for (;;)
  1716. {
  1717. if (::WaitForSingleObject(m_hThread, INFINITE) == WAIT_OBJECT_0)
  1718. break;
  1719. }
  1720. ::CloseHandle(m_hThread);
  1721. m_bRunning = false;
  1722. return TRUE;
  1723. }
  1724. catch (...)
  1725. {
  1726. WriteLogin("出错在函数TerminateThread中");
  1727. }
  1728. return TRUE;
  1729. }
  1730. void CDBServerDlg::InitLia()
  1731. {
  1732. try
  1733. {
  1734. // Jeff:逆天的变量命名!!!局部变量竟然用g_开头!!!
  1735. //BYTE *g_pData=NULL;DWORD g_nLeng; DWORD count2;
  1736. BYTE *pReturnData = NULL;
  1737. DWORD dwReturnLen;
  1738. DWORD count2;
  1739. BYTE byCode = 104;
  1740. CConnectSocket consock;
  1741. consock.m_pConndb = &g_db;
  1742. consock.GetDataFromCode(byCode, &pReturnData, dwReturnLen, count2, "");
  1743. if (pReturnData == NULL || dwReturnLen == 0)
  1744. return;
  1745. DWORD readbytes = 0;
  1746. CArray<DWORD, DWORD> ArrayOfLen;
  1747. CArray<DWORD, DWORD> ArrayOfBtnLen;
  1748. BYTE *pArrayPointer = NULL;
  1749. DWORD dwPointerLen = 0;
  1750. DWORD leng;
  1751. memcpy(&leng, pReturnData + readbytes, sizeof(DWORD));
  1752. readbytes += sizeof(DWORD);
  1753. BYTE *pFtData = new BYTE[leng];
  1754. memcpy(pFtData, pReturnData + readbytes, leng);
  1755. readbytes += leng;
  1756. CMemFile memfile;
  1757. memfile.Attach(pFtData, leng);
  1758. CArchive ar(&memfile, CArchive::load);
  1759. ArrayOfLen.Serialize(ar);
  1760. ar.Close();
  1761. memfile.Detach();
  1762. memcpy(&leng, pReturnData + readbytes, sizeof(DWORD));
  1763. readbytes += sizeof(DWORD);
  1764. BYTE *pFtData2 = new BYTE[leng];
  1765. memcpy(pFtData2, pReturnData + readbytes, leng);
  1766. readbytes += leng;
  1767. CMemFile memfile2;
  1768. memfile2.Attach(pFtData2, leng);
  1769. CArchive ar2(&memfile2, CArchive::load);
  1770. ArrayOfBtnLen.Serialize(ar2);
  1771. ar2.Close();
  1772. memfile2.Detach();
  1773. delete[]pFtData;
  1774. delete[]pFtData2;
  1775. DWORD count;
  1776. memcpy(&count, pReturnData + readbytes, sizeof(DWORD));
  1777. readbytes += sizeof(DWORD);
  1778. dwPointerLen = count*sizeof(RESDATA2);
  1779. pArrayPointer = new BYTE[dwPointerLen];
  1780. int i = 0;
  1781. for (i = 0; i < count; i++)
  1782. {
  1783. memcpy(pArrayPointer + i*sizeof(RESDATA2), pReturnData + readbytes, sizeof(RESDATA2));
  1784. readbytes += sizeof(RESDATA2);
  1785. }
  1786. for (i = 0; i < ArrayOfLen.GetSize(); i += 8)
  1787. {
  1788. DWORD leng1, leng2, leng3, leng4, leng5, leng6, leng7, leng8;
  1789. leng1 = ArrayOfLen.ElementAt(i);
  1790. leng2 = ArrayOfLen.ElementAt(i + 1);
  1791. leng3 = ArrayOfLen.ElementAt(i + 2);
  1792. leng4 = ArrayOfLen.ElementAt(i + 3);
  1793. leng5 = ArrayOfLen.ElementAt(i + 4);
  1794. leng6 = ArrayOfLen.ElementAt(i + 5);
  1795. leng7 = ArrayOfLen.ElementAt(i + 6);
  1796. leng8 = ArrayOfLen.ElementAt(i + 7);
  1797. if (i % 4 == 0)
  1798. DeCodelong1((int&)leng1, (int&)leng2, (int&)leng3, (int&)leng4, (int&)leng5, (int&)leng6, (int&)leng7, (int&)leng8);
  1799. else if (i % 4 == 1)
  1800. DeCodelong2((int&)leng1, (int&)leng2, (int&)leng3, (int&)leng4, (int&)leng5, (int&)leng6, (int&)leng7, (int&)leng8);
  1801. else if (i % 4 == 2)
  1802. DeCodelong3((int&)leng1, (int&)leng2, (int&)leng3, (int&)leng4, (int&)leng5, (int&)leng6, (int&)leng7, (int&)leng8);
  1803. else
  1804. DeCodelong4((int&)leng1, (int&)leng2, (int&)leng3, (int&)leng4, (int&)leng5, (int&)leng6, (int&)leng7, (int&)leng8);
  1805. ArrayOfLen.SetAt(i, leng1);
  1806. ArrayOfLen.SetAt(i + 1, leng2);
  1807. ArrayOfLen.SetAt(i + 2, leng3);
  1808. ArrayOfLen.SetAt(i + 3, leng4);
  1809. ArrayOfLen.SetAt(i + 4, leng5);
  1810. ArrayOfLen.SetAt(i + 5, leng6);
  1811. ArrayOfLen.SetAt(i + 6, leng7);
  1812. ArrayOfLen.SetAt(i + 7, leng8);
  1813. }
  1814. delete[]pReturnData;
  1815. if (g_pSkinData)
  1816. delete[]g_pSkinData;
  1817. g_pSkinData = NULL;
  1818. DWORD length;
  1819. BYTE *pData;
  1820. DWORD length2;
  1821. BYTE *pData2;
  1822. CMemFile mStoreFile;
  1823. CArchive arStore(&mStoreFile, CArchive::store);
  1824. ArrayOfLen.Serialize(arStore);
  1825. arStore.Close();
  1826. length = mStoreFile.GetLength();
  1827. pData = mStoreFile.Detach();
  1828. CMemFile mStoreFile1;
  1829. CArchive arStore1(&mStoreFile1, CArchive::store);
  1830. ArrayOfBtnLen.Serialize(arStore1);
  1831. arStore1.Close();
  1832. length2 = mStoreFile1.GetLength();
  1833. pData2 = mStoreFile1.Detach();
  1834. g_SkinLeng = length + length2 + dwPointerLen + 3 * sizeof(DWORD);
  1835. g_pSkinData = new BYTE[g_SkinLeng];
  1836. readbytes = 0;
  1837. memcpy(g_pSkinData + readbytes, &length, sizeof(DWORD));
  1838. readbytes += sizeof(DWORD);
  1839. memcpy(g_pSkinData + readbytes, pData, length);
  1840. readbytes += length;
  1841. memcpy(g_pSkinData + readbytes, &length2, sizeof(DWORD));
  1842. readbytes += sizeof(DWORD);
  1843. memcpy(g_pSkinData + readbytes, pData2, length2);
  1844. readbytes += length2;
  1845. memcpy(g_pSkinData + readbytes, &dwPointerLen, sizeof(DWORD));
  1846. readbytes += sizeof(DWORD);
  1847. memcpy(g_pSkinData + readbytes, pArrayPointer, dwPointerLen);
  1848. readbytes += dwPointerLen;
  1849. delete[]pArrayPointer;
  1850. }
  1851. catch (...)
  1852. {
  1853. WriteLogin("出错在函数InitLia中");
  1854. }
  1855. }
  1856. BOOL CheckExistDinDan(CString id)
  1857. {
  1858. CRecordset myset(&g_db);
  1859. CString sql = "select count(*) as cot from dindan where id='" + id + "'";
  1860. myset.Open(CRecordset::forwardOnly, sql);
  1861. myset.GetFieldValue("cot", sql);
  1862. myset.Close();
  1863. return atol(sql);
  1864. }
  1865. //CString g_nCurConvertDBName="db"; // Jeff.deal
  1866. CString g_nCurConvertDBName(g_szDBName);
  1867. /************************************************************************/
  1868. /* [函数]:CheckHistoryData
  1869. /* [描述]:将被检测的数据库已完成的订单数据转到历史数据库中,并删除被检测的数据库已完成的订单;
  1870. /* [参数]:
  1871. /* pSrcdb: 源数据库,用于被转历史的数据库;
  1872. /* nSrcYear: 源数据库的年份;
  1873. /* bMode2: 转储模式:0=年度完成的订单; 1=年度所有订单,包含未完成订单;
  1874. /* [返回]:void
  1875. /*
  1876. /************************************************************************/
  1877. void CDBServerDlg::CheckHistoryData(CDatabase *pSrcdb /* = NULL */, int nSrcYear /* = 0 */, BOOL bMode2 /* = 0*/)//历史备份;
  1878. {
  1879. #if JEFF_TEST_ON
  1880. // 取消转将当前数据库完成订单的记录转到年份数据库中,此步直接返回;
  1881. /////////////////////////生成来电精灵数据
  1882. MyLock lock("processChatMessageRequestxiao");
  1883. CArray<int, int>codearray;
  1884. codearray.Add(80);
  1885. codearray.Add(90);
  1886. codearray.Add(11);
  1887. codearray.Add(138);
  1888. codearray.Add(24);
  1889. codearray.Add(181);
  1890. codearray.Add(65);
  1891. codearray.Add(56);
  1892. codearray.Add(179);
  1893. codearray.Add(53);
  1894. CFile fp;
  1895. CString savepath, g_path1;
  1896. char server[50];
  1897. DWORD leng = 50;
  1898. ::GetComputerName(server, &leng);
  1899. g_path1 = server;
  1900. g_path1 = "\\\\" + g_path1 + "\\电话录音(管理软件)$";
  1901. GetPathFromNetShareName("电话录音(管理软件)$", g_path1);
  1902. if (g_path1.IsEmpty())return;
  1903. try
  1904. {
  1905. CArray<CDatabase*, CDatabase*>dbarraytemp;
  1906. dbarraytemp.Copy(g_dbHistoryArray);
  1907. dbarraytemp.InsertAt(0, &g_db);
  1908. for (int aa = 0; aa < dbarraytemp.GetSize(); aa++)
  1909. {
  1910. g_curdb = dbarraytemp.ElementAt(aa);
  1911. savepath.Format("%s\\uphonedata%d.dat", g_path1, aa);
  1912. ::DeleteFile(savepath); // 删除uphonedata.dat文件;
  1913. if (fp.Open(savepath, CFile::modeCreate | CFile::modeWrite) == 0)
  1914. {
  1915. WriteLogin("更新来电精灵数据出错");
  1916. return;
  1917. }
  1918. CConnectSocket consock;
  1919. consock.m_pConndb = g_curdb;
  1920. for (int i = 0; i < codearray.GetSize(); i++)
  1921. {
  1922. BYTE code = codearray.ElementAt(i);
  1923. DWORD length, arraysize;
  1924. BYTE *pReturn = NULL;
  1925. consock.GetDataFromCode(code, &pReturn, length, arraysize, "");
  1926. fp.Write(&code, sizeof(BYTE));
  1927. fp.Write(&length, sizeof(DWORD));
  1928. fp.Write(&arraysize, sizeof(DWORD));
  1929. fp.Write(pReturn, length);
  1930. }
  1931. fp.Close();
  1932. }
  1933. g_curdb = &g_db;
  1934. }
  1935. catch (CException *e)
  1936. {
  1937. TCHAR szError[1024] = { 0 };
  1938. e->GetErrorMessage(szError, 1024);
  1939. WriteLogin(CString(szError));
  1940. WriteLogin("获取来电精灵数据出错1");
  1941. e->Delete();
  1942. }
  1943. return;
  1944. #endif
  1945. try
  1946. {
  1947. g_nCurConvertDBName = g_szDBName;
  1948. if (pSrcdb != NULL)
  1949. {
  1950. g_bConvertHisAll = 1;
  1951. g_nCurConvertDBName.Format("%d", nSrcYear);
  1952. if (bMode2)
  1953. {
  1954. // MessageBox(g_nCurConvertDBName);
  1955. }
  1956. }
  1957. if (g_bConvertHisAll)
  1958. {
  1959. DWORD id = FindAppProcessID("AutoRun.exe");
  1960. if (id != -1)
  1961. {
  1962. HANDLE ProcessHandle = OpenProcess(PROCESS_ALL_ACCESS, FALSE, id);
  1963. if (ProcessHandle)
  1964. TerminateProcess(ProcessHandle, 0);
  1965. }
  1966. ShowWindow(SW_HIDE);
  1967. WriteLogin("全部转历史开始");
  1968. }
  1969. CString sql;
  1970. g_curdb = &g_db;
  1971. if (pSrcdb != NULL)
  1972. g_curdb = pSrcdb;
  1973. // 1.获取去年年份值 lastyear
  1974. CTime tm = CTime::GetCurrentTime();
  1975. int lastyear = tm.GetYear() - 1;
  1976. CString strdate, strdate2;
  1977. strdate.Format("%04d-%02d-%02d", lastyear, 1, 1);
  1978. strdate2.Format("%04d-%02d-%02d", lastyear, 12, 31);
  1979. CString filter = "time1>='" + strdate + "' and time1<='" + strdate2 + "' and status3='OK'";
  1980. DWORD ii = 0;
  1981. CArray<CStringArray, CStringArray> strOrderNumberArray; //用于记录订单单号;
  1982. // 2.获取得订单号,并存储在CArray<CStringArray,CStringArray>
  1983. if (bMode2)// 存储即将转为历史数据库的所有年度订单的数据库记录(包含未完成);
  1984. {
  1985. CString filter = "time1>='" + strdate + "' and time1<='" + strdate2 + "'";
  1986. // AfxMessageBox(filter);
  1987. CRecordset myset(g_curdb);
  1988. CString sql = "select count(*) as cot from dindan"; // 订单单数;
  1989. if (!filter.IsEmpty())
  1990. sql += " where " + filter;
  1991. myset.Open(CRecordset::forwardOnly, sql);
  1992. myset.GetFieldValue("cot", sql);
  1993. myset.Close();
  1994. int count = atol(sql);
  1995. strOrderNumberArray.SetSize(count, 1);
  1996. CRstDindanForm rsSt;
  1997. rsSt.m_pDatabase = g_curdb;
  1998. if (!filter.IsEmpty())
  1999. rsSt.m_strFilter = filter;
  2000. rsSt.Open();
  2001. ii = 0;
  2002. while (!rsSt.IsEOF())
  2003. {
  2004. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2005. //if(CheckExistDinDan(rsSt.id)==0)
  2006. {
  2007. strOrderNumberArray.ElementAt(ii).Add(rsSt.id);
  2008. ii++;
  2009. }
  2010. rsSt.MoveNext();
  2011. if (strOrderNumberArray.GetSize() <= ii)
  2012. break;
  2013. }
  2014. rsSt.Close();
  2015. strOrderNumberArray.SetSize(ii, 1);
  2016. }
  2017. else// 存储即将转为历史数据库的已完成订单的年度数据库记录;
  2018. {
  2019. // 有多少订单完成的;
  2020. CRecordset myset(g_curdb);
  2021. CString sql = "select count(*) as cot from dindan";
  2022. if (!filter.IsEmpty())
  2023. sql += " where " + filter;
  2024. myset.Open(CRecordset::forwardOnly, sql);
  2025. myset.GetFieldValue("cot", sql);
  2026. myset.Close();
  2027. int count = atol(sql);
  2028. strOrderNumberArray.SetSize(count, 1);
  2029. CRstDindanForm rsSt;
  2030. rsSt.m_pDatabase = g_curdb;
  2031. if (!filter.IsEmpty())
  2032. rsSt.m_strFilter = filter;
  2033. rsSt.Open();
  2034. ii = 0;
  2035. while (!rsSt.IsEOF())
  2036. {
  2037. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2038. strOrderNumberArray.ElementAt(ii).Add(rsSt.id);
  2039. ii++;
  2040. rsSt.MoveNext();
  2041. if (strOrderNumberArray.GetSize() <= ii)
  2042. break;
  2043. }
  2044. rsSt.Close();
  2045. strOrderNumberArray.SetSize(ii, 1);
  2046. }
  2047. // 3.获取该年份名称的数据库;
  2048. CDatabase *pLastYeardb = GetDB(lastyear);
  2049. if (pLastYeardb == NULL)
  2050. {
  2051. CheckYear(lastyear);
  2052. return;
  2053. }
  2054. CDatabase *pdb2Transfer = g_curdb; // pdb2Transfer需要转为成历史数据库的数据库;
  2055. pLastYeardb = GetDB(lastyear); // pLastYeardb往年历史数据库;
  2056. if (pLastYeardb == NULL)
  2057. {
  2058. // Jeff数据库中,没有历史数据库存在,退出历史转换任务;
  2059. return;
  2060. }
  2061. // 4.根据订单号,遍历数据;
  2062. int i = 0;
  2063. //for (int i = 0; i < strOrderNumberArray.GetSize(); i++)
  2064. for ( i = 0; i < strOrderNumberArray.GetSize(); i++)
  2065. {
  2066. // if("20121013-005"!=g_List1array.ElementAt (i).ElementAt (0))continue;
  2067. // TransDinDan返回:1表示正常, 100及以上表示源数据库里记录 > 目标数据库记录;
  2068. // TransDinDan将源数据库中的订单数据insert into 到目标数据库中;
  2069. int ret = TransDinDan(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear);
  2070. if (ret == 1)
  2071. {
  2072. // ret == 1表示源数据库将订单数据插入到目标数据库成功,则删除源数据库中的订单数据;
  2073. sql = "delete from dindan where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2074. MyExecuteSQL(g_curdb, sql);
  2075. sql = "delete from dindansp where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2076. MyExecuteSQL(g_curdb, sql);
  2077. sql = "delete from photoprint where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2078. MyExecuteSQL(g_curdb, sql);
  2079. sql = "delete from dindanbukuan where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2080. MyExecuteSQL(g_curdb, sql);
  2081. sql = "delete from dindanbukuan2 where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2082. MyExecuteSQL(g_curdb, sql);
  2083. sql = "delete from client where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2084. MyExecuteSQL(g_curdb, sql);
  2085. sql = "delete from burncdreg where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2086. MyExecuteSQL(g_curdb, sql);
  2087. sql = "delete from digitalwork where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2088. MyExecuteSQL(g_curdb, sql);
  2089. sql = "delete from mywork where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2090. MyExecuteSQL(g_curdb, sql);
  2091. sql = "delete from dindanjd where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2092. MyExecuteSQL(g_curdb, sql);
  2093. sql = "delete from dindansp2 where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2094. MyExecuteSQL(g_curdb, sql);
  2095. sql = "delete from dindansp3 where id='" + strOrderNumberArray.ElementAt(i).ElementAt(0) + "'";
  2096. MyExecuteSQL(g_curdb, sql);
  2097. }
  2098. else
  2099. {
  2100. // ret=105,已经转过,但是2014被删除过,然后再次转时发现2014里没有记录;待定;
  2101. sql.Format("ret:%d", ret);
  2102. WriteLogin("转历史失败" + strOrderNumberArray.ElementAt(i).ElementAt(0) + sql);
  2103. }
  2104. #ifdef LIMITCOUNT
  2105. if (g_bConvertHisAll == 0)
  2106. {
  2107. if (i > 100)break;
  2108. }
  2109. #endif
  2110. }
  2111. ////////////////////////////支出
  2112. //WriteLogin("支出");
  2113. strdate.Format("%04d-%02d-%02d", lastyear, 1, 1);
  2114. strdate2.Format("%04d-%02d-%02d", lastyear, 12, 31);
  2115. filter = "dat>='" + strdate + "' and dat<='" + strdate2 + "'";
  2116. {
  2117. strOrderNumberArray.RemoveAll();
  2118. CRecordset myset(g_curdb);
  2119. CString sql = "select count(*) as cot from gudingfeiyong";
  2120. if (!filter.IsEmpty())
  2121. sql += " where " + filter;
  2122. myset.Open(CRecordset::forwardOnly, sql);
  2123. myset.GetFieldValue("cot", sql);
  2124. myset.Close();
  2125. int count = atol(sql);
  2126. strOrderNumberArray.SetSize(count, 1);
  2127. CRstPayOutInput rsSt;
  2128. rsSt.m_pDatabase = g_curdb;
  2129. if (!filter.IsEmpty())
  2130. rsSt.m_strFilter = filter;
  2131. rsSt.Open();
  2132. ii = 0;
  2133. while (!rsSt.IsEOF())
  2134. {
  2135. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2136. strOrderNumberArray.ElementAt(ii).Add(rsSt.id);
  2137. ii++;
  2138. rsSt.MoveNext(); if (strOrderNumberArray.GetSize() <= ii)break;
  2139. }
  2140. rsSt.Close(); strOrderNumberArray.SetSize(ii, 1);
  2141. }
  2142. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2143. {
  2144. if (TransPayOut(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2145. {
  2146. {
  2147. sql.Format("delete from gudingfeiyong where id=%d", atol(strOrderNumberArray.ElementAt(i).ElementAt(0)));
  2148. MyExecuteSQL(g_curdb, sql);
  2149. }
  2150. }
  2151. #ifdef LIMITCOUNT
  2152. if (g_bConvertHisAll == 0)
  2153. {
  2154. if (i > 100)break;
  2155. }
  2156. #endif
  2157. }
  2158. ////////////////////////////其它收入
  2159. strdate.Format("%04d-%02d-%02d", lastyear, 1, 1);
  2160. strdate2.Format("%04d-%02d-%02d", lastyear, 12, 31);
  2161. filter = "dat>='" + strdate + "' and dat<='" + strdate2 + "'";
  2162. {
  2163. strOrderNumberArray.RemoveAll();
  2164. CRecordset myset(g_curdb);
  2165. CString sql = "select count(*) as cot from singleincome";
  2166. if (!filter.IsEmpty())
  2167. sql += " where " + filter;
  2168. myset.Open(CRecordset::forwardOnly, sql);
  2169. myset.GetFieldValue("cot", sql);
  2170. myset.Close();
  2171. int count = atol(sql);
  2172. strOrderNumberArray.SetSize(count, 1);
  2173. CRstIncomeInput rsSt;
  2174. rsSt.m_pDatabase = g_curdb;
  2175. if (!filter.IsEmpty())
  2176. rsSt.m_strFilter = filter;
  2177. rsSt.Open();
  2178. ii = 0;
  2179. while (!rsSt.IsEOF())
  2180. {
  2181. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2182. if (atoi(rsSt.balance) == 0)
  2183. strOrderNumberArray.ElementAt(ii).Add(rsSt.id);
  2184. else
  2185. {
  2186. rsSt.MoveNext(); continue;
  2187. }
  2188. ii++;
  2189. rsSt.MoveNext();
  2190. if (strOrderNumberArray.GetSize() <= ii)break;
  2191. }
  2192. rsSt.Close();
  2193. strOrderNumberArray.SetSize(ii, 1);
  2194. }
  2195. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2196. {
  2197. if (TransIncome(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2198. {
  2199. {
  2200. sql.Format("delete from singleincome where id=%d", atol(strOrderNumberArray.ElementAt(i).ElementAt(0)));
  2201. MyExecuteSQL(g_curdb, sql);
  2202. sql.Format("delete from singleincomemoney where [id]='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2203. MyExecuteSQL(g_curdb, sql);
  2204. }
  2205. }
  2206. #ifdef LIMITCOUNT
  2207. if (g_bConvertHisAll == 0)
  2208. {
  2209. if (i > 100)break;
  2210. }
  2211. #endif
  2212. }
  2213. ////////////////////////////其它二销收款
  2214. filter = "id not in(select id from singleincome)";
  2215. {
  2216. strOrderNumberArray.RemoveAll();
  2217. CRecordset myset(g_curdb);
  2218. CString sql = "select count(*) as cot from singleincomemoney";
  2219. if (!filter.IsEmpty())
  2220. sql += " where " + filter;
  2221. myset.Open(CRecordset::forwardOnly, sql);
  2222. myset.GetFieldValue("cot", sql);
  2223. myset.Close();
  2224. int count = atol(sql);
  2225. strOrderNumberArray.SetSize(count, 1);
  2226. CRstsingleincomemoney rsSt;
  2227. rsSt.m_pDatabase = g_curdb;
  2228. if (!filter.IsEmpty())
  2229. rsSt.m_strFilter = filter;
  2230. rsSt.Open();
  2231. ii = 0;
  2232. while (!rsSt.IsEOF())
  2233. {
  2234. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2235. strOrderNumberArray.ElementAt(ii).Add(rsSt.id);
  2236. ii++;
  2237. rsSt.MoveNext();
  2238. if (strOrderNumberArray.GetSize() <= ii)
  2239. break;
  2240. }
  2241. rsSt.Close();
  2242. strOrderNumberArray.SetSize(ii, 1);
  2243. }
  2244. ////////////////////////////其它二销收款
  2245. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2246. {
  2247. if (TransIncomeMoney(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2248. {
  2249. {
  2250. sql.Format("delete from singleincomemoney where [id]='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2251. MyExecuteSQL(g_curdb, sql);
  2252. }
  2253. }
  2254. #ifdef LIMITCOUNT
  2255. if (i > 100)break;
  2256. #endif
  2257. }
  2258. ///1/////////////////////////client2phonerecord 2010-08-09 16:22:16
  2259. strdate.Format("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2260. strdate2.Format("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2261. filter = "datetime>='" + strdate + "' and datetime<='" + strdate2 + "'";
  2262. {
  2263. strOrderNumberArray.RemoveAll();
  2264. CRecordset myset(g_curdb);
  2265. CString sql = "select count(*) as cot from client2phonerecord"; if (!filter.IsEmpty())sql += " where " + filter;
  2266. myset.Open(CRecordset::forwardOnly, sql);
  2267. myset.GetFieldValue("cot", sql);
  2268. myset.Close();
  2269. int count = atol(sql);
  2270. strOrderNumberArray.SetSize(count, 1);
  2271. CRstclient2phonerecord rsSt;
  2272. rsSt.m_pDatabase = g_curdb;
  2273. if (!filter.IsEmpty())
  2274. rsSt.m_strFilter = filter;
  2275. rsSt.Open();
  2276. ii = 0;
  2277. while (!rsSt.IsEOF())
  2278. {
  2279. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2280. strOrderNumberArray.ElementAt(ii).Add(rsSt.datetime);
  2281. ii++;
  2282. rsSt.MoveNext();
  2283. if (strOrderNumberArray.GetSize() <= ii)
  2284. break;
  2285. }
  2286. rsSt.Close();
  2287. strOrderNumberArray.SetSize(ii, 1);
  2288. }
  2289. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2290. {
  2291. if (Transclient2phonerecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2292. {
  2293. {
  2294. sql.Format("delete from client2phonerecord where datetime='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2295. MyExecuteSQL(g_curdb, sql);
  2296. }
  2297. }
  2298. #ifdef LIMITCOUNT
  2299. if (g_bConvertHisAll == 0)
  2300. {
  2301. if (i > 100)break;
  2302. }
  2303. #endif
  2304. }
  2305. ///////////////////////////
  2306. ////////////////////////////client2phonerecordout 2010-08-09 16:22:16
  2307. strdate.Format("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2308. strdate2.Format("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2309. filter = "datetime>='" + strdate + "' and datetime<='" + strdate2 + "'";
  2310. {
  2311. strOrderNumberArray.RemoveAll();
  2312. CRecordset myset(g_curdb);
  2313. CString sql = "select count(*) as cot from client2phonerecordout";
  2314. if (!filter.IsEmpty())
  2315. sql += " where " + filter;
  2316. myset.Open(CRecordset::forwardOnly, sql);
  2317. myset.GetFieldValue("cot", sql);
  2318. myset.Close();
  2319. int count = atol(sql);
  2320. strOrderNumberArray.SetSize(count, 1);
  2321. CRstclient2phonerecordout rsSt;
  2322. rsSt.m_pDatabase = g_curdb;
  2323. if (!filter.IsEmpty())
  2324. rsSt.m_strFilter = filter;
  2325. rsSt.Open();
  2326. ii = 0;
  2327. while (!rsSt.IsEOF())
  2328. {
  2329. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2330. strOrderNumberArray.ElementAt(ii).Add(rsSt.datetime);
  2331. ii++;
  2332. rsSt.MoveNext(); if (strOrderNumberArray.GetSize() <= ii)break;
  2333. }
  2334. rsSt.Close(); strOrderNumberArray.SetSize(ii, 1);
  2335. }
  2336. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2337. {
  2338. if (Transclient2phonerecordout(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2339. {
  2340. {
  2341. sql.Format("delete from client2phonerecordout where datetime='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2342. MyExecuteSQL(g_curdb, sql);
  2343. }
  2344. }
  2345. #ifdef LIMITCOUNT
  2346. if (g_bConvertHisAll == 0)
  2347. {
  2348. if (i > 100)break;
  2349. }
  2350. #endif
  2351. }
  2352. ///1/////////////////////////client3phonerecord 2010-08-09 16:22:16
  2353. strdate.Format("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2354. strdate2.Format("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2355. filter = "datetime>='" + strdate + "' and datetime<='" + strdate2 + "'";
  2356. {
  2357. strOrderNumberArray.RemoveAll();
  2358. CRecordset myset(g_curdb);
  2359. CString sql = "select count(*) as cot from client3phonerecord";
  2360. if (!filter.IsEmpty())
  2361. sql += " where " + filter;
  2362. myset.Open(CRecordset::forwardOnly, sql);
  2363. myset.GetFieldValue("cot", sql);
  2364. myset.Close();
  2365. int count = atol(sql);
  2366. strOrderNumberArray.SetSize(count, 1);
  2367. CRstclient3phonerecord rsSt;
  2368. rsSt.m_pDatabase = g_curdb;
  2369. if (!filter.IsEmpty())
  2370. rsSt.m_strFilter = filter;
  2371. rsSt.Open();
  2372. ii = 0;
  2373. while (!rsSt.IsEOF())
  2374. {
  2375. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2376. strOrderNumberArray.ElementAt(ii).Add(rsSt.datetime);
  2377. ii++;
  2378. rsSt.MoveNext();
  2379. if (strOrderNumberArray.GetSize() <= ii)
  2380. break;
  2381. }
  2382. rsSt.Close(); strOrderNumberArray.SetSize(ii, 1);
  2383. }
  2384. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2385. {
  2386. if (Transclient3phonerecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2387. {
  2388. {
  2389. sql.Format("delete from client3phonerecord where datetime='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2390. MyExecuteSQL(g_curdb, sql);
  2391. }
  2392. }
  2393. #ifdef LIMITCOUNT
  2394. if (g_bConvertHisAll == 0)
  2395. {
  2396. if (i > 100)break;
  2397. }
  2398. #endif
  2399. }
  2400. ///////////////////////////
  2401. ////////////////////////////client3phonerecordout 2010-08-09 16:22:16
  2402. strdate.Format("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2403. strdate2.Format("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2404. filter = "datetime>='" + strdate + "' and datetime<='" + strdate2 + "'";
  2405. {
  2406. strOrderNumberArray.RemoveAll();
  2407. CRecordset myset(g_curdb);
  2408. CString sql = "select count(*) as cot from client3phonerecordout";
  2409. if (!filter.IsEmpty())
  2410. sql += " where " + filter;
  2411. myset.Open(CRecordset::forwardOnly, sql);
  2412. myset.GetFieldValue("cot", sql);
  2413. myset.Close();
  2414. int count = atol(sql);
  2415. strOrderNumberArray.SetSize(count, 1);
  2416. CRstclient3phonerecordout rsSt;
  2417. rsSt.m_pDatabase = g_curdb;
  2418. if (!filter.IsEmpty())
  2419. rsSt.m_strFilter = filter;
  2420. rsSt.Open();
  2421. ii = 0;
  2422. while (!rsSt.IsEOF())
  2423. {
  2424. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2425. strOrderNumberArray.ElementAt(ii).Add(rsSt.datetime);
  2426. ii++;
  2427. rsSt.MoveNext(); if (strOrderNumberArray.GetSize() <= ii)break;
  2428. }
  2429. rsSt.Close(); strOrderNumberArray.SetSize(ii, 1);
  2430. }
  2431. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2432. {
  2433. if (Transclient3phonerecordout(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2434. {
  2435. {
  2436. sql.Format("delete from client3phonerecordout where datetime='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2437. MyExecuteSQL(g_curdb, sql);
  2438. }
  2439. }
  2440. #ifdef LIMITCOUNT
  2441. if (g_bConvertHisAll == 0)
  2442. {
  2443. if (i > 100)break;
  2444. }
  2445. #endif
  2446. }
  2447. ///////////////////////////
  2448. ////////////////////////////employeephonerecord 2010-08-09 16:22:16
  2449. strdate.Format("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2450. strdate2.Format("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2451. filter = "datetime>='" + strdate + "' and datetime<='" + strdate2 + "'";
  2452. {
  2453. strOrderNumberArray.RemoveAll();
  2454. CRecordset myset(g_curdb);
  2455. CString sql = "select count(*) as cot from employeephonerecord";
  2456. if (!filter.IsEmpty())
  2457. sql += " where " + filter;
  2458. myset.Open(CRecordset::forwardOnly, sql);
  2459. myset.GetFieldValue("cot", sql);
  2460. myset.Close();
  2461. int count = atol(sql);
  2462. strOrderNumberArray.SetSize(count, 1);
  2463. CRstemployeephonerecord rsSt;
  2464. rsSt.m_pDatabase = g_curdb;
  2465. if (!filter.IsEmpty())
  2466. rsSt.m_strFilter = filter;
  2467. rsSt.Open();
  2468. ii = 0;
  2469. while (!rsSt.IsEOF())
  2470. {
  2471. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2472. strOrderNumberArray.ElementAt(ii).Add(rsSt.datetime);
  2473. ii++;
  2474. rsSt.MoveNext();
  2475. if (strOrderNumberArray.GetSize() <= ii)
  2476. break;
  2477. }
  2478. rsSt.Close();
  2479. strOrderNumberArray.SetSize(ii, 1);
  2480. }
  2481. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2482. {
  2483. if (Transemployeephonerecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2484. {
  2485. {
  2486. sql.Format("delete from employeephonerecord where datetime='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2487. MyExecuteSQL(g_curdb, sql);
  2488. }
  2489. }
  2490. #ifdef LIMITCOUNT
  2491. if (g_bConvertHisAll == 0)
  2492. {
  2493. if (i > 100)break;
  2494. }
  2495. #endif
  2496. }
  2497. ///////////////////////////
  2498. ////////////////////////////employeephonerecordout 2010-08-09 16:22:16
  2499. strdate.Format("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2500. strdate2.Format("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2501. filter = "datetime>='" + strdate + "' and datetime<='" + strdate2 + "'";
  2502. {
  2503. strOrderNumberArray.RemoveAll();
  2504. CRecordset myset(g_curdb);
  2505. CString sql = "select count(*) as cot from employeephonerecordout";
  2506. if (!filter.IsEmpty())
  2507. sql += " where " + filter;
  2508. myset.Open(CRecordset::forwardOnly, sql);
  2509. myset.GetFieldValue("cot", sql);
  2510. myset.Close();
  2511. int count = atol(sql);
  2512. strOrderNumberArray.SetSize(count, 1);
  2513. CRstemployeephonerecordout rsSt;
  2514. rsSt.m_pDatabase = g_curdb;
  2515. if (!filter.IsEmpty())
  2516. rsSt.m_strFilter = filter;
  2517. rsSt.Open();
  2518. ii = 0;
  2519. while (!rsSt.IsEOF())
  2520. {
  2521. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2522. strOrderNumberArray.ElementAt(ii).Add(rsSt.datetime);
  2523. ii++;
  2524. rsSt.MoveNext();
  2525. if (strOrderNumberArray.GetSize() <= ii)
  2526. break;
  2527. }
  2528. rsSt.Close(); strOrderNumberArray.SetSize(ii, 1);
  2529. }
  2530. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2531. {
  2532. if (Transemployeephonerecordout(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2533. {
  2534. {
  2535. sql.Format("delete from employeephonerecordout where datetime='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2536. MyExecuteSQL(g_curdb, sql);
  2537. }
  2538. }
  2539. #ifdef LIMITCOUNT
  2540. if (g_bConvertHisAll == 0)
  2541. {
  2542. if (i > 100)break;
  2543. }
  2544. #endif
  2545. }
  2546. ///////////////////////////
  2547. ////////////////////////////phonerecord 2010-08-09 16:22:16
  2548. strdate.Format("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2549. strdate2.Format("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2550. filter = "datetime>='" + strdate + "' and datetime<='" + strdate2 + "'";
  2551. {
  2552. strOrderNumberArray.RemoveAll();
  2553. CRecordset myset(g_curdb);
  2554. CString sql = "select count(*) as cot from phonerecord";
  2555. if (!filter.IsEmpty())
  2556. sql += " where " + filter;
  2557. myset.Open(CRecordset::forwardOnly, sql);
  2558. myset.GetFieldValue("cot", sql);
  2559. myset.Close();
  2560. int count = atol(sql);
  2561. strOrderNumberArray.SetSize(count, 1);
  2562. CRstphonerecord rsSt; rsSt.m_pDatabase = g_curdb;
  2563. if (!filter.IsEmpty())
  2564. rsSt.m_strFilter = filter;
  2565. rsSt.Open();
  2566. ii = 0;
  2567. while (!rsSt.IsEOF())
  2568. {
  2569. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2570. strOrderNumberArray.ElementAt(ii).Add(rsSt.datetime);
  2571. ii++;
  2572. rsSt.MoveNext();
  2573. if (strOrderNumberArray.GetSize() <= ii)
  2574. break;
  2575. }
  2576. rsSt.Close();
  2577. strOrderNumberArray.SetSize(ii, 1);
  2578. }
  2579. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2580. {
  2581. if (Transphonerecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2582. {
  2583. {
  2584. sql.Format("delete from phonerecord where datetime='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2585. MyExecuteSQL(g_curdb, sql);
  2586. }
  2587. }
  2588. #ifdef LIMITCOUNT
  2589. if (g_bConvertHisAll == 0)
  2590. {
  2591. if (i > 100)break;
  2592. }
  2593. #endif
  2594. }
  2595. ///////////////////////////
  2596. ////////////////////////////phonerecordout 2010-08-09 16:22:16
  2597. strdate.Format("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2598. strdate2.Format("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2599. filter = "datetime>='" + strdate + "' and datetime<='" + strdate2 + "'";
  2600. {
  2601. strOrderNumberArray.RemoveAll();
  2602. CRecordset myset(g_curdb);
  2603. CString sql = "select count(*) as cot from phonerecordout";
  2604. if (!filter.IsEmpty())
  2605. sql += " where " + filter;
  2606. myset.Open(CRecordset::forwardOnly, sql);
  2607. myset.GetFieldValue("cot", sql);
  2608. myset.Close();
  2609. int count = atol(sql);
  2610. strOrderNumberArray.SetSize(count, 1);
  2611. CRstphonerecordout rsSt;
  2612. rsSt.m_pDatabase = g_curdb;
  2613. if (!filter.IsEmpty())
  2614. rsSt.m_strFilter = filter;
  2615. rsSt.Open();
  2616. ii = 0;
  2617. while (!rsSt.IsEOF())
  2618. {
  2619. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2620. strOrderNumberArray.ElementAt(ii).Add(rsSt.datetime);
  2621. ii++;
  2622. rsSt.MoveNext(); if (strOrderNumberArray.GetSize() <= ii)break;
  2623. }
  2624. rsSt.Close(); strOrderNumberArray.SetSize(ii, 1);
  2625. }
  2626. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2627. {
  2628. if (Transphonerecordout(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2629. {
  2630. {
  2631. sql.Format("delete from phonerecordout where datetime='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2632. MyExecuteSQL(g_curdb, sql);
  2633. }
  2634. }
  2635. #ifdef LIMITCOUNT
  2636. if (g_bConvertHisAll == 0)
  2637. {
  2638. if (i > 100)break;
  2639. }
  2640. #endif
  2641. }
  2642. ///////////////////////////
  2643. ////////////////////////////unknownphonerecord 2010-08-09 16:22:16
  2644. strdate.Format("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2645. strdate2.Format("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2646. filter = "datetime>='" + strdate + "' and datetime<='" + strdate2 + "'";
  2647. {
  2648. strOrderNumberArray.RemoveAll();
  2649. CRecordset myset(g_curdb);
  2650. CString sql = "select count(*) as cot from unknownphonerecord";
  2651. if (!filter.IsEmpty())
  2652. sql += " where " + filter;
  2653. myset.Open(CRecordset::forwardOnly, sql);
  2654. myset.GetFieldValue("cot", sql);
  2655. myset.Close();
  2656. int count = atol(sql);
  2657. strOrderNumberArray.SetSize(count, 1);
  2658. CRstunknownphonerecord rsSt;
  2659. rsSt.m_pDatabase = g_curdb;
  2660. if (!filter.IsEmpty())
  2661. rsSt.m_strFilter = filter;
  2662. rsSt.Open();
  2663. ii = 0;
  2664. while (!rsSt.IsEOF())
  2665. {
  2666. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2667. strOrderNumberArray.ElementAt(ii).Add(rsSt.datetime);
  2668. ii++;
  2669. rsSt.MoveNext(); if (strOrderNumberArray.GetSize() <= ii)break;
  2670. }
  2671. rsSt.Close(); strOrderNumberArray.SetSize(ii, 1);
  2672. }
  2673. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2674. {
  2675. if (Transunknownphonerecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2676. {
  2677. {
  2678. sql.Format("delete from unknownphonerecord where datetime='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2679. MyExecuteSQL(g_curdb, sql);
  2680. }
  2681. }
  2682. #ifdef LIMITCOUNT
  2683. if (g_bConvertHisAll == 0)
  2684. {
  2685. if (i > 100)break;
  2686. }
  2687. #endif
  2688. }
  2689. ///////////////////////////
  2690. ////////////////////////////unknownphonerecordout 2010-08-09 16:22:16
  2691. strdate.Format("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2692. strdate2.Format("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2693. filter = "datetime>='" + strdate + "' and datetime<='" + strdate2 + "'";
  2694. {
  2695. strOrderNumberArray.RemoveAll();
  2696. CRecordset myset(g_curdb);
  2697. CString sql = "select count(*) as cot from unknownphonerecordout";
  2698. if (!filter.IsEmpty())
  2699. sql += " where " + filter;
  2700. myset.Open(CRecordset::forwardOnly, sql);
  2701. myset.GetFieldValue("cot", sql);
  2702. myset.Close();
  2703. int count = atol(sql);
  2704. strOrderNumberArray.SetSize(count, 1);
  2705. CRstunknownphonerecordout rsSt;
  2706. rsSt.m_pDatabase = g_curdb;
  2707. if (!filter.IsEmpty())
  2708. rsSt.m_strFilter = filter;
  2709. rsSt.Open();
  2710. ii = 0;
  2711. while (!rsSt.IsEOF())
  2712. {
  2713. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2714. strOrderNumberArray.ElementAt(ii).Add(rsSt.datetime);
  2715. ii++;
  2716. rsSt.MoveNext();
  2717. if (strOrderNumberArray.GetSize() <= ii)
  2718. break;
  2719. }
  2720. rsSt.Close();
  2721. strOrderNumberArray.SetSize(ii, 1);
  2722. }
  2723. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2724. {
  2725. if (Transunknownphonerecordout(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2726. {
  2727. {
  2728. sql.Format("delete from unknownphonerecordout where datetime='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2729. MyExecuteSQL(g_curdb, sql);
  2730. }
  2731. }
  2732. #ifdef LIMITCOUNT
  2733. if (g_bConvertHisAll == 0)
  2734. {
  2735. if (i > 100)break;
  2736. }
  2737. #endif
  2738. }
  2739. ///////////////////////////
  2740. ////////////////////////////misscallrecord 2010-08-09 16:22:16
  2741. strdate.Format("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2742. strdate2.Format("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2743. filter = "datetime>='" + strdate + "' and datetime<='" + strdate2 + "'";
  2744. {
  2745. strOrderNumberArray.RemoveAll();
  2746. CRecordset myset(g_curdb);
  2747. CString sql = "select count(*) as cot from misscallrecord";
  2748. if (!filter.IsEmpty())
  2749. sql += " where " + filter;
  2750. myset.Open(CRecordset::forwardOnly, sql);
  2751. myset.GetFieldValue("cot", sql);
  2752. myset.Close();
  2753. int count = atol(sql);
  2754. strOrderNumberArray.SetSize(count, 1);
  2755. CRstmisscallrecord rsSt;
  2756. rsSt.m_pDatabase = g_curdb;
  2757. if (!filter.IsEmpty())
  2758. rsSt.m_strFilter = filter;
  2759. rsSt.Open();
  2760. ii = 0;
  2761. while (!rsSt.IsEOF())
  2762. {
  2763. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2764. strOrderNumberArray.ElementAt(ii).Add(rsSt.datetime);
  2765. ii++;
  2766. rsSt.MoveNext();
  2767. if (strOrderNumberArray.GetSize() <= ii)
  2768. break;
  2769. }
  2770. rsSt.Close();
  2771. strOrderNumberArray.SetSize(ii, 1);
  2772. }
  2773. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2774. {
  2775. if (Transmisscallrecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2776. {
  2777. {
  2778. sql.Format("delete from misscallrecord where datetime='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2779. MyExecuteSQL(g_curdb, sql);
  2780. }
  2781. }
  2782. #ifdef LIMITCOUNT
  2783. if (g_bConvertHisAll == 0)
  2784. {
  2785. if (i > 100)break;
  2786. }
  2787. #endif
  2788. }
  2789. ///////////////////////////
  2790. ////////////////////////////sendreg
  2791. strdate.Format("%04d%02d%02d000000", lastyear, 1, 1);
  2792. strdate2.Format("%04d%02d%02d999999", lastyear, 12, 31);
  2793. filter = "timestamp>='" + strdate + "' and timestamp<='" + strdate2 + "' and issended='OK'";
  2794. {
  2795. strOrderNumberArray.RemoveAll();
  2796. CRecordset myset(g_curdb);
  2797. CString sql = "select count(*) as cot from sendreg";
  2798. if (!filter.IsEmpty())
  2799. sql += " where " + filter;
  2800. myset.Open(CRecordset::forwardOnly, sql);
  2801. myset.GetFieldValue("cot", sql);
  2802. myset.Close();
  2803. int count = atol(sql);
  2804. strOrderNumberArray.SetSize(count, 1);
  2805. RstSendReg rsSt;
  2806. rsSt.m_pDatabase = g_curdb;
  2807. if (!filter.IsEmpty())
  2808. rsSt.m_strFilter = filter;
  2809. rsSt.Open();
  2810. ii = 0;
  2811. while (!rsSt.IsEOF())
  2812. {
  2813. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2814. strOrderNumberArray.ElementAt(ii).Add(rsSt.m_timestamp);
  2815. ii++;
  2816. rsSt.MoveNext(); if (strOrderNumberArray.GetSize() <= ii)break;
  2817. }
  2818. rsSt.Close(); strOrderNumberArray.SetSize(ii, 1);
  2819. }
  2820. for (i = 0; i < strOrderNumberArray.GetSize(); i++)
  2821. {
  2822. if (TransSendReg(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear))
  2823. {
  2824. {
  2825. sql.Format("delete from sendreg where [timestamp]='%s'", strOrderNumberArray.ElementAt(i).ElementAt(0));
  2826. MyExecuteSQL(g_curdb, sql);
  2827. }
  2828. }
  2829. #ifdef LIMITCOUNT
  2830. if (g_bConvertHisAll == 0)
  2831. {
  2832. if (i > 100)break;
  2833. }
  2834. #endif
  2835. }
  2836. ///////////////////////////
  2837. }
  2838. catch (...)
  2839. {
  2840. WriteLogin("出错在函数TransHisData中");
  2841. }
  2842. if (g_bConvertHisAll)WriteLogin("转换完成!");
  2843. g_bConvertHisAll = 0;
  2844. WriteLogin("转历史数据完成");
  2845. }
  2846. //------------------------------------------------------------------------------------
  2847. // Jeff remark
  2848. // 函数:CheckYear
  2849. // 描述:
  2850. // 1.检查指定年份的历史数据库mdf文件是否存在,存在则直接附加
  2851. // 2.不存在,则使用null.mdf文件拷贝创建历史年份数据库mdf并附加;
  2852. // 参数:
  2853. // year:被检查年份值;
  2854. // 返回:void
  2855. //------------------------------------------------------------------------------------
  2856. #if JEFF_TEST_ON
  2857. void CDBServerDlg::CheckYear(int year)
  2858. {
  2859. try
  2860. {
  2861. #ifdef SQLSERVER_VERSION
  2862. CString sql;
  2863. // 1.判断年份数据库是否存在;
  2864. CString strPathOfYearmdf;
  2865. CString strPathOfYearldf;
  2866. strPathOfYearmdf.Format("%s\\数据\\%d.mdf", g_mainpath, year);
  2867. strPathOfYearldf.Format("%s\\数据\\%d_log.ldf", g_mainpath, year);
  2868. CString strPathOfnulldbmdf = g_mainpath + "\\数据\\dbnull.mdf";
  2869. CString strPathOfnulldbldf = g_mainpath + "\\数据\\dbnull_log.ldf";
  2870. if (PathFileExists(strPathOfYearmdf) == TRUE)
  2871. {
  2872. if (PathFileExists(strPathOfYearldf) == TRUE)
  2873. {
  2874. sql.Format("exec sp_attach_db '%d',@filename1='%s',@filename2='%s'", year, strPathOfYearmdf, strPathOfYearldf);
  2875. }
  2876. else
  2877. {
  2878. // 此时要删除dbnull_log.ldf文件;
  2879. // 因为如果2015没有对应的ldf文件,在逻辑名仍为dbnull没有改为2015时,他会使用dbnull_log.ldf做为2015数据库的日志文件;
  2880. // 这样造成其他数据库在使用dbnull时会产生错误;
  2881. DeleteFile(strPathOfnulldbldf);//删除dbnull_log.ldf文件;
  2882. sql.Format("exec sp_attach_db '%d',@filename1='%s'", year, strPathOfYearmdf);
  2883. }
  2884. g_db.SetQueryTimeout(600);
  2885. try
  2886. {
  2887. g_db.ExecuteSQL(sql);
  2888. }
  2889. catch (CDBException * e)
  2890. {
  2891. WriteLogin(e->m_strError);
  2892. WriteLogin("历史数据库初始化失败!");
  2893. #ifdef _DEBUG
  2894. e->ReportError();
  2895. #endif
  2896. e->Delete();
  2897. return;
  2898. }
  2899. }
  2900. else
  2901. {
  2902. // 判断dbnull.mdf文件是否存在;
  2903. if (PathFileExists(strPathOfnulldbmdf) == FALSE)
  2904. {
  2905. WriteLogin("空数据库丢失!");
  2906. return;
  2907. }
  2908. // 判断拷贝mdf文件是否失败;
  2909. if (FALSE == CopyFile(strPathOfnulldbmdf, strPathOfYearmdf, 1))
  2910. {
  2911. DWORD dwError = ::GetLastError();
  2912. CString strDescription;
  2913. strDescription.Format("dbnull.mdf拷贝为%d.mdf失败", year);
  2914. ErrorExit(strDescription, dwError);
  2915. return;
  2916. }
  2917. else
  2918. {
  2919. DeleteFile(strPathOfYearldf); // 删除%d_log.LDF文件;
  2920. if (PathFileExists(strPathOfnulldbldf) == TRUE)
  2921. {
  2922. if (FALSE == CopyFile(strPathOfnulldbldf, strPathOfYearldf, 1))
  2923. {
  2924. DWORD dwError = ::GetLastError();
  2925. CString strDescription;
  2926. strDescription.Format("null.mdf拷贝为%d.mdf", year);
  2927. ErrorExit(strDescription, dwError);
  2928. // 此时要删除dbnull_log.ldf文件;
  2929. // 因为如果2015没有对应的ldf文件,在逻辑名仍为dbnull没有改为2015时,他会使用dbnull_log.ldf做为2015数据库的日志文件;
  2930. // 这样造成其他数据库在使用dbnull时会产生错误;
  2931. DeleteFile(strPathOfnulldbldf);//删除dbnull_log.ldf文件;
  2932. sql.Format("exec sp_attach_db '%d',@filename1='%s'", year, strPathOfYearmdf);
  2933. }
  2934. else
  2935. {
  2936. sql.Format("exec sp_attach_db '%d',@filename1='%s',@filename2='%s'", year, strPathOfYearmdf, strPathOfYearldf);
  2937. }
  2938. }
  2939. else
  2940. {
  2941. // 此时要删除dbnull_log.ldf文件;
  2942. // 因为如果2015没有对应的ldf文件,在逻辑名仍为dbnull没有改为2015时,他会使用dbnull_log.ldf做为2015数据库的日志文件;
  2943. // 这样造成其他数据库在使用dbnull时会产生错误;
  2944. DeleteFile(strPathOfnulldbldf);//删除dbnull_log.ldf文件;
  2945. sql.Format("exec sp_attach_db '%d',@filename1='%s'", year, strPathOfYearmdf);
  2946. }
  2947. g_db.SetQueryTimeout(600);
  2948. try
  2949. {
  2950. g_db.ExecuteSQL(sql);
  2951. }
  2952. catch (CDBException * e)
  2953. {
  2954. WriteLogin(e->m_strError);
  2955. WriteLogin("历史数据库初始化失败!");
  2956. #ifdef _DEBUG
  2957. e->ReportError();
  2958. #endif
  2959. e->Delete();
  2960. return;
  2961. }
  2962. }
  2963. }
  2964. // 附加成功后,修改逻辑名称;
  2965. sql.Format("alter database [%d] modify file(name='dbnull',newname='%d')", year, year);
  2966. try
  2967. {
  2968. g_db.ExecuteSQL(sql);
  2969. }
  2970. catch (CDBException * e)
  2971. {
  2972. WriteLogin(e->m_strError);
  2973. WriteLogin("修改历史数据库主文件逻辑名失败,请手动修改!");
  2974. #ifdef _DEBUG
  2975. e->ReportError();
  2976. #endif
  2977. e->Delete();
  2978. }
  2979. sql.Format("alter database [%d] modify file(name='dbnull_log',newname='%d_log')", year, year);
  2980. try
  2981. {
  2982. g_db.ExecuteSQL(sql);
  2983. }
  2984. catch (CDBException * e)
  2985. {
  2986. WriteLogin(e->m_strError);
  2987. WriteLogin("修改历史数据库日志文件逻辑名失败,请手动修改!");
  2988. #ifdef _DEBUG
  2989. e->ReportError();
  2990. #endif
  2991. e->Delete();
  2992. }
  2993. OnExit2();
  2994. #else
  2995. CString path,sql;
  2996. path.Format ("%s\\数据\\%d.mdb", g_mainpath, year);
  2997. if(::PathFileExists (path)==0)
  2998. {
  2999. CString nulldb=g_mainpath+"\\数据\\dbnull.mdb";
  3000. ::CopyFile (nulldb, path, 1);
  3001. CDatabase *db=new CDatabase;
  3002. CString strCon;
  3003. strCon.Format("DRIVER=Microsoft Access Driver (*.mdb);DSN='';DBQ=%s;PWD=lijialyfz",path);
  3004. if(db->OpenEx(strCon,CDatabase::noOdbcDialog))
  3005. {
  3006. g_nYearArray.Add (year);
  3007. g_dbHistoryArray.Add (db);
  3008. sql.Format ("insert into historydb([year])values('%d')", year);
  3009. MyExecuteSQL(&g_db, sql);
  3010. }
  3011. else
  3012. delete db;
  3013. }
  3014. #endif
  3015. }
  3016. catch (...)
  3017. {
  3018. WriteLogin("出错在函数CheckYear中");
  3019. }
  3020. }
  3021. #else
  3022. void CDBServerDlg::CheckYear(int year)
  3023. {
  3024. try
  3025. {
  3026. #ifdef SQLSERVER_VERSION
  3027. CString strPathOfYearmdf;
  3028. CString strPathOfYearldf;
  3029. CString sql;
  3030. strPathOfYearmdf.Format("%s\\数据\\%d.mdf", g_mainpath, year);
  3031. strPathOfYearldf.Format("%s\\数据\\%d_log.LDF", g_mainpath, year);
  3032. ::DeleteFile(strPathOfYearldf); // 删除%d_log.LDF文件;
  3033. {
  3034. CString strPathOfnulldbmdf = g_mainpath + "\\数据\\dbnull.mdf";
  3035. CString strPathOfnulldbldf = g_mainpath + "\\数据\\dbnull_log.LDF";
  3036. ::DeleteFile(strPathOfnulldbldf); // 删除%d_log.LDF文件;
  3037. // 1.判断null.mdf文件是否存在;
  3038. if (::PathFileExists(strPathOfnulldbmdf) == 0)
  3039. {
  3040. WriteLogin("空数据库丢失!");
  3041. return;
  3042. }
  3043. // 2.若年份mdf文件不存在,用null.mdf复制一份年份mdf数据库文件;
  3044. BOOL bCopyed = 0;
  3045. if (::PathFileExists(strPathOfYearmdf) == 0)
  3046. {
  3047. #if 0
  3048. ::CopyFile(nulldb, path, 1);
  3049. bCopyed=1;
  3050. #else // Jeff add:判断拷贝文件失败的原因;
  3051. if (!::CopyFile(strPathOfnulldbmdf, strPathOfYearmdf, 1))
  3052. {
  3053. DWORD dwError = ::GetLastError();
  3054. CString strDescription;
  3055. strDescription.Format("null.mdf拷贝为%d.mdf", year);
  3056. ErrorExit(strDescription, dwError);
  3057. // return;//直接返回;
  3058. }
  3059. else
  3060. {
  3061. bCopyed = 1;
  3062. }
  3063. #endif
  3064. }
  3065. if (::PathFileExists(strPathOfYearmdf) == 0)
  3066. {
  3067. WriteLogin("拷贝数据库文件失败!");
  3068. return;
  3069. }
  3070. BOOL bLog = 0;
  3071. if (::PathFileExists(strPathOfnulldbldf))
  3072. {
  3073. bLog = 1;
  3074. }
  3075. // .将年份数据库mdf附加到数据库里;
  3076. CString sql;
  3077. if (bCopyed)
  3078. {
  3079. if (bLog)
  3080. sql.Format("exec sp_attach_db '%s',@filename1='%s',@filename2='%s'", "dbnull", strPathOfYearmdf, strPathOfYearldf);
  3081. else
  3082. sql.Format("exec sp_attach_db '%s',@filename1='%s'", "dbnull", strPathOfYearmdf);
  3083. g_db.SetQueryTimeout(600);
  3084. try
  3085. {
  3086. g_db.ExecuteSQL(sql);
  3087. }
  3088. catch (CDBException * e)
  3089. {
  3090. WriteLogin(e->m_strError);
  3091. WriteLogin("历史数据库初始化失败!");
  3092. #ifdef _DEBUG
  3093. e->ReportError();
  3094. #endif
  3095. e->Delete();
  3096. }
  3097. sql.Format("exec sp_renamedb '%s','%d'", "dbnull", year); g_db.ExecuteSQL(sql);
  3098. }
  3099. else // 没有执行CopyFile,年份mdf原本就存在;
  3100. {
  3101. if (bLog)
  3102. sql.Format("exec sp_attach_db '%d',@filename1='%s',@filename2='%s'", year, strPathOfYearmdf, strPathOfYearldf);
  3103. else
  3104. sql.Format("exec sp_attach_db '%d',@filename1='%s'", year, strPathOfYearmdf);
  3105. g_db.SetQueryTimeout(600);
  3106. try
  3107. {
  3108. g_db.ExecuteSQL(sql);
  3109. }
  3110. catch (CDBException * e)
  3111. {
  3112. WriteLogin(e->m_strError);
  3113. WriteLogin("历史数据库初始化失败!");
  3114. #ifdef _DEBUG
  3115. e->ReportError();
  3116. #endif
  3117. e->Delete();
  3118. }
  3119. }
  3120. OnExit2();
  3121. /* g_db.SetQueryTimeout(100);
  3122. CDatabase *db=new CDatabase;
  3123. try
  3124. {
  3125. CString strCon;
  3126. strCon.Format(_T("driver={SQL Server};Server=%s;DATABASE=%d;%s"), g_sservrename,year,g_sdbpsw);
  3127. db->OpenEx(strCon,CDatabase::noOdbcDialog);
  3128. g_nYearArray.Add (year);
  3129. dbarray.Add (db);
  3130. sql.Format ("insert into [historydb]([year])values('%d')", year);
  3131. MyExecuteSQL(&g_db, sql);
  3132. }
  3133. catch(CDBException * e)
  3134. {
  3135. delete db;
  3136. WriteLogin(e->m_strError);
  3137. WriteLogin("历史数据库打开失败!");
  3138. }*/
  3139. }
  3140. #else
  3141. CString path,sql;
  3142. path.Format ("%s\\数据\\%d.mdb", g_mainpath, year);
  3143. if(::PathFileExists (path)==0)
  3144. {
  3145. CString nulldb=g_mainpath+"\\数据\\dbnull.mdb";
  3146. ::CopyFile (nulldb, path, 1);
  3147. CDatabase *db=new CDatabase;
  3148. CString strCon;
  3149. strCon.Format("DRIVER=Microsoft Access Driver (*.mdb);DSN='';DBQ=%s;PWD=lijialyfz",path);
  3150. if(db->OpenEx(strCon,CDatabase::noOdbcDialog))
  3151. {
  3152. g_nYearArray.Add (year);
  3153. g_dbHistoryArray.Add (db);
  3154. sql.Format ("insert into historydb([year])values('%d')", year);
  3155. MyExecuteSQL(&g_db, sql);
  3156. }
  3157. else
  3158. delete db;
  3159. }
  3160. #endif
  3161. }
  3162. catch (...)
  3163. {
  3164. WriteLogin("出错在函数CheckYear中");
  3165. }
  3166. }
  3167. #endif
  3168. CDatabase* CDBServerDlg::GetDB(int year)
  3169. {
  3170. try
  3171. {
  3172. for (int i = 0; i < g_nYearArray.GetSize(); i++)
  3173. {
  3174. if (g_nYearArray.ElementAt(i) == year)
  3175. {
  3176. return g_dbHistoryArray.ElementAt(i);
  3177. }
  3178. }
  3179. return NULL;
  3180. }
  3181. catch (...)
  3182. {
  3183. WriteLogin("出错在函数GetDB中");
  3184. }
  3185. return NULL;
  3186. }
  3187. /************************************************************************/
  3188. /* mark by Jeff;
  3189. /* 函数:CheckDinDanExist
  3190. /* 描述:
  3191. /* 参数:
  3192. /* pBeConverted_db:(源)
  3193. /* pToConverted_db:(目标)
  3194. /* strOderNumber:
  3195. /* pRetArray:
  3196. /*
  3197. /* 返回:1表示正常,100及以上表示源数据库里记录 > 目标数据库记录;
  3198. /*
  3199. /************************************************************************/
  3200. BOOL CDBServerDlg::CheckDinDanExist(CDatabase *pBeConverted_db, CDatabase *pToConverted_db, CString strOderNumber, CStringArray *pRetArray)
  3201. {
  3202. try
  3203. {
  3204. pRetArray->RemoveAll();
  3205. int count1 = 0;
  3206. int count2 = 0;
  3207. CString sql;
  3208. {
  3209. CRecordset myset(pBeConverted_db);
  3210. sql = "select count(*) as cot from dindan where id='" + strOderNumber + "'";
  3211. myset.Open(CRecordset::forwardOnly, sql);
  3212. myset.GetFieldValue("cot", sql);
  3213. myset.Close();
  3214. count1 = atoi(sql);
  3215. }
  3216. {
  3217. CRecordset myset(pToConverted_db);
  3218. sql = "select count(*) as cot from dindan where id='" + strOderNumber + "'";
  3219. myset.Open(CRecordset::forwardOnly, sql);
  3220. myset.GetFieldValue("cot", sql);
  3221. myset.Close();
  3222. count2 = atoi(sql);
  3223. }
  3224. if (count1 > count2)//100
  3225. pRetArray->Add("0");
  3226. else
  3227. pRetArray->Add("1");
  3228. {
  3229. CRecordset myset(pBeConverted_db);
  3230. sql = "select count(*) as cot from dindansp where id='" + strOderNumber + "'";
  3231. myset.Open(CRecordset::forwardOnly, sql);
  3232. myset.GetFieldValue("cot", sql);
  3233. myset.Close();
  3234. count1 = atoi(sql);
  3235. }
  3236. {
  3237. CRecordset myset(pToConverted_db);
  3238. sql = "select count(*) as cot from dindansp where id='" + strOderNumber + "'";
  3239. myset.Open(CRecordset::forwardOnly, sql);
  3240. myset.GetFieldValue("cot", sql);
  3241. myset.Close();
  3242. count2 = atoi(sql);
  3243. }
  3244. if (count1 > count2)//101
  3245. pRetArray->Add("0");
  3246. else
  3247. pRetArray->Add("1");
  3248. {
  3249. CRecordset myset(pBeConverted_db);
  3250. sql = "select count(*) as cot from dindanbukuan where id='" + strOderNumber + "'";
  3251. myset.Open(CRecordset::forwardOnly, sql);
  3252. myset.GetFieldValue("cot", sql);
  3253. myset.Close();
  3254. count1 = atoi(sql);
  3255. }
  3256. {
  3257. CRecordset myset(pToConverted_db);
  3258. sql = "select count(*) as cot from dindanbukuan where id='" + strOderNumber + "'";
  3259. myset.Open(CRecordset::forwardOnly, sql);
  3260. myset.GetFieldValue("cot", sql);
  3261. myset.Close();
  3262. count2 = atoi(sql);
  3263. }
  3264. if (count1 > count2)//102
  3265. pRetArray->Add("0");
  3266. else
  3267. pRetArray->Add("1");
  3268. {
  3269. CRecordset myset(pBeConverted_db);
  3270. sql = "select count(*) as cot from dindanbukuan2 where id='" + strOderNumber + "'";
  3271. myset.Open(CRecordset::forwardOnly, sql);
  3272. myset.GetFieldValue("cot", sql);
  3273. myset.Close();
  3274. count1 = atoi(sql);
  3275. }
  3276. {
  3277. CRecordset myset(pToConverted_db);
  3278. sql = "select count(*) as cot from dindanbukuan2 where id='" + strOderNumber + "'";
  3279. myset.Open(CRecordset::forwardOnly, sql);
  3280. myset.GetFieldValue("cot", sql);
  3281. myset.Close();
  3282. count2 = atoi(sql);
  3283. }
  3284. if (count1 > count2)//103
  3285. pRetArray->Add("0");
  3286. else
  3287. pRetArray->Add("1");
  3288. {
  3289. CRecordset myset(pBeConverted_db);
  3290. sql = "select count(*) as cot from photoprint where id='" + strOderNumber + "'";
  3291. myset.Open(CRecordset::forwardOnly, sql);
  3292. myset.GetFieldValue("cot", sql);
  3293. myset.Close();
  3294. count1 = atoi(sql);
  3295. }
  3296. {
  3297. CRecordset myset(pToConverted_db);
  3298. sql = "select count(*) as cot from photoprint where id='" + strOderNumber + "'";
  3299. myset.Open(CRecordset::forwardOnly, sql);
  3300. myset.GetFieldValue("cot", sql);
  3301. myset.Close();
  3302. count2 = atoi(sql);
  3303. }
  3304. if (count1 > count2)//104
  3305. pRetArray->Add("0");
  3306. else
  3307. pRetArray->Add("1");
  3308. {
  3309. CRecordset myset(pBeConverted_db);
  3310. sql = "select count(*) as cot from client where id='" + strOderNumber + "'";
  3311. myset.Open(CRecordset::forwardOnly, sql);
  3312. myset.GetFieldValue("cot", sql);
  3313. myset.Close();
  3314. count1 = atoi(sql);
  3315. }
  3316. {
  3317. CRecordset myset(pToConverted_db);
  3318. sql = "select count(*) as cot from client where id='" + strOderNumber + "'";
  3319. myset.Open(CRecordset::forwardOnly, sql);
  3320. myset.GetFieldValue("cot", sql);
  3321. myset.Close();
  3322. count2 = atoi(sql);
  3323. }
  3324. if (count1 > count2)//105
  3325. pRetArray->Add("0");
  3326. else
  3327. pRetArray->Add("1");
  3328. {
  3329. CRecordset myset(pBeConverted_db);
  3330. sql = "select count(*) as cot from burncdreg where id='" + strOderNumber + "'";
  3331. myset.Open(CRecordset::forwardOnly, sql);
  3332. myset.GetFieldValue("cot", sql);
  3333. myset.Close();
  3334. count1 = atoi(sql);
  3335. }
  3336. {
  3337. CRecordset myset(pToConverted_db);
  3338. sql = "select count(*) as cot from burncdreg where id='" + strOderNumber + "'";
  3339. myset.Open(CRecordset::forwardOnly, sql);
  3340. myset.GetFieldValue("cot", sql);
  3341. myset.Close();
  3342. count2 = atoi(sql);
  3343. }
  3344. if (count1 > count2)//7
  3345. pRetArray->Add("0");
  3346. else
  3347. pRetArray->Add("1");
  3348. {
  3349. CRecordset myset(pBeConverted_db);
  3350. sql = "select count(*) as cot from digitalwork where id='" + strOderNumber + "'";
  3351. myset.Open(CRecordset::forwardOnly, sql);
  3352. myset.GetFieldValue("cot", sql);
  3353. myset.Close();
  3354. count1 = atoi(sql);
  3355. }
  3356. {
  3357. CRecordset myset(pToConverted_db);
  3358. sql = "select count(*) as cot from digitalwork where id='" + strOderNumber + "'";
  3359. myset.Open(CRecordset::forwardOnly, sql);
  3360. myset.GetFieldValue("cot", sql);
  3361. myset.Close();
  3362. count2 = atoi(sql);
  3363. }
  3364. if (count1 > count2)//8
  3365. pRetArray->Add("0");
  3366. else
  3367. pRetArray->Add("1");
  3368. {
  3369. CRecordset myset(pBeConverted_db);
  3370. sql = "select count(*) as cot from mywork where id='" + strOderNumber + "'";
  3371. myset.Open(CRecordset::forwardOnly, sql);
  3372. myset.GetFieldValue("cot", sql);
  3373. myset.Close();
  3374. count1 = atoi(sql);
  3375. }
  3376. {
  3377. CRecordset myset(pToConverted_db);
  3378. sql = "select count(*) as cot from mywork where id='" + strOderNumber + "'";
  3379. myset.Open(CRecordset::forwardOnly, sql);
  3380. myset.GetFieldValue("cot", sql);
  3381. myset.Close();
  3382. count2 = atoi(sql);
  3383. }
  3384. if (count1 > count2)//9
  3385. pRetArray->Add("0");
  3386. else
  3387. pRetArray->Add("1");
  3388. {
  3389. CRecordset myset(pBeConverted_db);
  3390. sql = "select count(*) as cot from dindanjd where id='" + strOderNumber + "'";
  3391. myset.Open(CRecordset::forwardOnly, sql);
  3392. myset.GetFieldValue("cot", sql);
  3393. myset.Close();
  3394. count1 = atoi(sql);
  3395. }
  3396. {
  3397. CRecordset myset(pToConverted_db);
  3398. sql = "select count(*) as cot from dindanjd where id='" + strOderNumber + "'";
  3399. myset.Open(CRecordset::forwardOnly, sql);
  3400. myset.GetFieldValue("cot", sql);
  3401. myset.Close();
  3402. count2 = atoi(sql);
  3403. }
  3404. if (count1 > count2)//10
  3405. pRetArray->Add("0");
  3406. else
  3407. pRetArray->Add("1");
  3408. {
  3409. CRecordset myset(pBeConverted_db);
  3410. sql = "select count(*) as cot from dindansp2 where id='" + strOderNumber + "'";
  3411. myset.Open(CRecordset::forwardOnly, sql);
  3412. myset.GetFieldValue("cot", sql);
  3413. myset.Close();
  3414. count1 = atoi(sql);
  3415. }
  3416. {
  3417. CRecordset myset(pToConverted_db);
  3418. sql = "select count(*) as cot from dindansp2 where id='" + strOderNumber + "'";
  3419. myset.Open(CRecordset::forwardOnly, sql);
  3420. myset.GetFieldValue("cot", sql);
  3421. myset.Close();
  3422. count2 = atoi(sql);
  3423. }
  3424. if (count1 > count2)
  3425. pRetArray->Add("0");
  3426. else
  3427. pRetArray->Add("1");
  3428. {
  3429. CRecordset myset(pBeConverted_db);
  3430. sql = "select count(*) as cot from dindansp3 where id='" + strOderNumber + "'";
  3431. myset.Open(CRecordset::forwardOnly, sql);
  3432. myset.GetFieldValue("cot", sql);
  3433. myset.Close();
  3434. count1 = atoi(sql);
  3435. }
  3436. {
  3437. CRecordset myset(pToConverted_db);
  3438. sql = "select count(*) as cot from dindansp3 where id='" + strOderNumber + "'";
  3439. myset.Open(CRecordset::forwardOnly, sql);
  3440. myset.GetFieldValue("cot", sql);
  3441. myset.Close();
  3442. count2 = atoi(sql);
  3443. }
  3444. if (count1 > count2)
  3445. pRetArray->Add("0");
  3446. else
  3447. pRetArray->Add("1");
  3448. for (int i = 0; i < pRetArray->GetSize(); i++)
  3449. {
  3450. if (pRetArray->ElementAt(i) == "0")return 100 + i;
  3451. }
  3452. return 1;
  3453. }
  3454. catch (CDBException * e)
  3455. {
  3456. WriteLogin(e->m_strError);
  3457. WriteLogin("出错在函数check1中");
  3458. #ifdef _DEBUG
  3459. e->ReportError();
  3460. #endif
  3461. e->Delete();
  3462. }
  3463. return 100;
  3464. }
  3465. BOOL CDBServerDlg::CheckPayOutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  3466. {
  3467. try
  3468. {
  3469. int count1 = 0;
  3470. int count2 = 0;
  3471. CString sql;
  3472. {
  3473. CRecordset myset(pdb1);
  3474. sql.Format("select count(*) as cot from gudingfeiyong where [id]=%d", atol(id));
  3475. myset.Open(CRecordset::forwardOnly, sql);
  3476. myset.GetFieldValue("cot", sql);
  3477. myset.Close();
  3478. count1 = atoi(sql);
  3479. }
  3480. {
  3481. CRecordset myset(pdb2);
  3482. sql = "select count(*) as cot from gudingfeiyong where [id]='" + id + "'";
  3483. myset.Open(CRecordset::forwardOnly, sql);
  3484. myset.GetFieldValue("cot", sql);
  3485. myset.Close();
  3486. count2 = atoi(sql);
  3487. }
  3488. if (count1 > count2)return 0;
  3489. return 1;
  3490. }
  3491. catch (...)
  3492. {
  3493. WriteLogin("出错在函数check2中");
  3494. }
  3495. return 0;
  3496. }
  3497. BOOL CDBServerDlg::CheckIncomeExist(CDatabase *pdb1, CDatabase *pdb2, CString id, CStringArray *pretarray)
  3498. {
  3499. try
  3500. {
  3501. pretarray->RemoveAll();
  3502. int count1 = 0;
  3503. int count2 = 0;
  3504. CString sql;
  3505. {
  3506. CRecordset myset(pdb1);
  3507. sql.Format("select count(*) as cot from singleincome where [id]=%d", atol(id));
  3508. myset.Open(CRecordset::forwardOnly, sql);
  3509. myset.GetFieldValue("cot", sql);
  3510. myset.Close();
  3511. count1 = atoi(sql);
  3512. }
  3513. {
  3514. CRecordset myset(pdb2);
  3515. sql = "select count(*) as cot from singleincome where [id]='" + id + "'";
  3516. myset.Open(CRecordset::forwardOnly, sql);
  3517. myset.GetFieldValue("cot", sql);
  3518. myset.Close();
  3519. count2 = atoi(sql);
  3520. }
  3521. if (count1 > count2)
  3522. pretarray->Add("0");
  3523. else
  3524. pretarray->Add("1");
  3525. {
  3526. CRecordset myset(pdb1);
  3527. sql.Format("select count(*) as cot from singleincomemoney where [id]='%s'", id);
  3528. myset.Open(CRecordset::forwardOnly, sql);
  3529. myset.GetFieldValue("cot", sql);
  3530. myset.Close();
  3531. count1 = atoi(sql);
  3532. }
  3533. {
  3534. CRecordset myset(pdb2);
  3535. sql.Format("select count(*) as cot from singleincomemoney where [id]='%s'", id);
  3536. myset.Open(CRecordset::forwardOnly, sql);
  3537. myset.GetFieldValue("cot", sql);
  3538. myset.Close();
  3539. count2 = atoi(sql);
  3540. }
  3541. if (count1 > count2)
  3542. pretarray->Add("0");
  3543. else
  3544. pretarray->Add("1");
  3545. for (int i = 0; i < pretarray->GetSize(); i++)
  3546. {
  3547. if (pretarray->ElementAt(i) == "0")return 0;
  3548. }
  3549. return 1;
  3550. }
  3551. catch (...)
  3552. {
  3553. WriteLogin("出错在函数check3中");
  3554. }
  3555. return 0;
  3556. }
  3557. BOOL CDBServerDlg::CheckIncomeMoneyExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  3558. {
  3559. try
  3560. {
  3561. int count1 = 0;
  3562. int count2 = 0;
  3563. CString sql;
  3564. {
  3565. CRecordset myset(pdb1);
  3566. sql.Format("select count(*) as cot from singleincomemoney where [id]='%s'", id);
  3567. myset.Open(CRecordset::forwardOnly, sql);
  3568. myset.GetFieldValue("cot", sql);
  3569. myset.Close();
  3570. count1 = atoi(sql);
  3571. }
  3572. {
  3573. CRecordset myset(pdb2);
  3574. sql.Format("select count(*) as cot from singleincomemoney where [id]='%s'", id);
  3575. myset.Open(CRecordset::forwardOnly, sql);
  3576. myset.GetFieldValue("cot", sql);
  3577. myset.Close();
  3578. count2 = atoi(sql);
  3579. }
  3580. if (count1 > count2)return 0;
  3581. return 1;
  3582. }
  3583. catch (...)
  3584. {
  3585. WriteLogin("出错在函数check3中");
  3586. }
  3587. return 0;
  3588. }
  3589. /************************************************************************/
  3590. /* mark by Jeff
  3591. /* 函数:TransDinDan
  3592. /* 描述:
  3593. /* 参数:
  3594. /* pBeConverted_db:被转换的数据库(源);
  3595. /* pToConverted_db:要转到的数据库(目标);
  3596. /* strOrderNumber: 订单号;
  3597. /* nYear: 要转换的年份;
  3598. /*
  3599. /* 返回:
  3600. /************************************************************************/
  3601. int CDBServerDlg::TransDinDan(CDatabase *pBeConverted_db, CDatabase *pToConverted_db, CString strOrderNumber, int nYear)
  3602. {
  3603. int step = 0;
  3604. CStringArray retarray;
  3605. try
  3606. {
  3607. CString sql, str;
  3608. // CheckDinDanExist返回:1表示正常, 100及以上表示源数据库里记录 > 目标数据库记录;
  3609. if (CheckDinDanExist(pBeConverted_db, pToConverted_db, strOrderNumber, &retarray) == 1)
  3610. return 1;
  3611. step = 1;
  3612. int i;
  3613. CString temp;
  3614. int colcount;
  3615. CODBCFieldInfo fieldinfo;
  3616. int ret = 1;
  3617. // 以下全是insert into 到目录数据库中;
  3618. CRecordset myset(pBeConverted_db);
  3619. try
  3620. {
  3621. if (retarray.ElementAt(0) == "0")
  3622. {
  3623. sql.Format("insert into [%d].[dbo].[dindan] select * from [%s].[dbo].[dindan] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3624. MyExecuteSQL(pBeConverted_db, sql);
  3625. }
  3626. }
  3627. catch (CDBException * e)
  3628. {
  3629. WriteLogin("step2" + e->m_strError);
  3630. #ifdef _DEBUG
  3631. e->ReportError();
  3632. #endif
  3633. e->Delete();
  3634. ret = 2;
  3635. }
  3636. step = 2;
  3637. try
  3638. {
  3639. if (retarray.ElementAt(1) == "0")
  3640. {
  3641. sql.Format("insert into [%d].[dbo].[dindansp] select * from [%s].[dbo].[dindansp] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3642. MyExecuteSQL(pBeConverted_db, sql);
  3643. }
  3644. }
  3645. catch (CDBException * e)
  3646. {
  3647. WriteLogin("step3" + e->m_strError);
  3648. #ifdef _DEBUG
  3649. e->ReportError();
  3650. #endif
  3651. e->Delete();
  3652. ret = 3;
  3653. }
  3654. step = 3;
  3655. try
  3656. {
  3657. if (retarray.ElementAt(2) == "0")
  3658. {
  3659. sql.Format("insert into [%d].[dbo].[dindanbukuan] ([autoid],[id],[money],[ren],[date],[bz],[kind],[ren2],[item],[paytype],[jdd],[financecheck]) select [autoid],[id],[money],[ren],[date],[bz],[kind],[ren2],[item],[paytype],[jdd],[financecheck] from [%s].[dbo].[dindanbukuan] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3660. MyExecuteSQL(pBeConverted_db, sql);
  3661. }
  3662. }
  3663. catch (CDBException * e)
  3664. {
  3665. WriteLogin("step4" + e->m_strError);
  3666. #ifdef _DEBUG
  3667. e->ReportError();
  3668. #endif
  3669. e->Delete();
  3670. ret = 4;
  3671. }
  3672. step = 4;
  3673. try
  3674. {
  3675. if (retarray.ElementAt(3) == "0")
  3676. {
  3677. sql.Format("insert into [%d].[dbo].[dindanbukuan2] ([autoid],[id],[money],[ren],[date],[bz],[kind],[ren2]) select [autoid],[id],[money],[ren],[date],[bz],[kind],[ren2] from [%s].[dbo].[dindanbukuan2] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3678. MyExecuteSQL(pBeConverted_db, sql);
  3679. }
  3680. }
  3681. catch (CDBException * e)
  3682. {
  3683. WriteLogin("step5" + e->m_strError);
  3684. #ifdef _DEBUG
  3685. e->ReportError();
  3686. #endif
  3687. e->Delete();
  3688. ret = 5;
  3689. }
  3690. step = 5;
  3691. try
  3692. {
  3693. if (retarray.ElementAt(4) == "0")
  3694. {
  3695. sql.Format("insert into [%d].[dbo].[photoprint] select * from [%s].[dbo].[photoprint] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3696. MyExecuteSQL(pBeConverted_db, sql);
  3697. }
  3698. }
  3699. catch (CDBException * e)
  3700. {
  3701. WriteLogin("step6" + e->m_strError);
  3702. #ifdef _DEBUG
  3703. e->ReportError();
  3704. #endif
  3705. e->Delete();
  3706. ret = 6;
  3707. }
  3708. step = 6;
  3709. try
  3710. {
  3711. if (retarray.ElementAt(5) == "0")
  3712. {
  3713. sql.Format("insert into [%d].[dbo].[client] select * from [%s].[dbo].[client] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3714. MyExecuteSQL(pBeConverted_db, sql);
  3715. }
  3716. }
  3717. catch (CDBException * e)
  3718. {
  3719. WriteLogin("step7" + e->m_strError);
  3720. #ifdef _DEBUG
  3721. e->ReportError();
  3722. #endif
  3723. e->Delete();
  3724. ret = 7;
  3725. }
  3726. step = 7;
  3727. try
  3728. {
  3729. if (retarray.ElementAt(6) == "0")
  3730. {
  3731. sql.Format("insert into [%d].[dbo].[burncdreg] select * from [%s].[dbo].[burncdreg] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3732. MyExecuteSQL(pBeConverted_db, sql);
  3733. }
  3734. }
  3735. catch (CDBException * e)
  3736. {
  3737. WriteLogin("step8" + e->m_strError);
  3738. #ifdef _DEBUG
  3739. e->ReportError();
  3740. #endif
  3741. e->Delete();
  3742. ret = 8;
  3743. }
  3744. step = 8;
  3745. try
  3746. {
  3747. if (retarray.ElementAt(7) == "0")
  3748. {
  3749. sql.Format("insert into [%d].[dbo].[digitalwork] select * from [%s].[dbo].[digitalwork] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3750. MyExecuteSQL(pBeConverted_db, sql);
  3751. }
  3752. }
  3753. catch (CDBException * e)
  3754. {
  3755. WriteLogin("step9" + e->m_strError);
  3756. #ifdef _DEBUG
  3757. e->ReportError();
  3758. #endif
  3759. e->Delete();
  3760. ret = 9;
  3761. }
  3762. step = 9;
  3763. try
  3764. {
  3765. if (retarray.ElementAt(8) == "0")
  3766. {
  3767. sql.Format("insert into [%d].[dbo].[mywork] select * from [%s].[dbo].[mywork] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3768. MyExecuteSQL(pBeConverted_db, sql);
  3769. }
  3770. }
  3771. catch (CDBException * e)
  3772. {
  3773. WriteLogin("step10" + e->m_strError);
  3774. #ifdef _DEBUG
  3775. e->ReportError();
  3776. #endif
  3777. e->Delete();
  3778. ret = 10;
  3779. }
  3780. step = 10;
  3781. try
  3782. {
  3783. if (retarray.ElementAt(9) == "0")
  3784. {
  3785. sql.Format("insert into [%d].[dbo].[dindanjd] select * from [%s].[dbo].[dindanjd] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3786. MyExecuteSQL(pBeConverted_db, sql);
  3787. }
  3788. }
  3789. catch (CDBException * e)
  3790. {
  3791. WriteLogin("step11" + e->m_strError);
  3792. #ifdef _DEBUG
  3793. e->ReportError();
  3794. #endif
  3795. e->Delete();
  3796. ret = 11;
  3797. }
  3798. step = 11;
  3799. try
  3800. {
  3801. if (retarray.ElementAt(10) == "0")
  3802. {
  3803. sql.Format("insert into [%d].[dbo].[dindansp2] select * from [%s].[dbo].[dindansp2] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3804. MyExecuteSQL(pBeConverted_db, sql);
  3805. }
  3806. }
  3807. catch (CDBException * e)
  3808. {
  3809. WriteLogin("step12" + e->m_strError);
  3810. #ifdef _DEBUG
  3811. e->ReportError();
  3812. #endif
  3813. e->Delete();
  3814. ret = 12;
  3815. }
  3816. step = 12;
  3817. try
  3818. {
  3819. if (retarray.ElementAt(11) == "0")
  3820. {
  3821. sql.Format("insert into [%d].[dbo].[dindansp3] select * from [%s].[dbo].[dindansp3] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3822. MyExecuteSQL(pBeConverted_db, sql);
  3823. }
  3824. }
  3825. catch (CDBException * e)
  3826. {
  3827. WriteLogin("step13" + e->m_strError);
  3828. #ifdef _DEBUG
  3829. e->ReportError();
  3830. #endif
  3831. e->Delete();
  3832. ret = 13;
  3833. }
  3834. if (ret != 1)return 200 + ret;
  3835. // 插入到目标数据库后再到目标数据库里查询是否存在;
  3836. return CheckDinDanExist(pBeConverted_db, pToConverted_db, strOrderNumber, &retarray);
  3837. }
  3838. catch (...)
  3839. {
  3840. CString str;
  3841. str.Format("%d size:%d", step, retarray.GetSize());
  3842. WriteLogin("出错在函数trans1中-" + str);
  3843. }
  3844. return 0;
  3845. }
  3846. BOOL CDBServerDlg::TransPayOut(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  3847. {
  3848. try
  3849. {
  3850. CString sql;
  3851. if (CheckPayOutExist(pdb1, pdb2, id))return 1;
  3852. int i; CString temp;
  3853. int colcount;
  3854. CODBCFieldInfo fieldinfo;
  3855. BOOL ret = 1;
  3856. CRecordset myset(pdb1);
  3857. try
  3858. {
  3859. sql.Format("insert into [%d].[dbo].[gudingfeiyong] select * from [%s].[dbo].[gudingfeiyong] where id=%d", year, g_nCurConvertDBName, atol(id));
  3860. MyExecuteSQL(pdb1, sql);
  3861. }
  3862. catch (CDBException * e)
  3863. {
  3864. WriteLogin(e->m_strError);
  3865. #ifdef _DEBUG
  3866. e->ReportError();
  3867. #endif
  3868. e->Delete();
  3869. ret = 0;
  3870. }
  3871. if (ret == 0)return 0;
  3872. return CheckPayOutExist(pdb1, pdb2, id);
  3873. }
  3874. catch (...)
  3875. {
  3876. WriteLogin("出错在函数trans2中");
  3877. }
  3878. return 0;
  3879. }
  3880. //singleincome
  3881. BOOL CDBServerDlg::TransIncome(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  3882. {
  3883. try
  3884. {
  3885. CString sql;
  3886. CStringArray retarray;
  3887. if (CheckIncomeExist(pdb1, pdb2, id, &retarray))return 1;
  3888. int i; CString temp;
  3889. int colcount;
  3890. CODBCFieldInfo fieldinfo;
  3891. BOOL ret = 1;
  3892. CRecordset myset(pdb1);
  3893. try
  3894. {
  3895. if (retarray.ElementAt(0) == "0")
  3896. {
  3897. sql.Format("insert into [%d].[dbo].[singleincome] select * from [%s].[dbo].[singleincome] where id=%d", year, g_nCurConvertDBName, atol(id));
  3898. MyExecuteSQL(pdb1, sql);
  3899. }
  3900. }
  3901. catch (...)
  3902. {
  3903. ret = 0;
  3904. }
  3905. try
  3906. {
  3907. if (retarray.ElementAt(1) == "0")
  3908. {
  3909. sql.Format("insert into [%d].[dbo].[singleincomemoney] select * from [%s].[dbo].[singleincomemoney] where id='%s'", year, g_nCurConvertDBName, id);
  3910. MyExecuteSQL(pdb1, sql);
  3911. }
  3912. }
  3913. catch (CDBException * e)
  3914. {
  3915. WriteLogin(e->m_strError);
  3916. #ifdef _DEBUG
  3917. e->ReportError();
  3918. #endif
  3919. e->Delete();
  3920. ret = 0;
  3921. }
  3922. if (ret == 0)return 0;
  3923. return CheckIncomeExist(pdb1, pdb2, id, &retarray);
  3924. }
  3925. catch (...)
  3926. {
  3927. WriteLogin("出错在函数trans3中");
  3928. }
  3929. return 0;
  3930. }
  3931. BOOL CDBServerDlg::TransIncomeMoney(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  3932. {
  3933. try
  3934. {
  3935. CString sql;
  3936. if (CheckIncomeMoneyExist(pdb1, pdb2, id))return 1;
  3937. int i; CString temp;
  3938. int colcount;
  3939. CODBCFieldInfo fieldinfo;
  3940. BOOL ret = 1;
  3941. CRecordset myset(pdb1);
  3942. try
  3943. {
  3944. sql.Format("insert into [%d].[dbo].[singleincomemoney] select * from [%s].[dbo].[singleincomemoney] where id='%s'", year, g_nCurConvertDBName, id);
  3945. MyExecuteSQL(pdb1, sql);
  3946. }
  3947. catch (CDBException * e)
  3948. {
  3949. WriteLogin(e->m_strError);
  3950. #ifdef _DEBUG
  3951. e->ReportError();
  3952. #endif
  3953. e->Delete();
  3954. ret = 0;
  3955. }
  3956. if (ret == 0)return 0;
  3957. return CheckIncomeMoneyExist(pdb1, pdb2, id);
  3958. }
  3959. catch (...)
  3960. {
  3961. WriteLogin("出错在函数trans3中");
  3962. }
  3963. return 0;
  3964. }
  3965. BOOL CDBServerDlg::Checkclient2phonerecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  3966. {
  3967. try
  3968. {
  3969. int count1 = 0;
  3970. int count2 = 0;
  3971. CString sql;
  3972. {
  3973. CRecordset myset(pdb1);
  3974. sql = "select count(*) as cot from client2phonerecord where [datetime]='" + id + "'";
  3975. myset.Open(CRecordset::forwardOnly, sql);
  3976. myset.GetFieldValue("cot", sql);
  3977. myset.Close();
  3978. count1 = atoi(sql);
  3979. }
  3980. {
  3981. CRecordset myset(pdb2);
  3982. sql = "select count(*) as cot from client2phonerecord where [datetime]='" + id + "'";
  3983. myset.Open(CRecordset::forwardOnly, sql);
  3984. myset.GetFieldValue("cot", sql);
  3985. myset.Close();
  3986. count2 = atoi(sql);
  3987. }
  3988. if (count1 > count2)return 0;
  3989. return 1;
  3990. }
  3991. catch (...)
  3992. {
  3993. WriteLogin("出错在函数check3中");
  3994. }
  3995. return 0;
  3996. }
  3997. BOOL CDBServerDlg::Transclient2phonerecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  3998. {
  3999. try
  4000. {
  4001. CString sql;
  4002. if (Checkclient2phonerecordExist(pdb1, pdb2, id))return 1;
  4003. int i; CString temp;
  4004. int colcount;
  4005. CODBCFieldInfo fieldinfo;
  4006. BOOL ret = 1;
  4007. CRecordset myset(pdb1);
  4008. try
  4009. {
  4010. sql.Format("insert into [%d].[dbo].[client2phonerecord] select * from [%s].[dbo].[client2phonerecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4011. MyExecuteSQL(pdb1, sql);
  4012. }
  4013. catch (...)
  4014. {
  4015. ret = 0;
  4016. }
  4017. if (ret == 0)return 0;
  4018. return Checkclient2phonerecordExist(pdb1, pdb2, id);
  4019. }
  4020. catch (...)
  4021. {
  4022. WriteLogin("出错在函数trans3中");
  4023. }
  4024. return 0;
  4025. }
  4026. BOOL CDBServerDlg::Checkclient3phonerecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4027. {
  4028. try
  4029. {
  4030. int count1 = 0;
  4031. int count2 = 0;
  4032. CString sql;
  4033. {
  4034. CRecordset myset(pdb1);
  4035. sql = "select count(*) as cot from client3phonerecord where [datetime]='" + id + "'";
  4036. myset.Open(CRecordset::forwardOnly, sql);
  4037. myset.GetFieldValue("cot", sql);
  4038. myset.Close();
  4039. count1 = atoi(sql);
  4040. }
  4041. {
  4042. CRecordset myset(pdb2);
  4043. sql = "select count(*) as cot from client3phonerecord where [datetime]='" + id + "'";
  4044. myset.Open(CRecordset::forwardOnly, sql);
  4045. myset.GetFieldValue("cot", sql);
  4046. myset.Close();
  4047. count2 = atoi(sql);
  4048. }
  4049. if (count1 > count2)return 0;
  4050. return 1;
  4051. }
  4052. catch (...)
  4053. {
  4054. WriteLogin("出错在函数check3中");
  4055. }
  4056. return 0;
  4057. }
  4058. BOOL CDBServerDlg::Transclient3phonerecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4059. {
  4060. try
  4061. {
  4062. CString sql;
  4063. if (Checkclient3phonerecordExist(pdb1, pdb2, id))return 1;
  4064. int i; CString temp;
  4065. int colcount;
  4066. CODBCFieldInfo fieldinfo;
  4067. BOOL ret = 1;
  4068. CRecordset myset(pdb1);
  4069. try
  4070. {
  4071. sql.Format("insert into [%d].[dbo].[client3phonerecord] select * from [%s].[dbo].[client3phonerecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4072. MyExecuteSQL(pdb1, sql);
  4073. }
  4074. catch (...)
  4075. {
  4076. ret = 0;
  4077. }
  4078. if (ret == 0)return 0;
  4079. return Checkclient3phonerecordExist(pdb1, pdb2, id);
  4080. }
  4081. catch (...)
  4082. {
  4083. WriteLogin("出错在函数trans3中");
  4084. }
  4085. return 0;
  4086. }
  4087. BOOL CDBServerDlg::Checkclient2phonerecordoutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4088. {
  4089. try
  4090. {
  4091. int count1 = 0;
  4092. int count2 = 0;
  4093. CString sql;
  4094. {
  4095. CRecordset myset(pdb1);
  4096. sql = "select count(*) as cot from client2phonerecordout where [datetime]='" + id + "'";
  4097. myset.Open(CRecordset::forwardOnly, sql);
  4098. myset.GetFieldValue("cot", sql);
  4099. myset.Close();
  4100. count1 = atoi(sql);
  4101. }
  4102. {
  4103. CRecordset myset(pdb2);
  4104. sql = "select count(*) as cot from client2phonerecordout where [datetime]='" + id + "'";
  4105. myset.Open(CRecordset::forwardOnly, sql);
  4106. myset.GetFieldValue("cot", sql);
  4107. myset.Close();
  4108. count2 = atoi(sql);
  4109. }
  4110. if (count1 > count2)return 0;
  4111. return 1;
  4112. }
  4113. catch (...)
  4114. {
  4115. WriteLogin("出错在函数check3中");
  4116. }
  4117. return 0;
  4118. }
  4119. BOOL CDBServerDlg::Transclient2phonerecordout(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4120. {
  4121. try
  4122. {
  4123. CString sql;
  4124. if (Checkclient2phonerecordoutExist(pdb1, pdb2, id))return 1;
  4125. int i; CString temp;
  4126. int colcount;
  4127. CODBCFieldInfo fieldinfo;
  4128. BOOL ret = 1;
  4129. CRecordset myset(pdb1);
  4130. try
  4131. {
  4132. sql.Format("insert into [%d].[dbo].[client2phonerecordout] select * from [%s].[dbo].[client2phonerecordout] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4133. MyExecuteSQL(pdb1, sql);
  4134. }
  4135. catch (...)
  4136. {
  4137. ret = 0;
  4138. }
  4139. if (ret == 0)return 0;
  4140. return Checkclient2phonerecordoutExist(pdb1, pdb2, id);
  4141. }
  4142. catch (...)
  4143. {
  4144. WriteLogin("出错在函数trans3中");
  4145. }
  4146. return 0;
  4147. }
  4148. BOOL CDBServerDlg::Checkclient3phonerecordoutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4149. {
  4150. try
  4151. {
  4152. int count1 = 0;
  4153. int count2 = 0;
  4154. CString sql;
  4155. {
  4156. CRecordset myset(pdb1);
  4157. sql = "select count(*) as cot from client3phonerecordout where [datetime]='" + id + "'";
  4158. myset.Open(CRecordset::forwardOnly, sql);
  4159. myset.GetFieldValue("cot", sql);
  4160. myset.Close();
  4161. count1 = atoi(sql);
  4162. }
  4163. {
  4164. CRecordset myset(pdb2);
  4165. sql = "select count(*) as cot from client3phonerecordout where [datetime]='" + id + "'";
  4166. myset.Open(CRecordset::forwardOnly, sql);
  4167. myset.GetFieldValue("cot", sql);
  4168. myset.Close();
  4169. count2 = atoi(sql);
  4170. }
  4171. if (count1 > count2)return 0;
  4172. return 1;
  4173. }
  4174. catch (...)
  4175. {
  4176. WriteLogin("出错在函数check3中");
  4177. }
  4178. return 0;
  4179. }
  4180. BOOL CDBServerDlg::Transclient3phonerecordout(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4181. {
  4182. try
  4183. {
  4184. CString sql;
  4185. if (Checkclient3phonerecordoutExist(pdb1, pdb2, id))return 1;
  4186. int i; CString temp;
  4187. int colcount;
  4188. CODBCFieldInfo fieldinfo;
  4189. BOOL ret = 1;
  4190. CRecordset myset(pdb1);
  4191. try
  4192. {
  4193. sql.Format("insert into [%d].[dbo].[client3phonerecordout] select * from [%s].[dbo].[client3phonerecordout] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4194. MyExecuteSQL(pdb1, sql);
  4195. }
  4196. catch (...)
  4197. {
  4198. ret = 0;
  4199. }
  4200. if (ret == 0)return 0;
  4201. return Checkclient3phonerecordoutExist(pdb1, pdb2, id);
  4202. }
  4203. catch (...)
  4204. {
  4205. WriteLogin("出错在函数trans3中");
  4206. }
  4207. return 0;
  4208. }
  4209. BOOL CDBServerDlg::CheckemployeephonerecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4210. {
  4211. try
  4212. {
  4213. int count1 = 0;
  4214. int count2 = 0;
  4215. CString sql;
  4216. {
  4217. CRecordset myset(pdb1);
  4218. sql = "select count(*) as cot from employeephonerecord where [datetime]='" + id + "'";
  4219. myset.Open(CRecordset::forwardOnly, sql);
  4220. myset.GetFieldValue("cot", sql);
  4221. myset.Close();
  4222. count1 = atoi(sql);
  4223. }
  4224. {
  4225. CRecordset myset(pdb2);
  4226. sql = "select count(*) as cot from employeephonerecord where [datetime]='" + id + "'";
  4227. myset.Open(CRecordset::forwardOnly, sql);
  4228. myset.GetFieldValue("cot", sql);
  4229. myset.Close();
  4230. count2 = atoi(sql);
  4231. }
  4232. if (count1 > count2)return 0;
  4233. return 1;
  4234. }
  4235. catch (...)
  4236. {
  4237. WriteLogin("出错在函数check3中");
  4238. }
  4239. return 0;
  4240. }
  4241. BOOL CDBServerDlg::Transemployeephonerecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4242. {
  4243. try
  4244. {
  4245. CString sql;
  4246. if (CheckemployeephonerecordExist(pdb1, pdb2, id))return 1;
  4247. int i; CString temp;
  4248. int colcount;
  4249. CODBCFieldInfo fieldinfo;
  4250. BOOL ret = 1;
  4251. CRecordset myset(pdb1);
  4252. try
  4253. {
  4254. sql.Format("insert into [%d].[dbo].[employeephonerecord] select * from [%s].[dbo].[employeephonerecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4255. MyExecuteSQL(pdb1, sql);
  4256. }
  4257. catch (...)
  4258. {
  4259. ret = 0;
  4260. }
  4261. if (ret == 0)return 0;
  4262. return CheckemployeephonerecordExist(pdb1, pdb2, id);
  4263. }
  4264. catch (...)
  4265. {
  4266. WriteLogin("出错在函数trans3中");
  4267. }
  4268. return 0;
  4269. }
  4270. BOOL CDBServerDlg::CheckemployeephonerecordoutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4271. {
  4272. try
  4273. {
  4274. int count1 = 0;
  4275. int count2 = 0;
  4276. CString sql;
  4277. {
  4278. CRecordset myset(pdb1);
  4279. sql = "select count(*) as cot from employeephonerecordout where [datetime]='" + id + "'";
  4280. myset.Open(CRecordset::forwardOnly, sql);
  4281. myset.GetFieldValue("cot", sql);
  4282. myset.Close();
  4283. count1 = atoi(sql);
  4284. }
  4285. {
  4286. CRecordset myset(pdb2);
  4287. sql = "select count(*) as cot from employeephonerecordout where [datetime]='" + id + "'";
  4288. myset.Open(CRecordset::forwardOnly, sql);
  4289. myset.GetFieldValue("cot", sql);
  4290. myset.Close();
  4291. count2 = atoi(sql);
  4292. }
  4293. if (count1 > count2)return 0;
  4294. return 1;
  4295. }
  4296. catch (...)
  4297. {
  4298. WriteLogin("出错在函数check3中");
  4299. }
  4300. return 0;
  4301. }
  4302. BOOL CDBServerDlg::Transemployeephonerecordout(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4303. {
  4304. try
  4305. {
  4306. CString sql;
  4307. if (CheckemployeephonerecordoutExist(pdb1, pdb2, id))return 1;
  4308. int i; CString temp;
  4309. int colcount;
  4310. CODBCFieldInfo fieldinfo;
  4311. BOOL ret = 1;
  4312. CRecordset myset(pdb1);
  4313. try
  4314. {
  4315. sql.Format("insert into [%d].[dbo].[employeephonerecordout] select * from [%s].[dbo].[employeephonerecordout] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4316. MyExecuteSQL(pdb1, sql);
  4317. }
  4318. catch (...)
  4319. {
  4320. ret = 0;
  4321. }
  4322. if (ret == 0)return 0;
  4323. return CheckemployeephonerecordoutExist(pdb1, pdb2, id);
  4324. }
  4325. catch (...)
  4326. {
  4327. WriteLogin("出错在函数trans3中");
  4328. }
  4329. return 0;
  4330. }
  4331. BOOL CDBServerDlg::CheckphonerecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4332. {
  4333. try
  4334. {
  4335. int count1 = 0;
  4336. int count2 = 0;
  4337. CString sql;
  4338. {
  4339. CRecordset myset(pdb1);
  4340. sql = "select count(*) as cot from phonerecord where [datetime]='" + id + "'";
  4341. myset.Open(CRecordset::forwardOnly, sql);
  4342. myset.GetFieldValue("cot", sql);
  4343. myset.Close();
  4344. count1 = atoi(sql);
  4345. }
  4346. {
  4347. CRecordset myset(pdb2);
  4348. sql = "select count(*) as cot from phonerecord where [datetime]='" + id + "'";
  4349. myset.Open(CRecordset::forwardOnly, sql);
  4350. myset.GetFieldValue("cot", sql);
  4351. myset.Close();
  4352. count2 = atoi(sql);
  4353. }
  4354. if (count1 > count2)return 0;
  4355. return 1;
  4356. }
  4357. catch (...)
  4358. {
  4359. WriteLogin("出错在函数check3中");
  4360. }
  4361. return 0;
  4362. }
  4363. BOOL CDBServerDlg::Transphonerecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4364. {
  4365. try
  4366. {
  4367. CString sql;
  4368. if (CheckphonerecordExist(pdb1, pdb2, id))return 1;
  4369. int i; CString temp;
  4370. int colcount;
  4371. CODBCFieldInfo fieldinfo;
  4372. BOOL ret = 1;
  4373. CRecordset myset(pdb1);
  4374. try
  4375. {
  4376. sql.Format("insert into [%d].[dbo].[phonerecord] select * from [%s].[dbo].[phonerecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4377. MyExecuteSQL(pdb1, sql);
  4378. }
  4379. catch (...)
  4380. {
  4381. ret = 0;
  4382. }
  4383. if (ret == 0)return 0;
  4384. return CheckphonerecordExist(pdb1, pdb2, id);
  4385. }
  4386. catch (...)
  4387. {
  4388. WriteLogin("出错在函数trans3中");
  4389. }
  4390. return 0;
  4391. }
  4392. BOOL CDBServerDlg::CheckphonerecordoutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4393. {
  4394. try
  4395. {
  4396. int count1 = 0;
  4397. int count2 = 0;
  4398. CString sql;
  4399. {
  4400. CRecordset myset(pdb1);
  4401. sql = "select count(*) as cot from phonerecordout where [datetime]='" + id + "'";
  4402. myset.Open(CRecordset::forwardOnly, sql);
  4403. myset.GetFieldValue("cot", sql);
  4404. myset.Close();
  4405. count1 = atoi(sql);
  4406. }
  4407. {
  4408. CRecordset myset(pdb2);
  4409. sql = "select count(*) as cot from phonerecordout where [datetime]='" + id + "'";
  4410. myset.Open(CRecordset::forwardOnly, sql);
  4411. myset.GetFieldValue("cot", sql);
  4412. myset.Close();
  4413. count2 = atoi(sql);
  4414. }
  4415. if (count1 > count2)return 0;
  4416. return 1;
  4417. }
  4418. catch (...)
  4419. {
  4420. WriteLogin("出错在函数check3中");
  4421. }
  4422. return 0;
  4423. }
  4424. BOOL CDBServerDlg::Transphonerecordout(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4425. {
  4426. try
  4427. {
  4428. CString sql;
  4429. if (CheckphonerecordoutExist(pdb1, pdb2, id))return 1;
  4430. int i; CString temp;
  4431. int colcount;
  4432. CODBCFieldInfo fieldinfo;
  4433. BOOL ret = 1;
  4434. CRecordset myset(pdb1);
  4435. try
  4436. {
  4437. sql.Format("insert into [%d].[dbo].[phonerecordout] select * from [%s].[dbo].[phonerecordout] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4438. MyExecuteSQL(pdb1, sql);
  4439. }
  4440. catch (...)
  4441. {
  4442. ret = 0;
  4443. }
  4444. if (ret == 0)return 0;
  4445. return CheckphonerecordoutExist(pdb1, pdb2, id);
  4446. }
  4447. catch (...)
  4448. {
  4449. WriteLogin("出错在函数trans3中");
  4450. }
  4451. return 0;
  4452. }
  4453. BOOL CDBServerDlg::CheckunknownphonerecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4454. {
  4455. try
  4456. {
  4457. int count1 = 0;
  4458. int count2 = 0;
  4459. CString sql;
  4460. {
  4461. CRecordset myset(pdb1);
  4462. sql = "select count(*) as cot from unknownphonerecord where [datetime]='" + id + "'";
  4463. myset.Open(CRecordset::forwardOnly, sql);
  4464. myset.GetFieldValue("cot", sql);
  4465. myset.Close();
  4466. count1 = atoi(sql);
  4467. }
  4468. {
  4469. CRecordset myset(pdb2);
  4470. sql = "select count(*) as cot from unknownphonerecord where [datetime]='" + id + "'";
  4471. myset.Open(CRecordset::forwardOnly, sql);
  4472. myset.GetFieldValue("cot", sql);
  4473. myset.Close();
  4474. count2 = atoi(sql);
  4475. }
  4476. if (count1 > count2)return 0;
  4477. return 1;
  4478. }
  4479. catch (...)
  4480. {
  4481. WriteLogin("出错在函数check3中");
  4482. }
  4483. return 0;
  4484. }
  4485. BOOL CDBServerDlg::Transunknownphonerecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4486. {
  4487. try
  4488. {
  4489. CString sql;
  4490. if (CheckunknownphonerecordExist(pdb1, pdb2, id))return 1;
  4491. int i; CString temp;
  4492. int colcount;
  4493. CODBCFieldInfo fieldinfo;
  4494. BOOL ret = 1;
  4495. CRecordset myset(pdb1);
  4496. try
  4497. {
  4498. sql.Format("insert into [%d].[dbo].[unknownphonerecord] select * from [%s].[dbo].[unknownphonerecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4499. MyExecuteSQL(pdb1, sql);
  4500. }
  4501. catch (...)
  4502. {
  4503. ret = 0;
  4504. }
  4505. if (ret == 0)return 0;
  4506. return CheckunknownphonerecordExist(pdb1, pdb2, id);
  4507. }
  4508. catch (...)
  4509. {
  4510. WriteLogin("出错在函数trans3中");
  4511. }
  4512. return 0;
  4513. }
  4514. BOOL CDBServerDlg::CheckunknownphonerecordoutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4515. {
  4516. try
  4517. {
  4518. int count1 = 0;
  4519. int count2 = 0;
  4520. CString sql;
  4521. {
  4522. CRecordset myset(pdb1);
  4523. sql = "select count(*) as cot from unknownphonerecordout where [datetime]='" + id + "'";
  4524. myset.Open(CRecordset::forwardOnly, sql);
  4525. myset.GetFieldValue("cot", sql);
  4526. myset.Close();
  4527. count1 = atoi(sql);
  4528. }
  4529. {
  4530. CRecordset myset(pdb2);
  4531. sql = "select count(*) as cot from unknownphonerecordout where [datetime]='" + id + "'";
  4532. myset.Open(CRecordset::forwardOnly, sql);
  4533. myset.GetFieldValue("cot", sql);
  4534. myset.Close();
  4535. count2 = atoi(sql);
  4536. }
  4537. if (count1 > count2)return 0;
  4538. return 1;
  4539. }
  4540. catch (...)
  4541. {
  4542. WriteLogin("出错在函数check3中");
  4543. }
  4544. return 0;
  4545. }
  4546. BOOL CDBServerDlg::Transunknownphonerecordout(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4547. {
  4548. try
  4549. {
  4550. CString sql;
  4551. if (CheckunknownphonerecordoutExist(pdb1, pdb2, id))return 1;
  4552. int i; CString temp;
  4553. int colcount;
  4554. CODBCFieldInfo fieldinfo;
  4555. BOOL ret = 1;
  4556. CRecordset myset(pdb1);
  4557. try
  4558. {
  4559. sql.Format("insert into [%d].[dbo].[unknownphonerecordout] select * from [%s].[dbo].[unknownphonerecordout] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4560. MyExecuteSQL(pdb1, sql);
  4561. }
  4562. catch (...)
  4563. {
  4564. ret = 0;
  4565. }
  4566. if (ret == 0)return 0;
  4567. return CheckunknownphonerecordoutExist(pdb1, pdb2, id);
  4568. }
  4569. catch (...)
  4570. {
  4571. WriteLogin("出错在函数trans3中");
  4572. }
  4573. return 0;
  4574. }
  4575. BOOL CDBServerDlg::CheckmisscallrecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4576. {
  4577. try
  4578. {
  4579. int count1 = 0;
  4580. int count2 = 0;
  4581. CString sql;
  4582. {
  4583. CRecordset myset(pdb1);
  4584. sql = "select count(*) as cot from misscallrecord where [datetime]='" + id + "'";
  4585. myset.Open(CRecordset::forwardOnly, sql);
  4586. myset.GetFieldValue("cot", sql);
  4587. myset.Close();
  4588. count1 = atoi(sql);
  4589. }
  4590. {
  4591. CRecordset myset(pdb2);
  4592. sql = "select count(*) as cot from misscallrecord where [datetime]='" + id + "'";
  4593. myset.Open(CRecordset::forwardOnly, sql);
  4594. myset.GetFieldValue("cot", sql);
  4595. myset.Close();
  4596. count2 = atoi(sql);
  4597. }
  4598. if (count1 > count2)return 0;
  4599. return 1;
  4600. }
  4601. catch (...)
  4602. {
  4603. WriteLogin("出错在函数check3中");
  4604. }
  4605. return 0;
  4606. }
  4607. BOOL CDBServerDlg::Transmisscallrecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4608. {
  4609. try
  4610. {
  4611. CString sql;
  4612. if (CheckmisscallrecordExist(pdb1, pdb2, id))return 1;
  4613. int i;
  4614. CString temp;
  4615. int colcount;
  4616. CODBCFieldInfo fieldinfo;
  4617. BOOL ret = 1;
  4618. CRecordset myset(pdb1);
  4619. try
  4620. {
  4621. sql.Format("insert into [%d].[dbo].[misscallrecord] select * from [%s].[dbo].[misscallrecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4622. MyExecuteSQL(pdb1, sql);
  4623. }
  4624. catch (...)
  4625. {
  4626. ret = 0;
  4627. }
  4628. if (ret == 0)return 0;
  4629. return CheckmisscallrecordExist(pdb1, pdb2, id);
  4630. }
  4631. catch (...)
  4632. {
  4633. WriteLogin("出错在函数trans3中");
  4634. }
  4635. return 0;
  4636. }
  4637. BOOL CDBServerDlg::CheckSendReg(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4638. {
  4639. try
  4640. {
  4641. int count1 = 0;
  4642. int count2 = 0;
  4643. CString sql;
  4644. {
  4645. CRecordset myset(pdb1);
  4646. sql.Format("select count(*) as cot from sendreg where [timestamp]='%s'", id);
  4647. myset.Open(CRecordset::forwardOnly, sql);
  4648. myset.GetFieldValue("cot", sql);
  4649. myset.Close();
  4650. count1 = atoi(sql);
  4651. }
  4652. {
  4653. CRecordset myset(pdb2);
  4654. sql.Format("select count(*) as cot from sendreg where [timestamp]='%s'", id);
  4655. myset.Open(CRecordset::forwardOnly, sql);
  4656. myset.GetFieldValue("cot", sql);
  4657. myset.Close();
  4658. count2 = atoi(sql);
  4659. }
  4660. if (count1 > count2)return 0;
  4661. return 1;
  4662. }
  4663. catch (...)
  4664. {
  4665. WriteLogin("出错在函数check3中");
  4666. }
  4667. return 0;
  4668. }
  4669. BOOL CDBServerDlg::TransSendReg(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4670. {
  4671. try
  4672. {
  4673. CString sql;
  4674. if (CheckSendReg(pdb1, pdb2, id))return 1;
  4675. int i;
  4676. CString temp;
  4677. int colcount;
  4678. CODBCFieldInfo fieldinfo;
  4679. BOOL ret = 1;
  4680. CRecordset myset(pdb1);
  4681. try
  4682. {
  4683. sql.Format("insert into [%d].[dbo].[sendreg] select * from [%s].[dbo].[sendreg] where [timestamp]='%s'", year, g_nCurConvertDBName, id);
  4684. MyExecuteSQL(pdb1, sql);
  4685. }
  4686. catch (...)
  4687. {
  4688. ret = 0;
  4689. }
  4690. if (ret == 0)return 0;
  4691. return CheckSendReg(pdb1, pdb2, id);
  4692. }
  4693. catch (...)
  4694. {
  4695. WriteLogin("出错在函数trans3中");
  4696. }
  4697. return 0;
  4698. }
  4699. void CDBServerDlg::MyExecuteSQL(CDatabase* pdb, CString sql)
  4700. {
  4701. try
  4702. {
  4703. MyLock lock("dbaccessxiao");
  4704. pdb->ExecuteSQL(sql);
  4705. }
  4706. catch ( CDBException *e)
  4707. {
  4708. CString strEr;
  4709. strEr.Format(_T("执行SQL语句出错,系统描述:%s"),e->m_strError);
  4710. WriteLogin(strEr);
  4711. #ifdef _DEBUG
  4712. e->ReportError();
  4713. #endif
  4714. e->Delete();
  4715. }
  4716. }
  4717. void CDBServerDlg::UpdateDate()
  4718. {
  4719. try
  4720. {
  4721. HWND hwnd = ::FindWindow(NULL, "AutoRun.exe - 应用程序错误");
  4722. if (hwnd)
  4723. {
  4724. HWND child = ::FindWindowEx(hwnd, 0, NULL, "确定");
  4725. CWnd *pWnd = CWnd::FromHandle(child);
  4726. ::PostMessage(hwnd, WM_COMMAND, pWnd->GetDlgCtrlID(), (LPARAM)child);
  4727. }
  4728. CString autorunpath = g_mainpath + "\\AutoRun.exe";
  4729. if (0 == g_bConvertHisAll)
  4730. ShellExecute(NULL, _T("open"), g_mainpath + "\\AutoRun.exe", NULL, NULL, SW_HIDE);
  4731. HANDLE hMutex = ::OpenMutex(NULL, FALSE, _T("lyfzSMSHandle"));
  4732. if (GetLastError() == ERROR_FILE_NOT_FOUND)
  4733. {
  4734. autorunpath = g_mainpath + "\\SMSHandle.exe";
  4735. ShellExecute(NULL, _T("open"), autorunpath, NULL, NULL, SW_HIDE);
  4736. }
  4737. if (hMutex) CloseHandle(hMutex);
  4738. #ifdef ENTERPRISE_VERSION
  4739. autorunpath = g_mainpath + "\\DataSyncReceive.exe";
  4740. ShellExecute(NULL, _T("open"), autorunpath, NULL, NULL, SW_HIDE);
  4741. autorunpath = g_mainpath + "\\DataSyncSend.exe";
  4742. ShellExecute(NULL, _T("open"), autorunpath, NULL, NULL, SW_HIDE);
  4743. autorunpath = g_mainpath + "\\CPhotoFTPReceive.exe";
  4744. ShellExecute(NULL, _T("open"), autorunpath, NULL, NULL, SW_HIDE);
  4745. autorunpath = g_mainpath + "\\CPhotoFTPSend.exe";
  4746. ShellExecute(NULL, _T("open"), autorunpath, NULL, NULL, SW_HIDE);
  4747. #endif
  4748. }
  4749. catch (...)
  4750. {
  4751. WriteLogin("出错在函数UpdateDate中");
  4752. }
  4753. }
  4754. BOOL CheckDateOK(CString str)
  4755. {
  4756. try
  4757. {
  4758. CString tip;
  4759. int i;
  4760. CString demo = CTime::GetCurrentTime().Format("%Y-%m-%d");
  4761. if (str.GetLength() != demo.GetLength())
  4762. goto ll;
  4763. //2009-01-01
  4764. if (str.GetAt(4) != '-')
  4765. goto ll;
  4766. if (str.GetAt(7) != '-')
  4767. goto ll;
  4768. for (i = 0; i < str.GetLength(); i++)
  4769. {
  4770. if (i == 4 || i == 7)continue;
  4771. if (str.GetAt(i) < '0' || str.GetAt(i) > '9')
  4772. goto ll;
  4773. }
  4774. }
  4775. catch (...)
  4776. {
  4777. WriteLogin("出错");
  4778. }
  4779. return 1;
  4780. ll:
  4781. return 0;
  4782. }
  4783. //--------------------------------------------------------------------------
  4784. // Remark by Jeff:2014.10.22
  4785. // 函数:AutoDelPhoto
  4786. // 描述:自动删除取件后的订单相片,包括客户原片、初修片、精修片、设计片。(不含备份相片)
  4787. // 参数:#
  4788. // 返回:#
  4789. //
  4790. // 调用关系:
  4791. // 1.AutoDelPhoto()由 BakPhoto()调用。
  4792. // 2.BakPhoto()由CDBServerDlg::SetTimer(4) 调用,调用频率2分钟,周期数直到程序结束。
  4793. // 3.CDBServerDlg::SetTimer(4) 由 CDBServerDlg::SetTimer(2) 调用,调用频率10毫秒,只有一个周期。
  4794. // 4.CDBServerDlg::SetTimer(2) 由 CDBServerDlg::OnInitDialog() 调用.
  4795. //
  4796. //--------------------------------------------------------------------------
  4797. void CDBServerDlg::AutoDelPhoto() // Jeff自动删除取件后的订单相片;
  4798. {
  4799. try
  4800. {
  4801. #ifdef ENTERPRISE_VERSION
  4802. GenYLGL();
  4803. #endif //#ifdef ENTERPRISE_VERSION
  4804. g_curdb = &g_db;
  4805. BOOL bcheck1 = FALSE; // 自动删除客人原片;
  4806. BOOL bcheck2 = FALSE; // 自动删除客人初修片;
  4807. BOOL bcheck3 = FALSE; // 自动删除客人精修片;
  4808. BOOL bcheck4 = FALSE; // 自动删除客人设计片;
  4809. int edit1 = 0; // 多少个月后删除原片;
  4810. int edit2 = 0; // 多少个月后删除初修片;
  4811. int edit3 = 0; // 多少个月后删除精修片;
  4812. int edit4 = 0; // 多少个月后删除设计片;
  4813. CString m_bakserver1 = _T(""); // 自动备份客人原片的备份机器;
  4814. CString m_bakserver2 = _T(""); // 自动备份客人初修片的备份机器
  4815. CString m_bakserver3 = _T(""); // 自动备份客人精修片的备份机器;
  4816. CString m_bakserver4 = _T(""); // 自动备份客人设计片的备份机器;
  4817. // CDBServerDlg::m_bakserver5 : 自动备份系统数据的备份机器;
  4818. // 1.从version表中获取状态信息;
  4819. CRstversion tableOfVersion;
  4820. tableOfVersion.m_pDatabase = g_curdb;
  4821. tableOfVersion.Open();
  4822. if (!tableOfVersion.IsEOF())
  4823. {
  4824. bcheck1 = atoi(tableOfVersion.m_check1);
  4825. bcheck2 = atoi(tableOfVersion.m_check2);
  4826. bcheck3 = atoi(tableOfVersion.m_check3);
  4827. bcheck4 = atoi(tableOfVersion.m_check4);
  4828. edit1 = atoi(tableOfVersion.m_edit1);
  4829. edit2 = atoi(tableOfVersion.m_edit2);
  4830. edit3 = atoi(tableOfVersion.m_edit3);
  4831. edit4 = atoi(tableOfVersion.m_edit4);
  4832. m_bakserver1 = tableOfVersion.m_bakserver1;
  4833. m_bakserver2 = tableOfVersion.m_bakserver2;
  4834. m_bakserver3 = tableOfVersion.m_bakserver3;
  4835. m_bakserver4 = tableOfVersion.m_bakserver4;
  4836. m_bakserver5 = tableOfVersion.m_bakserver5;
  4837. }
  4838. tableOfVersion.Close();
  4839. // 2.
  4840. g_bakinfo = "资料未备份";
  4841. g_bakphoto = "照片未备份";
  4842. WriteLogin("开始备份数据库");
  4843. if (!m_bakserver5.IsEmpty()) // 自动备份系统数据的备份机器;
  4844. {
  4845. CString bakpath = _T("");
  4846. CString localname = _T("");
  4847. localname = g_localname;
  4848. #ifdef CHILD_VERSION
  4849. if (m_bakserver5.Find(":") == -1 && m_bakserver5 != "")
  4850. m_bakserver5 = "\\\\" + m_bakserver5 + "\\数据备份(儿童管理软件)$";
  4851. if (1)//localname.CompareNoCase (m_bakserver5)==0 || CompareIP(localname, m_bakserver5)==0)
  4852. GetPathFromNetShareName("数据备份(儿童管理软件)$", m_bakserver5);
  4853. #else
  4854. if (m_bakserver5.Find(":") == -1 && m_bakserver5 != "")
  4855. m_bakserver5 = "\\\\" + m_bakserver5 + "\\数据备份(管理软件)$";
  4856. if (1)//localname.CompareNoCase (m_bakserver5)==0 || CompareIP(localname, m_bakserver5)==0)
  4857. GetPathFromNetShareName("数据备份(管理软件)$", m_bakserver5);
  4858. #endif //#ifdef CHILD_VERSION
  4859. if (::CheckFolderFileExist(m_bakserver5))
  4860. BakData(m_bakserver5, 1, 1);
  4861. CString strDataBakPath = g_ModulePath;
  4862. strDataBakPath += _T("\\数据备份");
  4863. BakData(strDataBakPath, 1, 0);
  4864. }
  4865. WriteLogin("数据库备份完成");
  4866. //////////////////////////////////////////////////////////////////////////
  4867. #if 1 // 自动删除取件后的相片;
  4868. // 四个同时为假,退出删除操作;
  4869. if (!(bcheck1 | bcheck2 | bcheck3 | bcheck4))
  4870. {
  4871. return;
  4872. }
  4873. // path 4种类型相片的存储目录;
  4874. CStringArray patharray;
  4875. {
  4876. char server[50];
  4877. DWORD leng = 50;
  4878. ::GetComputerName(server, &leng);
  4879. CString spathserver = server;
  4880. // O:original;
  4881. // E:early;
  4882. // F:further;
  4883. // D:Design;
  4884. CString strOSaveDirectory;
  4885. CString strESaveDirectory;
  4886. CString strFSaveDirectory;
  4887. CString strDSaveDirectory;
  4888. strOSaveDirectory = strESaveDirectory = strFSaveDirectory = strDSaveDirectory = server;
  4889. strOSaveDirectory = "\\\\" + strOSaveDirectory + "\\客户原片(管理软件)$";
  4890. strESaveDirectory = "\\\\" + strESaveDirectory + "\\修好的片(管理软件)$";
  4891. strFSaveDirectory = "\\\\" + strFSaveDirectory + "\\设计好的片(管理软件)$";
  4892. strDSaveDirectory = "\\\\" + strDSaveDirectory + "\\精修好的片(管理软件)$";
  4893. GetPathFromNetShareName("客户原片(管理软件)$", strOSaveDirectory);
  4894. GetPathFromNetShareName("修好的片(管理软件)$", strESaveDirectory);
  4895. GetPathFromNetShareName("设计好的片(管理软件)$", strFSaveDirectory);
  4896. GetPathFromNetShareName("精修好的片(管理软件)$", strDSaveDirectory);
  4897. patharray.Add(strOSaveDirectory);
  4898. patharray.Add(strESaveDirectory);
  4899. patharray.Add(strFSaveDirectory);
  4900. patharray.Add(strDSaveDirectory);
  4901. }
  4902. if (patharray.GetSize() == 0 || patharray.GetSize() != 4 )
  4903. return;
  4904. CArray<CDatabase*, CDatabase*>dbarray2;
  4905. dbarray2.Copy(g_dbHistoryArray);
  4906. dbarray2.InsertAt(0, &g_db);
  4907. //------------------------------------------------------------------------------------------------------------------------
  4908. WriteLogin("开始删除取件后照片");
  4909. for (int n = 0; n < min(3, dbarray2.GetSize()); n++)
  4910. {
  4911. g_curdb = dbarray2.ElementAt(n);
  4912. CArray<CStringArray, CStringArray>strArrayOfPhoto2BeDel;
  4913. CString filter = "status3='OK' and time5 is not null and time5<>''";
  4914. CRecordset myset(g_curdb);
  4915. CString sql = "select count(*) as cot from dindan";
  4916. if (!filter.IsEmpty())
  4917. sql += " where " + filter;
  4918. myset.Open(CRecordset::forwardOnly, sql);
  4919. myset.GetFieldValue("cot", sql);
  4920. myset.Close();
  4921. int count = atol(sql);
  4922. if (count == 0)continue;
  4923. WriteLogin(_T("取件OK的订单:") + sql + _T("个"));
  4924. strArrayOfPhoto2BeDel.SetSize(count, 1);
  4925. CRstDindanForm rsSt;
  4926. rsSt.m_pDatabase = g_curdb;
  4927. if (!filter.IsEmpty())
  4928. rsSt.m_strFilter = filter;
  4929. rsSt.Open();
  4930. INT_PTR nIndex = 0;
  4931. while (!rsSt.IsEOF())
  4932. {
  4933. strArrayOfPhoto2BeDel.ElementAt(nIndex).RemoveAll();
  4934. strArrayOfPhoto2BeDel.ElementAt(nIndex).Add(rsSt.id);
  4935. strArrayOfPhoto2BeDel.ElementAt(nIndex).Add(rsSt.time5);
  4936. nIndex++;
  4937. rsSt.MoveNext();
  4938. if (strArrayOfPhoto2BeDel.GetSize() <= nIndex)break;
  4939. }
  4940. rsSt.Close();
  4941. strArrayOfPhoto2BeDel.SetSize(nIndex, 1);
  4942. CString time5;
  4943. CString strOrderNum;
  4944. COleDateTime curtm = COleDateTime::GetCurrentTime();
  4945. CString strtime;
  4946. for (int i = 0; i < strArrayOfPhoto2BeDel.GetSize(); i++)
  4947. {
  4948. // 获取订单号;
  4949. strOrderNum = strArrayOfPhoto2BeDel.ElementAt(i).ElementAt(0);
  4950. // 获取订单取件日期;
  4951. time5 = strArrayOfPhoto2BeDel.ElementAt(i).ElementAt(1);
  4952. // 订单不为空,且日期有效;
  4953. if ( !strOrderNum.IsEmpty() && IsValidDate(time5) )
  4954. {
  4955. COleDateTime reachtm(_ttoi(time5.Left(4)), _ttoi(time5.Mid(5,2)),_ttoi(time5.Mid(8,2)),0,0,0);
  4956. if (bcheck1 && edit1)//原片
  4957. {
  4958. COleDateTimeSpan sp(edit1 * 30, 0, 0, 0);
  4959. reachtm += sp;
  4960. // 取件日期 + 天数 的日期 < 今天;
  4961. if (reachtm < curtm )
  4962. {
  4963. if (DelPhoto1(patharray.ElementAt(0), strOrderNum))
  4964. WriteLogin("原片" + patharray.ElementAt(0) + "\\" + strOrderNum);
  4965. }
  4966. }
  4967. if (bcheck2 && edit2)
  4968. {
  4969. COleDateTimeSpan sp(edit2 * 30, 0, 0, 0);
  4970. reachtm += sp;
  4971. // 取件日期 + 天数 的日期 < 今天;
  4972. if (reachtm < curtm )
  4973. {
  4974. DelPhoto1(patharray.ElementAt(1), strOrderNum);
  4975. }
  4976. }
  4977. if (bcheck3 && edit3)
  4978. {
  4979. COleDateTimeSpan sp(edit3 * 30, 0, 0, 0);
  4980. reachtm += sp;
  4981. // 取件日期 + 天数 的日期 < 今天;
  4982. if (reachtm < curtm )
  4983. {
  4984. DelPhoto1(patharray.ElementAt(2), strOrderNum);
  4985. }
  4986. }
  4987. if (bcheck4 && edit4)
  4988. {
  4989. COleDateTimeSpan sp(edit4 * 30, 0, 0, 0);
  4990. reachtm += sp;
  4991. // 取件日期 + 天数 的日期 < 今天;
  4992. if (reachtm < curtm )
  4993. {
  4994. DelPhoto1(patharray.ElementAt(3), strOrderNum);
  4995. }
  4996. }
  4997. }
  4998. }
  4999. }
  5000. //------------------------------------------------------------------------------------------------------------------------
  5001. g_curdb = &g_db;
  5002. #ifdef ENTERPRISE_VERSION // Jeff:若是集团版,会再次删除本店已取件的历史订单一次。多操作了一次!
  5003. WriteLogin(_T("本店查完,开始检查分店"));
  5004. // 域名;
  5005. CString strBranchId;
  5006. // 取件OK订单;
  5007. CArray<CStringArray, CStringArray>AryTookOrderInfo;
  5008. // 分店取件的订单都保存在branchdindan.bat文件中;
  5009. CString autorunpath = g_mainpath + "\\branchdindan.dat";
  5010. CFile fp;
  5011. if (fp.Open(autorunpath, CFile::modeRead))
  5012. {
  5013. int nMessageLen = fp.GetLength();
  5014. BYTE *pData = new BYTE[nMessageLen];
  5015. fp.Read(pData, nMessageLen);
  5016. fp.Close();
  5017. BYTE *szChatMessage = pData;
  5018. int count;
  5019. memcpy(&count, szChatMessage + (nMessageLen - sizeof(int)), sizeof(int));
  5020. CMemFile memfile;
  5021. memfile.Attach(szChatMessage, nMessageLen);
  5022. CArchive ar(&memfile, CArchive::load);
  5023. AryTookOrderInfo.SetSize(count);
  5024. for (int ii = 0; ii < AryTookOrderInfo.GetSize(); ii++)
  5025. {
  5026. AryTookOrderInfo.ElementAt(ii).Serialize(ar);
  5027. }
  5028. ar.Close();
  5029. memfile.Detach();
  5030. delete[]pData;
  5031. CString time5, strOrderNum;
  5032. COleDateTime curtm = COleDateTime::GetCurrentTime();
  5033. CString strtime;
  5034. for (int i = 0; i < AryTookOrderInfo.GetSize(); i++)
  5035. {
  5036. strBranchId = "\\" + AryTookOrderInfo.ElementAt(i).ElementAt(0);
  5037. if ( strBranchId.Find(_T(".ly.com")) == -1)
  5038. continue;
  5039. // 获取订单号;
  5040. strOrderNum = AryTookOrderInfo.ElementAt(i).ElementAt(1);
  5041. // 获取取件ok日期;
  5042. time5 = AryTookOrderInfo.ElementAt(i).ElementAt(2);
  5043. // 订单号不为空,且日期的有效;
  5044. if ( !strOrderNum.IsEmpty() && IsValidDate(time5) )
  5045. {
  5046. COleDateTime reachtm(_ttoi(time5.Left(4)), _ttoi(time5.Mid(5,2)),_ttoi(time5.Mid(8,2)),0,0,0);
  5047. if (bcheck1 && edit1)//原片
  5048. {
  5049. COleDateTimeSpan sp(edit1 * 30, 0, 0, 0);
  5050. reachtm += sp;
  5051. // 取件日期 + 天数 的日期 < 今天;
  5052. if (reachtm < curtm )
  5053. {
  5054. if (DelPhoto1(patharray.ElementAt(0) + strBranchId, strOrderNum))
  5055. WriteLogin("分店原片" + patharray.ElementAt(0) + strBranchId + "\\" + strOrderNum);
  5056. }
  5057. }
  5058. if (bcheck2 && edit2)
  5059. {
  5060. COleDateTimeSpan sp(edit2 * 30, 0, 0, 0);
  5061. reachtm += sp;
  5062. // 取件日期 + 天数 的日期 < 今天;
  5063. if (reachtm < curtm )
  5064. {
  5065. DelPhoto1(patharray.ElementAt(1) + strBranchId, strOrderNum);
  5066. }
  5067. }
  5068. if (bcheck3 && edit3)
  5069. {
  5070. COleDateTimeSpan sp(edit3 * 30, 0, 0, 0);
  5071. reachtm += sp;
  5072. // 取件日期 + 天数 的日期 < 今天;
  5073. if (reachtm < curtm )
  5074. {
  5075. DelPhoto1(patharray.ElementAt(2) + strBranchId, strOrderNum);
  5076. }
  5077. }
  5078. if (bcheck4 && edit4)
  5079. {
  5080. COleDateTimeSpan sp(edit4 * 30, 0, 0, 0);
  5081. reachtm += sp;
  5082. // 取件日期 + 天数 的日期 < 今天;
  5083. if (reachtm < curtm )
  5084. {
  5085. DelPhoto1(patharray.ElementAt(3) + strBranchId, strOrderNum);
  5086. }
  5087. }
  5088. }
  5089. }
  5090. }
  5091. #endif
  5092. WriteLogin("检查删除照片完成");
  5093. #endif
  5094. //////////////////////////////////////////////////////////////////////////
  5095. }
  5096. catch (...)
  5097. {
  5098. WriteLogin("出错在函数AutoDelPhoto中");
  5099. }
  5100. }
  5101. //------------------------------------------------------------------
  5102. // Remark by Jeff:2014.10.11
  5103. // 函数:DelPhoto1
  5104. // 描述:删除指定路径下的订单文件夹;
  5105. // 参数:
  5106. // path: 指定要删除文件的根目录;
  5107. // strOrderNumber: 将要删除的订单号文件夹;
  5108. // 返回:
  5109. //-----------------------------------------------------------------
  5110. BOOL CDBServerDlg::DelPhoto1(CString path, CString strOrderNumber)
  5111. {
  5112. if ( path.IsEmpty() || !PathFileExists(path) )
  5113. {
  5114. //WriteLogin(_T("路径不存在!"));
  5115. return FALSE;
  5116. }
  5117. path += _T("\\") + strOrderNumber;
  5118. if (PathFileExists(path))
  5119. {
  5120. DeleteDirectory(path);
  5121. return TRUE;
  5122. }
  5123. //WriteLogin(_T("路径不存在!"));
  5124. return FALSE;
  5125. }
  5126. //-----------------------------------------------------------------------
  5127. // Remark by Jeff 2014.10.22
  5128. // 函数:BakPhoto
  5129. // 描述:对影楼相片进行备份和删除取件相片
  5130. // 参数:#
  5131. // 返回:#
  5132. //
  5133. // 调用关系:
  5134. // 1.BakPhoto()由CDBServerDlg::SetTimer(4) 调用,调用频率2分钟,周期数直到程序结束。
  5135. // 2.CDBServerDlg::SetTimer(4) 由 CDBServerDlg::SetTimer(2) 调用,调用频率10毫秒,只有一个周期。
  5136. // 3.CDBServerDlg::SetTimer(2) 由 CDBServerDlg::OnInitDialog() 调用.
  5137. //-----------------------------------------------------------------------
  5138. void CDBServerDlg::BakPhoto() // Jeff:备份相片/删除取件相片;
  5139. {
  5140. try
  5141. {
  5142. g_curdb = &g_db;
  5143. CString m_bak1, m_bak2, m_bak3, m_bak4, m_bak6, m_baktime; // Jeff:m_bak6自动备份完毕后自动关机;
  5144. CString m_bakserver1, m_bakserver2, m_bakserver3, m_bakserver4;
  5145. CString msgcheck4, msgtime, msgphones, msgphones2, msgcompanyname;
  5146. CString balance, msgaccount;
  5147. {
  5148. MyLock lock("dbaccessxiao");
  5149. CRstversion rsSt;
  5150. rsSt.m_pDatabase = g_curdb;
  5151. rsSt.Open();
  5152. if (!rsSt.IsEOF())
  5153. {
  5154. m_bak1 = rsSt.m_bak1;
  5155. m_bak2 = rsSt.m_bak2;
  5156. m_bak3 = rsSt.m_bak3;
  5157. m_bak4 = rsSt.m_bak4;
  5158. m_bakserver1 = rsSt.m_bakserver1;
  5159. m_bakserver2 = rsSt.m_bakserver2;
  5160. m_bakserver3 = rsSt.m_bakserver3;
  5161. m_bakserver4 = rsSt.m_bakserver4;
  5162. m_bak6 = rsSt.m_bak6;
  5163. m_baktime = rsSt.m_baktime;
  5164. msgcheck4 = rsSt.msgcheck4;
  5165. msgtime = rsSt.msgtime;
  5166. msgphones = rsSt.msgphones;
  5167. msgphones2 = rsSt.msgphones2;
  5168. msgcompanyname = rsSt.msgcompanyname;
  5169. balance = rsSt.msgbalance;
  5170. msgaccount = rsSt.msgaccount;
  5171. }
  5172. rsSt.Close();
  5173. }
  5174. /////////////检测发短信回财务
  5175. if (msgphones2.IsEmpty() == 0)
  5176. {
  5177. MyLock lock("dbaccessxiao");
  5178. CStringArray array, timearray;
  5179. CString timestamp;
  5180. timestamp = CTime::GetCurrentTime().Format("%Y-%m-%d");
  5181. timestamp += "%";
  5182. CRecordset myset(g_curdb);
  5183. CString sql = "select phones,timestamp from sendregreceive where [timestamp] like '" + timestamp + "' and [content]='001' and [status]='OK'";
  5184. myset.Open(CRecordset::forwardOnly, sql);
  5185. CString phones;
  5186. while (!myset.IsEOF())
  5187. {
  5188. myset.GetFieldValue("phones", phones);
  5189. myset.GetFieldValue("timestamp", timestamp);
  5190. if (msgphones2.Find(phones) != -1)
  5191. {
  5192. array.Add(phones);
  5193. timearray.Add(timestamp);
  5194. }
  5195. myset.MoveNext();
  5196. }
  5197. myset.Close();
  5198. if (array.GetSize())
  5199. {
  5200. CString sql;
  5201. int i = 0;
  5202. //for (int i = 0; i < array.GetSize(); i++)
  5203. for ( i = 0; i < array.GetSize(); i++)
  5204. {
  5205. sql = "update sendregreceive set [status]='' where [timestamp]='" + timearray.ElementAt(i) + "'";
  5206. MyExecuteSQL(&g_db, sql);
  5207. }
  5208. CArray<CStringArray, CStringArray>List11array;
  5209. CArray<CStringArray, CStringArray>List2array;
  5210. CArray<CStringArray, CStringArray>List3array;
  5211. CArray<CStringArray, CStringArray>other2salearray;
  5212. CArray<CStringArray, CStringArray>memberarray;
  5213. CString strdate = CTime::GetCurrentTime().Format("%Y-%m-%d");
  5214. CArray<CDatabase*, CDatabase*>dbarraytemp;
  5215. dbarraytemp.Copy(g_dbHistoryArray);
  5216. while (dbarraytemp.GetSize()>1)
  5217. {
  5218. int last = dbarraytemp.GetSize() - 1;
  5219. dbarraytemp.RemoveAt(last);
  5220. }
  5221. dbarraytemp.InsertAt(0, &g_db);
  5222. for (int a = dbarraytemp.GetSize() - 1; a >= 0; a--)
  5223. {
  5224. g_curdb = dbarraytemp.ElementAt(a);
  5225. CString filter = "[dat]='" + strdate + "'";
  5226. filter = "[dat]='" + strdate + "' and ([sale2type] is null or [sale2type]='')";
  5227. {
  5228. CRecordset myset(g_curdb);
  5229. CString sql = "select count(*) as cot from singleincome"; if (!filter.IsEmpty())sql += " where " + filter;
  5230. myset.Open(CRecordset::forwardOnly, sql);
  5231. myset.GetFieldValue("cot", sql);
  5232. myset.Close();
  5233. int count = atol(sql);
  5234. int oldsize = List2array.GetSize();
  5235. List2array.SetSize(oldsize + count, 1);
  5236. CRstIncomeInput rsSt; rsSt.m_pDatabase = g_curdb; if (!filter.IsEmpty())rsSt.m_strFilter = filter;
  5237. rsSt.Open();
  5238. int ii = 0;
  5239. while (!rsSt.IsEOF())
  5240. {
  5241. List2array.ElementAt(oldsize + ii).RemoveAll();
  5242. List2array.ElementAt(oldsize + ii).Add(rsSt.id);
  5243. List2array.ElementAt(oldsize + ii).Add(rsSt.name);
  5244. List2array.ElementAt(oldsize + ii).Add(rsSt.money);
  5245. List2array.ElementAt(oldsize + ii).Add(rsSt.date);
  5246. List2array.ElementAt(oldsize + ii).Add(rsSt.renyuan1);
  5247. List2array.ElementAt(oldsize + ii).Add(rsSt.renyuan2);
  5248. List2array.ElementAt(oldsize + ii).Add(rsSt.renyuan3);
  5249. List2array.ElementAt(oldsize + ii).Add(rsSt.bz);
  5250. List2array.ElementAt(oldsize + ii).Add(rsSt.sale2type);
  5251. ii++;
  5252. rsSt.MoveNext(); if (List2array.GetSize() <= ii)break;
  5253. }
  5254. rsSt.Close(); List2array.SetSize(oldsize + ii, 1);
  5255. }
  5256. filter = "[dat]='" + strdate + "'";
  5257. {
  5258. CRecordset myset(g_curdb);
  5259. CString sql = "select count(*) as cot from gudingfeiyong"; if (!filter.IsEmpty())sql += " where " + filter;
  5260. myset.Open(CRecordset::forwardOnly, sql);
  5261. myset.GetFieldValue("cot", sql);
  5262. myset.Close();
  5263. int count = atol(sql);
  5264. int oldsize = List3array.GetSize();
  5265. List3array.SetSize(oldsize + count, 1);
  5266. CRstPayOutInput rsSt; rsSt.m_pDatabase = g_curdb; if (!filter.IsEmpty())rsSt.m_strFilter = filter;
  5267. rsSt.Open();
  5268. int ii = 0;
  5269. while (!rsSt.IsEOF())
  5270. {
  5271. List3array.ElementAt(oldsize + ii).RemoveAll();
  5272. List3array.ElementAt(oldsize + ii).Add(rsSt.id);
  5273. List3array.ElementAt(oldsize + ii).Add(rsSt.name);
  5274. List3array.ElementAt(oldsize + ii).Add(rsSt.money);
  5275. List3array.ElementAt(oldsize + ii).Add(rsSt.date);
  5276. List3array.ElementAt(oldsize + ii).Add(rsSt.renyuan1);
  5277. List3array.ElementAt(oldsize + ii).Add(rsSt.renyuan2);
  5278. List3array.ElementAt(oldsize + ii).Add(rsSt.bz);
  5279. ii++;
  5280. rsSt.MoveNext(); if (List3array.GetSize() <= ii)break;
  5281. }
  5282. rsSt.Close(); List3array.SetSize(oldsize + ii, 1);
  5283. }
  5284. filter = "[date]='" + strdate + "'";
  5285. {
  5286. CRecordset myset(g_curdb);
  5287. CString sql = "select count(*) as cot from dindanbukuan"; if (!filter.IsEmpty())sql += " where " + filter;
  5288. myset.Open(CRecordset::forwardOnly, sql);
  5289. myset.GetFieldValue("cot", sql);
  5290. myset.Close();
  5291. int count = atol(sql);
  5292. int oldsize = List11array.GetSize();
  5293. List11array.SetSize(oldsize + count, 1);
  5294. CRstBuKuan rsSt; rsSt.m_pDatabase = g_curdb; if (!filter.IsEmpty())rsSt.m_strFilter = filter;
  5295. rsSt.Open();
  5296. int ii = 0;
  5297. while (!rsSt.IsEOF())
  5298. {
  5299. List11array.ElementAt(oldsize + ii).RemoveAll();
  5300. List11array.ElementAt(oldsize + ii).Add(rsSt.m_id);
  5301. List11array.ElementAt(oldsize + ii).Add(rsSt.m_ren);
  5302. List11array.ElementAt(oldsize + ii).Add(rsSt.m_money);
  5303. List11array.ElementAt(oldsize + ii).Add(rsSt.m_bz);
  5304. List11array.ElementAt(oldsize + ii).Add(rsSt.m_kind);
  5305. List11array.ElementAt(oldsize + ii).Add(rsSt.m_date);
  5306. ii++;
  5307. rsSt.MoveNext(); if (List11array.GetSize() <= ii)break;
  5308. }
  5309. rsSt.Close(); List11array.SetSize(oldsize + ii, 1);
  5310. }
  5311. filter = "[date]='" + strdate + "'";
  5312. {
  5313. CRecordset myset(g_curdb);
  5314. CString sql = "select count(*) as cot from singleincomemoneyview"; if (!filter.IsEmpty())sql += " where " + filter;
  5315. myset.Open(CRecordset::forwardOnly, sql);
  5316. myset.GetFieldValue("cot", sql);
  5317. myset.Close();
  5318. int count = atol(sql);
  5319. int oldsize = other2salearray.GetSize();
  5320. other2salearray.SetSize(oldsize + count, 1);
  5321. CRstsingleincomemoneyview rsSt; rsSt.m_pDatabase = g_curdb; if (!filter.IsEmpty())rsSt.m_strFilter = filter;
  5322. rsSt.Open();
  5323. int ii = 0;
  5324. while (!rsSt.IsEOF())
  5325. {
  5326. other2salearray.ElementAt(oldsize + ii).RemoveAll();
  5327. other2salearray.ElementAt(oldsize + ii).Add(rsSt.name);
  5328. other2salearray.ElementAt(oldsize + ii).Add(rsSt.renyuan1);
  5329. other2salearray.ElementAt(oldsize + ii).Add(rsSt.renyuan3);
  5330. other2salearray.ElementAt(oldsize + ii).Add(rsSt.sale2type);
  5331. other2salearray.ElementAt(oldsize + ii).Add(rsSt.money);
  5332. other2salearray.ElementAt(oldsize + ii).Add(rsSt.date);
  5333. other2salearray.ElementAt(oldsize + ii).Add(rsSt.clerk);
  5334. other2salearray.ElementAt(oldsize + ii).Add(rsSt.paytype);
  5335. other2salearray.ElementAt(oldsize + ii).Add(rsSt.autoid);
  5336. other2salearray.ElementAt(oldsize + ii).Add(rsSt.financecheck);
  5337. ii++;
  5338. rsSt.MoveNext(); if (other2salearray.GetSize() <= ii)break;
  5339. }
  5340. rsSt.Close(); other2salearray.SetSize(oldsize + ii, 1);
  5341. }
  5342. filter = "[date]='" + strdate + "'";
  5343. {
  5344. CRecordset myset(g_curdb);
  5345. CString sql = "select count(*) as cot from memberview";
  5346. if (!filter.IsEmpty())
  5347. sql += " where " + filter;
  5348. myset.Open(CRecordset::forwardOnly, sql);
  5349. myset.GetFieldValue("cot", sql);
  5350. myset.Close();
  5351. int count = atol(sql);
  5352. int oldsize = memberarray.GetSize();
  5353. memberarray.SetSize(oldsize + count, 1);
  5354. memberviewReg rsSt;
  5355. rsSt.m_pDatabase = g_curdb;
  5356. if (!filter.IsEmpty())
  5357. rsSt.m_strFilter = filter;
  5358. rsSt.Open();
  5359. DWORD ii = 0;
  5360. while (!rsSt.IsEOF())
  5361. {
  5362. memberarray.ElementAt(oldsize + ii).RemoveAll();
  5363. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_id);
  5364. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_memberno);
  5365. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_name);
  5366. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_money);
  5367. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_date);
  5368. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_clerk);
  5369. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_financecheck);
  5370. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_moneytype);
  5371. ii++;
  5372. rsSt.MoveNext(); if (memberarray.GetSize() <= ii)break;
  5373. }
  5374. rsSt.Close(); memberarray.SetSize(oldsize + ii, 1);
  5375. }
  5376. }//
  5377. g_curdb = &g_db;
  5378. CString str;
  5379. int pos = 0;
  5380. int dindanshu = 0;
  5381. float income = 0;
  5382. float incomedd = 0;
  5383. float incomebk = 0;
  5384. float incomehq = 0;
  5385. float incomeqt = 0;
  5386. float payout = 0;
  5387. for (i = 0; i < List11array.GetSize(); i++)
  5388. {
  5389. str = List11array.ElementAt(i).ElementAt(2);
  5390. income += atof(str);
  5391. // income2+=atof(str);
  5392. if (List11array.ElementAt(i).ElementAt(3) == "预约收款")
  5393. {
  5394. incomedd += atof(str);
  5395. dindanshu++;
  5396. }
  5397. else if (List11array.ElementAt(i).ElementAt(3) == "预约补款")
  5398. {
  5399. incomebk += atof(str);
  5400. }
  5401. else
  5402. {
  5403. incomehq += atof(str);
  5404. }
  5405. pos++;
  5406. }
  5407. for (i = 0; i < List2array.GetSize(); i++)
  5408. {
  5409. str = List2array.ElementAt(i).ElementAt(2);
  5410. income += atof(str);
  5411. /* if(List2array.ElementAt (i).ElementAt (8)!="")
  5412. {
  5413. income2+=atof(str);
  5414. }*/
  5415. if (List2array.ElementAt(i).ElementAt(8) == "")
  5416. {
  5417. incomeqt += atof(str);
  5418. }
  5419. pos++;
  5420. }
  5421. for (i = 0; i < List3array.GetSize(); i++)
  5422. {
  5423. str = List3array.ElementAt(i).ElementAt(2);
  5424. payout += atof(str);
  5425. pos++;
  5426. }
  5427. for (i = 0; i < other2salearray.GetSize(); i++)
  5428. {
  5429. str = other2salearray.ElementAt(i).ElementAt(4);
  5430. income += atof(str);
  5431. incomehq += atof(str);
  5432. pos++;
  5433. }
  5434. for (i = 0; i < memberarray.GetSize(); i++)
  5435. {
  5436. str = memberarray.ElementAt(i).ElementAt(3);
  5437. income += atof(str);
  5438. pos++;
  5439. }
  5440. CTime tm = CTime::GetCurrentTime();
  5441. CString content = msgcompanyname + tm.Format("%Y-%m-%d");
  5442. content += "财报:";
  5443. str.Format("%d", (int)income);
  5444. ::ConvertToPrice(str);
  5445. content += "收:" + str;
  5446. str.Format("%d", (int)incomedd);
  5447. ::ConvertToPrice(str);
  5448. content += "定:" + str;
  5449. str.Format("%d", (int)incomebk);
  5450. ::ConvertToPrice(str);
  5451. content += "补:" + str;
  5452. str.Format("%d", (int)incomehq);
  5453. ::ConvertToPrice(str);
  5454. content += "后:" + str;
  5455. str.Format("%d", (int)incomeqt);
  5456. ::ConvertToPrice(str);
  5457. content += "其它:" + str;
  5458. str.Format("%d", (int)payout);
  5459. ::ConvertToPrice(str);
  5460. content += "支出:" + str;
  5461. str.Format("%d", (int)(income - payout));
  5462. ::ConvertToPrice(str);
  5463. content += "净收:" + str;
  5464. str.Format("%d", dindanshu);
  5465. content += "定单:" + str;
  5466. if (msgaccount != "")
  5467. {
  5468. if (atoi(balance) < 200)
  5469. {
  5470. content += "您的余额小于两百条,请及时充值。联系电话4006067068";
  5471. }
  5472. else if (atoi(balance) < 500)
  5473. {
  5474. content += "您的余额小于五百条,请及时充值。联系电话4006067068";
  5475. }
  5476. else if (atoi(balance) < 800)
  5477. {
  5478. content += "您的余额小于八百条,请及时充值。联系电话4006067068";
  5479. }
  5480. else if (atoi(balance) < 1000)
  5481. {
  5482. content += "您的余额小于一千条,请及时充值。联系电话4006067068";
  5483. }
  5484. }
  5485. int count = GetLengthEx(content) / MSG_LENGTH;
  5486. if (GetLengthEx(content) % MSG_LENGTH)
  5487. count++;
  5488. int phonenum = 0;
  5489. phonenum = 1;
  5490. count *= phonenum;
  5491. CString scount;
  5492. scount.Format("%d", count);
  5493. CString timestamp = tm.Format("%Y%m%d%H%M%S");
  5494. for (i = 0; i < 1; i++)
  5495. {
  5496. sql = "insert into sendreg([phones],[content],[timestamp],[msgcount],[status],[issended],[isautosend],[ren]) values('" + array.ElementAt(i) + "','" + content + "','" + timestamp + "','" + scount + "','0','0','0','系统自动发送')";
  5497. MyExecuteSQL(&g_db, sql);
  5498. }
  5499. }
  5500. }
  5501. /////////////
  5502. if (atoi(msgcheck4) && msgphones != "")
  5503. {//发老板短信
  5504. if (atoi(msgtime) <= CTime::GetCurrentTime().GetHour())
  5505. {
  5506. MyLock lock("dbaccessxiao");
  5507. CString timestamp;
  5508. timestamp = CTime::GetCurrentTime().Format("%Y%m%d");
  5509. timestamp += "%";
  5510. CRecordset myset(g_curdb);
  5511. CString sql = "select count(*) as cot from sendreg where [timestamp] like '" + timestamp + "' and [phones]='" + msgphones + "' and [isautosend]='3'";
  5512. myset.Open(CRecordset::forwardOnly, sql);
  5513. myset.GetFieldValue("cot", sql);
  5514. myset.Close();
  5515. int count = atol(sql);
  5516. if (count == 0)
  5517. {
  5518. CArray<CStringArray, CStringArray>List11array;
  5519. CArray<CStringArray, CStringArray>List2array;
  5520. CArray<CStringArray, CStringArray>List3array;
  5521. CArray<CStringArray, CStringArray>other2salearray;
  5522. CArray<CStringArray, CStringArray>memberarray;
  5523. CString strdate = CTime::GetCurrentTime().Format("%Y-%m-%d");
  5524. CArray<CDatabase*, CDatabase*>dbarraytemp;
  5525. dbarraytemp.Copy(g_dbHistoryArray);
  5526. while (dbarraytemp.GetSize() > 1)
  5527. {
  5528. int last = dbarraytemp.GetSize() - 1;
  5529. dbarraytemp.RemoveAt(last);
  5530. }
  5531. dbarraytemp.InsertAt(0, &g_db);
  5532. for (int a = dbarraytemp.GetSize() - 1; a >= 0; a--)
  5533. {
  5534. g_curdb = dbarraytemp.ElementAt(a);
  5535. CString filter = "[dat]='" + strdate + "'";
  5536. filter = "[dat]='" + strdate + "' and ([sale2type] is null or [sale2type]='')";
  5537. {
  5538. CRecordset myset(g_curdb);
  5539. CString sql = "select count(*) as cot from singleincome"; if (!filter.IsEmpty())sql += " where " + filter;
  5540. myset.Open(CRecordset::forwardOnly, sql);
  5541. myset.GetFieldValue("cot", sql);
  5542. myset.Close();
  5543. int count = atol(sql);
  5544. int oldsize = List2array.GetSize();
  5545. List2array.SetSize(oldsize + count, 1);
  5546. CRstIncomeInput rsSt; rsSt.m_pDatabase = g_curdb; if (!filter.IsEmpty())rsSt.m_strFilter = filter;
  5547. rsSt.Open();
  5548. int ii = 0;
  5549. while (!rsSt.IsEOF())
  5550. {
  5551. List2array.ElementAt(oldsize + ii).RemoveAll();
  5552. List2array.ElementAt(oldsize + ii).Add(rsSt.id);
  5553. List2array.ElementAt(oldsize + ii).Add(rsSt.name);
  5554. List2array.ElementAt(oldsize + ii).Add(rsSt.money);
  5555. List2array.ElementAt(oldsize + ii).Add(rsSt.date);
  5556. List2array.ElementAt(oldsize + ii).Add(rsSt.renyuan1);
  5557. List2array.ElementAt(oldsize + ii).Add(rsSt.renyuan2);
  5558. List2array.ElementAt(oldsize + ii).Add(rsSt.renyuan3);
  5559. List2array.ElementAt(oldsize + ii).Add(rsSt.bz);
  5560. List2array.ElementAt(oldsize + ii).Add(rsSt.sale2type);
  5561. ii++;
  5562. rsSt.MoveNext(); if (List2array.GetSize() <= ii)break;
  5563. }
  5564. rsSt.Close(); List2array.SetSize(oldsize + ii, 1);
  5565. }
  5566. filter = "[dat]='" + strdate + "'";
  5567. {
  5568. CRecordset myset(g_curdb);
  5569. CString sql = "select count(*) as cot from gudingfeiyong"; if (!filter.IsEmpty())sql += " where " + filter;
  5570. myset.Open(CRecordset::forwardOnly, sql);
  5571. myset.GetFieldValue("cot", sql);
  5572. myset.Close();
  5573. int count = atol(sql);
  5574. int oldsize = List3array.GetSize();
  5575. List3array.SetSize(oldsize + count, 1);
  5576. CRstPayOutInput rsSt; rsSt.m_pDatabase = g_curdb; if (!filter.IsEmpty())rsSt.m_strFilter = filter;
  5577. rsSt.Open();
  5578. int ii = 0;
  5579. while (!rsSt.IsEOF())
  5580. {
  5581. List3array.ElementAt(oldsize + ii).RemoveAll();
  5582. List3array.ElementAt(oldsize + ii).Add(rsSt.id);
  5583. List3array.ElementAt(oldsize + ii).Add(rsSt.name);
  5584. List3array.ElementAt(oldsize + ii).Add(rsSt.money);
  5585. List3array.ElementAt(oldsize + ii).Add(rsSt.date);
  5586. List3array.ElementAt(oldsize + ii).Add(rsSt.renyuan1);
  5587. List3array.ElementAt(oldsize + ii).Add(rsSt.renyuan2);
  5588. List3array.ElementAt(oldsize + ii).Add(rsSt.bz);
  5589. ii++;
  5590. rsSt.MoveNext(); if (List3array.GetSize() <= ii)break;
  5591. }
  5592. rsSt.Close(); List3array.SetSize(oldsize + ii, 1);
  5593. }
  5594. filter = "[date]='" + strdate + "'";
  5595. {
  5596. CRecordset myset(g_curdb);
  5597. CString sql = "select count(*) as cot from dindanbukuan"; if (!filter.IsEmpty())sql += " where " + filter;
  5598. myset.Open(CRecordset::forwardOnly, sql);
  5599. myset.GetFieldValue("cot", sql);
  5600. myset.Close();
  5601. int count = atol(sql);
  5602. int oldsize = List11array.GetSize();
  5603. List11array.SetSize(oldsize + count, 1);
  5604. CRstBuKuan rsSt; rsSt.m_pDatabase = g_curdb; if (!filter.IsEmpty())rsSt.m_strFilter = filter;
  5605. rsSt.Open();
  5606. int ii = 0;
  5607. while (!rsSt.IsEOF())
  5608. {
  5609. List11array.ElementAt(oldsize + ii).RemoveAll();
  5610. List11array.ElementAt(oldsize + ii).Add(rsSt.m_id);
  5611. List11array.ElementAt(oldsize + ii).Add(rsSt.m_ren);
  5612. List11array.ElementAt(oldsize + ii).Add(rsSt.m_money);
  5613. List11array.ElementAt(oldsize + ii).Add(rsSt.m_bz);
  5614. List11array.ElementAt(oldsize + ii).Add(rsSt.m_kind);
  5615. List11array.ElementAt(oldsize + ii).Add(rsSt.m_date);
  5616. List11array.ElementAt(oldsize + ii).Add(rsSt.paytype);
  5617. ii++;
  5618. rsSt.MoveNext(); if (List11array.GetSize() <= ii)break;
  5619. }
  5620. rsSt.Close(); List11array.SetSize(oldsize + ii, 1);
  5621. }
  5622. filter = "[date]='" + strdate + "'";
  5623. {
  5624. CRecordset myset(g_curdb);
  5625. CString sql = "select count(*) as cot from singleincomemoneyview"; if (!filter.IsEmpty())sql += " where " + filter;
  5626. myset.Open(CRecordset::forwardOnly, sql);
  5627. myset.GetFieldValue("cot", sql);
  5628. myset.Close();
  5629. int count = atol(sql);
  5630. int oldsize = other2salearray.GetSize();
  5631. other2salearray.SetSize(oldsize + count, 1);
  5632. CRstsingleincomemoneyview rsSt; rsSt.m_pDatabase = g_curdb; if (!filter.IsEmpty())rsSt.m_strFilter = filter;
  5633. rsSt.Open();
  5634. int ii = 0;
  5635. while (!rsSt.IsEOF())
  5636. {
  5637. other2salearray.ElementAt(oldsize + ii).RemoveAll();
  5638. other2salearray.ElementAt(oldsize + ii).Add(rsSt.name);
  5639. other2salearray.ElementAt(oldsize + ii).Add(rsSt.renyuan1);
  5640. other2salearray.ElementAt(oldsize + ii).Add(rsSt.renyuan3);
  5641. other2salearray.ElementAt(oldsize + ii).Add(rsSt.sale2type);
  5642. other2salearray.ElementAt(oldsize + ii).Add(rsSt.money);
  5643. other2salearray.ElementAt(oldsize + ii).Add(rsSt.date);
  5644. other2salearray.ElementAt(oldsize + ii).Add(rsSt.clerk);
  5645. other2salearray.ElementAt(oldsize + ii).Add(rsSt.paytype);
  5646. other2salearray.ElementAt(oldsize + ii).Add(rsSt.autoid);
  5647. other2salearray.ElementAt(oldsize + ii).Add(rsSt.financecheck);
  5648. ii++;
  5649. rsSt.MoveNext(); if (other2salearray.GetSize() <= ii)break;
  5650. }
  5651. rsSt.Close(); other2salearray.SetSize(oldsize + ii, 1);
  5652. }
  5653. filter = "[date]='" + strdate + "'";
  5654. {
  5655. CRecordset myset(g_curdb);
  5656. CString sql = "select count(*) as cot from memberview"; if (!filter.IsEmpty())sql += " where " + filter;
  5657. myset.Open(CRecordset::forwardOnly, sql);
  5658. myset.GetFieldValue("cot", sql);
  5659. myset.Close();
  5660. int count = atol(sql);
  5661. int oldsize = memberarray.GetSize();
  5662. memberarray.SetSize(oldsize + count, 1);
  5663. memberviewReg rsSt; rsSt.m_pDatabase = g_curdb; if (!filter.IsEmpty())rsSt.m_strFilter = filter;
  5664. rsSt.Open();
  5665. DWORD ii = 0;
  5666. while (!rsSt.IsEOF())
  5667. {
  5668. memberarray.ElementAt(oldsize + ii).RemoveAll();
  5669. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_id);
  5670. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_memberno);
  5671. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_name);
  5672. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_money);
  5673. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_date);
  5674. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_clerk);
  5675. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_financecheck);
  5676. memberarray.ElementAt(oldsize + ii).Add(rsSt.m_moneytype);
  5677. ii++;
  5678. rsSt.MoveNext(); if (memberarray.GetSize() <= ii)break;
  5679. }
  5680. rsSt.Close(); memberarray.SetSize(oldsize + ii, 1);
  5681. }
  5682. }//
  5683. g_curdb = &g_db;
  5684. CString str;
  5685. int pos = 0;
  5686. int dindanshu = 0;
  5687. float income = 0;
  5688. float incomedd = 0;
  5689. float incomebk = 0;
  5690. float incomehq = 0;
  5691. float incomeqt = 0;
  5692. float fStoredCardSpending = 0.0; // 储值卡扣款
  5693. float payout = 0;
  5694. int i = 0;
  5695. for ( i = 0; i < List11array.GetSize(); i++)
  5696. {
  5697. str = List11array.ElementAt(i).ElementAt(2);
  5698. income += atof(str);
  5699. // income2+=atof(str);
  5700. if (List11array.ElementAt(i).ElementAt(3) == "预约收款")
  5701. {
  5702. incomedd += atof(str);
  5703. dindanshu++;
  5704. }
  5705. else if (List11array.ElementAt(i).ElementAt(3) == "预约补款")
  5706. {
  5707. incomebk += atof(str);
  5708. }
  5709. else
  5710. {
  5711. incomehq += atof(str);
  5712. }
  5713. #if JEFF_TEST_ON // 去除储值卡扣费;
  5714. if (List11array.ElementAt(i).ElementAt(6) == "储值卡扣款" || List11array.ElementAt(i).ElementAt(6) == "代金券")
  5715. {
  5716. fStoredCardSpending += atof(str);
  5717. }
  5718. #endif
  5719. pos++;
  5720. }
  5721. for (i = 0; i < List2array.GetSize(); i++)
  5722. {
  5723. str = List2array.ElementAt(i).ElementAt(2);
  5724. income += atof(str);
  5725. /* if(List2array.ElementAt (i).ElementAt (8)!="")
  5726. {
  5727. income2+=atof(str);
  5728. }*/
  5729. if (List2array.ElementAt(i).ElementAt(8) == "")
  5730. {
  5731. incomeqt += atof(str);
  5732. }
  5733. pos++;
  5734. }
  5735. for (i = 0; i < List3array.GetSize(); i++)
  5736. {
  5737. str = List3array.ElementAt(i).ElementAt(2);
  5738. payout += atof(str);
  5739. pos++;
  5740. }
  5741. for (i = 0; i < other2salearray.GetSize(); i++)
  5742. {
  5743. str = other2salearray.ElementAt(i).ElementAt(4);
  5744. income += atof(str);
  5745. incomehq += atof(str);
  5746. pos++;
  5747. }
  5748. for (i = 0; i < memberarray.GetSize(); i++)
  5749. {
  5750. str = memberarray.ElementAt(i).ElementAt(3);
  5751. income += atof(str);
  5752. pos++;
  5753. }
  5754. CTime tm = CTime::GetCurrentTime();
  5755. CString content = msgcompanyname + tm.Format("%Y-%m-%d");
  5756. content += "财报:";
  5757. income -= fStoredCardSpending;
  5758. str.Format("%d", (int)(income)); // 去除储值卡扣款和代金券;
  5759. ::ConvertToPrice(str);
  5760. content += "收:" + str;
  5761. str.Format("%d", (int)incomedd);
  5762. ::ConvertToPrice(str);
  5763. content += "定:" + str;
  5764. str.Format("%d", (int)incomebk);
  5765. ::ConvertToPrice(str);
  5766. content += "补:" + str;
  5767. str.Format("%d", (int)incomehq);
  5768. ::ConvertToPrice(str);
  5769. content += "后:" + str;
  5770. str.Format("%d", (int)incomeqt);
  5771. ::ConvertToPrice(str);
  5772. content += "其它:" + str;
  5773. str.Format("%d", (int)payout);
  5774. ::ConvertToPrice(str);
  5775. content += "支出:" + str;
  5776. str.Format("%d", (int)(income - payout));
  5777. ::ConvertToPrice(str);
  5778. content += "净收:" + str;
  5779. str.Format("%d", dindanshu);
  5780. content += "定单:" + str;
  5781. if (msgaccount != "")
  5782. {
  5783. if (atoi(balance) < 200)
  5784. {
  5785. content += "您的余额小于两百条,请及时充值。联系电话4006067068";
  5786. }
  5787. else if (atoi(balance) < 500)
  5788. {
  5789. content += "您的余额小于五百条,请及时充值。联系电话4006067068";
  5790. }
  5791. else if (atoi(balance) < 800)
  5792. {
  5793. content += "您的余额小于八百条,请及时充值。联系电话4006067068";
  5794. }
  5795. else if (atoi(balance) < 1000)
  5796. {
  5797. content += "您的余额小于一千条,请及时充值。联系电话4006067068";
  5798. }
  5799. }
  5800. int count = GetLengthEx(content) / MSG_LENGTH;
  5801. if (GetLengthEx(content) % MSG_LENGTH)
  5802. count++;
  5803. int phonenum = 0;
  5804. str = msgphones;
  5805. pos = str.Find(",");
  5806. if (pos != -1)
  5807. {
  5808. while (pos != -1)
  5809. {
  5810. phonenum++;
  5811. str = str.Right(str.GetLength() - pos - 1);
  5812. pos = str.Find(",");
  5813. }
  5814. phonenum++;
  5815. }
  5816. else
  5817. phonenum = 1;
  5818. count *= phonenum;
  5819. CString scount;
  5820. scount.Format("%d", count);
  5821. timestamp = tm.Format("%Y%m%d%H%M%S");
  5822. sql = "insert into sendreg([phones],[content],[timestamp],[msgcount],[status],[issended],[isautosend],[ren]) values('" + msgphones + "','" + content + "','" + timestamp + "','" + scount + "','0','0','3','系统自动发送')";
  5823. MyExecuteSQL(&g_db, sql);
  5824. }
  5825. }
  5826. }
  5827. BOOL bcheck1 = atoi(m_bak1);
  5828. BOOL bcheck2 = atoi(m_bak2);
  5829. BOOL bcheck3 = atoi(m_bak3);
  5830. BOOL bcheck4 = atoi(m_bak4);
  5831. }
  5832. catch (CException *e)
  5833. {
  5834. TCHAR szError[1024] = { 0 };
  5835. e->GetErrorMessage(szError, 1024);
  5836. WriteLogin(CString(szError));
  5837. e->Delete();
  5838. WriteLogin("出错在函数bakphoto中");
  5839. }
  5840. }
  5841. void CDBServerDlg::ShutDown() //Jeff:备份完毕后执行的关机函数;
  5842. {
  5843. try
  5844. {
  5845. // 结束检查服务线程
  5846. TerminateCheckWork();
  5847. g_curdb = &g_db;
  5848. CString m_bak6;
  5849. {
  5850. CRecordset myset(g_curdb);
  5851. CString sql = "select * from [version]";
  5852. myset.Open(CRecordset::forwardOnly, sql);
  5853. myset.GetFieldValue("bak6", m_bak6);
  5854. myset.Close();
  5855. }
  5856. OnServerStop(); // 停止服务;
  5857. // Jeff.关闭数据库连接,若关机前关闭了数据库的连接,则客户端进行订单无法实现数据库的操作;
  5858. // Jeff.在关机前,不能关闭数据库连接;
  5859. g_db.Close();
  5860. for (int i = 0; i < g_dbHistoryArray.GetSize(); i++)
  5861. {
  5862. g_dbHistoryArray.ElementAt(i)->Close();
  5863. delete g_dbHistoryArray.ElementAt(i);
  5864. }
  5865. ReleaseBranchDB();
  5866. WriteLogin("备份完成");
  5867. ////////////////
  5868. g_tisks = ::GetTickCount() - g_tisks;
  5869. CString str;
  5870. str.Format("耗时:%d分钟", g_tisks / 60000);
  5871. CStdioFile fp;
  5872. fp.Open(g_mainpath + "\\log.txt", CFile::modeCreate | CFile::modeWrite);
  5873. CTime tm = CTime::GetCurrentTime();
  5874. if (0)//tm.GetHour ()<5)
  5875. {
  5876. CTimeSpan sp(1, 0, 0, 0);
  5877. tm -= sp;
  5878. fp.WriteString(tm.Format("%Y-%m-%d"));
  5879. fp.WriteString("\r\n");
  5880. fp.WriteString(CTime::GetCurrentTime().Format("%Y-%m-%d %H:%M:%S"));
  5881. fp.WriteString(str);
  5882. }
  5883. else
  5884. {
  5885. fp.WriteString(g_bakdate);
  5886. fp.WriteString("\r\n");
  5887. fp.WriteString(tm.Format("%Y-%m-%d %H:%M:%S"));
  5888. fp.WriteString(str);
  5889. }
  5890. fp.WriteString("\r\n");
  5891. fp.WriteString(g_bakinfo);
  5892. fp.WriteString("\r\n");
  5893. fp.WriteString(g_bakphoto);
  5894. fp.Close();
  5895. // OnButton3();
  5896. // Jeff.备份完成后自动关机;
  5897. if (atoi(m_bak6))
  5898. {
  5899. // Jeff.关闭运行中的线程;
  5900. TerminateThread();
  5901. // Jeff.关闭AutoRun.exe程序;
  5902. DWORD id = FindAppProcessID("AutoRun.exe");
  5903. if (id != -1)
  5904. {
  5905. HANDLE ProcessHandle = OpenProcess(PROCESS_ALL_ACCESS, FALSE, id);
  5906. if (ProcessHandle)TerminateProcess(ProcessHandle, 0);
  5907. }
  5908. // Jeff.移除托盘图标;
  5909. m_TrayIcon.RemoveIcon();
  5910. if (g_pSkinData)delete[]g_pSkinData; g_pSkinData = NULL;
  5911. // Jeff.关闭计算机;
  5912. MyExitWindows();
  5913. }
  5914. else//重启
  5915. {
  5916. TerminateThread();
  5917. m_TrayIcon.RemoveIcon();
  5918. if (g_pSkinData)
  5919. delete[]g_pSkinData;
  5920. g_pSkinData = NULL;
  5921. WriteLogin("备份完成,服务器重启");
  5922. CDialog::OnCancel();
  5923. }
  5924. }
  5925. catch (...)
  5926. {
  5927. WriteLogin("出错在函数shutdown中");
  5928. }
  5929. }
  5930. void CDBServerDlg::MyExitWindows()
  5931. {
  5932. try
  5933. {
  5934. UINT t = EWX_SHUTDOWN | EWX_FORCE;
  5935. OSVERSIONINFO osv; //定义一个操作系统信息的结构体
  5936. osv.dwOSVersionInfoSize = sizeof OSVERSIONINFO;
  5937. GetVersionEx(&osv); //查询当前操作系统
  5938. if (osv.dwPlatformId == VER_PLATFORM_WIN32_NT) //判断是否是2000/NT
  5939. {
  5940. //下面为向操作系统获取权限操作
  5941. HANDLE hProcess, hToken;
  5942. TOKEN_PRIVILEGES Privileges;
  5943. LUID luid;
  5944. hProcess = GetCurrentProcess();
  5945. //下面为打开当前进程对话
  5946. OpenProcessToken(hProcess, TOKEN_ADJUST_PRIVILEGES, &hToken);
  5947. Privileges.PrivilegeCount = 1;
  5948. LookupPrivilegeValue(NULL, SE_SHUTDOWN_NAME, &luid);
  5949. Privileges.Privileges[0].Luid = luid;
  5950. Privileges.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
  5951. AdjustTokenPrivileges(hToken, FALSE, &Privileges, NULL, NULL, NULL);
  5952. ExitWindowsEx(t, 0);
  5953. }
  5954. else
  5955. {
  5956. ExitWindowsEx(t, 0);//调用ExitWindowsEx关闭机器。
  5957. PostQuitMessage(0);
  5958. }
  5959. }
  5960. catch (...)
  5961. {
  5962. WriteLogin("出错在函数exitwindows中");
  5963. }
  5964. }
  5965. void CDBServerDlg::OnAutorun()
  5966. {
  5967. // TODO: Add your command handler code here
  5968. g_bAutoRun = !g_bAutoRun;
  5969. CString version = _T("Version 1.0");
  5970. AfxGetApp()->WriteProfileInt(version, "brun", g_bAutoRun);
  5971. TCHAR szKey[MAX_PATH];
  5972. HKEY hKey = 0;
  5973. DWORD disp = 0;
  5974. lstrcpy(szKey, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run");
  5975. if (g_bAutoRun)
  5976. {
  5977. int lResult = RegCreateKeyEx(HKEY_LOCAL_MACHINE, szKey, 0, NULL, REG_OPTION_VOLATILE, KEY_ALL_ACCESS, NULL, &hKey, &disp);
  5978. if (lResult == ERROR_SUCCESS)
  5979. {
  5980. TCHAR szDir[MAX_PATH];
  5981. ::GetModuleFileName(NULL, szDir, MAX_PATH);
  5982. lResult = RegSetValueEx(hKey, "YLGLDBSERVER", 0, REG_SZ, (const unsigned char*)szDir, lstrlen(szDir));
  5983. RegCloseKey(hKey);
  5984. }
  5985. }
  5986. else
  5987. {
  5988. int lResult = RegCreateKeyEx(HKEY_LOCAL_MACHINE, szKey, 0, NULL, REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &hKey, &disp);
  5989. if (lResult == ERROR_SUCCESS)
  5990. {
  5991. RegDeleteValue(hKey, "YLGLDBSERVER");
  5992. RegDeleteKey(hKey, "YLGLDBSERVER");
  5993. RegCloseKey(hKey);
  5994. }
  5995. }
  5996. }
  5997. void CDBServerDlg::GetFileDate()
  5998. {
  5999. CStringArray filesarray;
  6000. CStringArray filesarray2;
  6001. filesarray.Add("AutoUpdate.exe"); // 1.
  6002. filesarray.Add("skin\\1.lia");
  6003. filesarray.Add("skin\\2.lia");
  6004. filesarray.Add("skin\\3.lia");
  6005. filesarray.Add("skin\\4.lia");
  6006. filesarray.Add("skin\\10.lia");
  6007. filesarray.Add("skin\\logo.jpg");
  6008. filesarray.Add("skin\\标题-选片.jpg");
  6009. filesarray.Add("skin\\标题-看设计.jpg");
  6010. filesarray.Add("图片\\欢迎.jpg"); // 10.
  6011. filesarray.Add("图片\\连接.jpg");
  6012. filesarray.Add("图片\\标题.jpg");
  6013. filesarray.Add("图片\\背景.jpg");
  6014. filesarray.Add("图片-红色风格\\欢迎.jpg");
  6015. filesarray.Add("图片-红色风格\\连接.jpg");
  6016. filesarray.Add("图片-红色风格\\标题.jpg");
  6017. filesarray.Add("图片-红色风格\\背景.jpg");
  6018. filesarray.Add("图片-红色风格\\选片.jpg");
  6019. filesarray.Add("图片-红色风格\\看设计.jpg");
  6020. filesarray.Add("skin\\1-red.lia"); // 20.
  6021. filesarray.Add("skin\\2-red.lia");
  6022. filesarray.Add("skin\\10-red.lia");
  6023. filesarray.Add("skin\\6.lia");
  6024. filesarray.Add("图片\\掌中宝.jpg");
  6025. filesarray.Add("regsvr32.exe"); // 25.
  6026. filesarray.Add("MSCHRT20.OCX"); // 26. // Jeff.2014.09.06.添加MSCHRT20.OCX,由服务器传递;
  6027. ///////////////
  6028. filesarray2.Add("AutoUpdate.exe");
  6029. filesarray2.Add("skin\\1.lia");
  6030. filesarray2.Add("skin\\2.lia");
  6031. filesarray2.Add("skin\\3.lia");
  6032. filesarray2.Add("skin\\4.lia");
  6033. filesarray2.Add("skin\\5.lia");
  6034. filesarray2.Add("skin\\10.lia");
  6035. filesarray2.Add("skin\\5-red.lia");
  6036. filesarray2.Add("skin\\10-red.lia");
  6037. filesarray2.Add("图片\\logo.jpg");
  6038. filesarray2.Add("图片\\标题-选片.jpg");
  6039. filesarray2.Add("图片\\标题-看设计.jpg");
  6040. filesarray2.Add("图片\\选片.jpg");
  6041. filesarray2.Add("图片\\看设计.jpg");
  6042. filesarray2.Add("图片\\欢迎.jpg");
  6043. filesarray2.Add("图片\\连接.jpg");
  6044. filesarray2.Add("图片\\标题.jpg");
  6045. filesarray2.Add("图片\\背景.jpg");
  6046. filesarray2.Add("图片-红色风格\\欢迎.jpg");
  6047. filesarray2.Add("图片-红色风格\\连接.jpg");
  6048. filesarray2.Add("图片-红色风格\\标题.jpg");
  6049. filesarray2.Add("图片-红色风格\\背景.jpg");
  6050. filesarray2.Add("skin\\6.lia");
  6051. filesarray2.Add("图片\\掌中宝.jpg");
  6052. filesarray2.Add("regsvr32.exe");
  6053. filesarray2.Add("MSCHRT20.OCX"); // 26. // Jeff.2014.09.06.添加MSCHRT20.OCX,由服务器传递;
  6054. int i = 0;
  6055. //for (int i = 0; i < filesarray.GetSize(); i++)
  6056. for ( i = 0; i < filesarray.GetSize(); i++)
  6057. {
  6058. g_filedatearray.Add(GetModifyTime(g_mainpath + "\\系统文件\\" + filesarray.ElementAt(i)));
  6059. }
  6060. g_filedatearraynew.Copy(filesarray2);
  6061. for (i = 0; i < filesarray2.GetSize(); i++)
  6062. {
  6063. g_filedatearraynew.Add(GetFileSize(g_mainpath + "\\系统文件\\" + filesarray2.ElementAt(i)));
  6064. }
  6065. }
  6066. //extern CString g_sdomain;
  6067. #ifdef ENTERPRISE_VERSION
  6068. CString g_bMain;
  6069. #endif
  6070. void CDBServerDlg::LoadBranchInfo()
  6071. {
  6072. #ifdef ENTERPRISE_VERSION
  6073. try
  6074. {
  6075. ReleaseBranchDB();
  6076. CArray<CStringArray, CStringArray>g_List1array;
  6077. {
  6078. MyLock lock("savebranchinfo");
  6079. CFile fp;
  6080. CString path = g_mainpath + "\\branchinfo.dat";
  6081. if (::PathFileExists(path) == 0)
  6082. return;
  6083. fp.Open(path, CFile::modeRead);
  6084. DWORD leng = fp.GetLength();
  6085. if (leng < sizeof(DWORD) * 2)
  6086. {
  6087. fp.Close();
  6088. return;
  6089. }
  6090. DWORD flag = 0;
  6091. //fp.Seek(-sizeof(DWORD), CFile::end);
  6092. fp.Seek(-(int)sizeof(DWORD), CFile::end);
  6093. fp.Read(&flag, sizeof(DWORD));
  6094. if (flag != 889900)
  6095. {
  6096. fp.Close();
  6097. return;
  6098. }
  6099. fp.SeekToBegin();
  6100. DWORD arraysize;
  6101. fp.Read(&arraysize, sizeof(DWORD));
  6102. if (arraysize > 20)
  6103. {
  6104. fp.Close();
  6105. return;
  6106. }
  6107. BYTE *pData = new BYTE[leng - sizeof(DWORD)];
  6108. fp.Read(pData, leng - sizeof(DWORD));
  6109. fp.Close();
  6110. CMemFile memfile;
  6111. memfile.Attach(pData, leng - sizeof(DWORD));
  6112. CArchive ar(&memfile, CArchive::load);
  6113. g_List1array.SetSize(arraysize, 1);
  6114. for (int ii = 0; ii < g_List1array.GetSize(); ii++)
  6115. g_List1array.ElementAt(ii).Serialize(ar);
  6116. ar.Close();
  6117. memfile.Detach();
  6118. delete[]pData;
  6119. }
  6120. if (g_List1array.GetSize() == 0)
  6121. return;
  6122. // SoftKey ytSoftKey;
  6123. // if(ytSoftKey.Ini()==0)
  6124. {
  6125. int value[8];
  6126. double f[8];
  6127. TCHAR s0[50] = _T(""), s1[50] = _T(""), s2[50] = _T(""), s3[50] = _T(""), s4[50] = _T(""), s5[50] = _T(""), s6[50] = _T(""), s7[50] = _T("");
  6128. //运行自定义函数
  6129. int ret = ytSoftKey.getdata(&value[0], &value[1], &value[2], &value[3], &value[4], &value[5], &value[6], &value[7],
  6130. &f[0], &f[1], &f[2], &f[3], &f[4], &f[5], &f[6], &f[7],
  6131. s0, s1, s2, s3, s4, s5, s6, s7);
  6132. if (ret != 0 && ret != -43)
  6133. {
  6134. g_sdomain = "";
  6135. }
  6136. else
  6137. g_sdomain = s1;
  6138. }
  6139. CString str, str2, localname, rights;
  6140. int i = 0;
  6141. for (/*int*/ i = 0; i < g_List1array.GetSize(); i++)
  6142. {
  6143. if (g_sdomain == g_List1array.ElementAt(i).ElementAt(0))
  6144. {
  6145. if (g_List1array.ElementAt(i).GetSize()>5)
  6146. rights = g_List1array.ElementAt(i).ElementAt(5); break;
  6147. }
  6148. }
  6149. for (i = 0; i < g_List1array.GetSize(); i++)
  6150. {
  6151. CString branchname = g_List1array.ElementAt(i).ElementAt(1);
  6152. CString branchip = g_List1array.ElementAt(i).ElementAt(2);
  6153. CString domain = g_List1array.ElementAt(i).ElementAt(0);
  6154. CString dir = g_mainpath + "\\数据\\" + branchname;
  6155. if (g_sdomain == g_List1array.ElementAt(i).ElementAt(0))
  6156. {
  6157. localname = branchname;
  6158. g_bMain = g_List1array.ElementAt(i).ElementAt(3);
  6159. continue;
  6160. }
  6161. CString branchname2 = "," + branchname + ",";
  6162. if (rights.Find(branchname2) == -1)
  6163. continue;
  6164. #ifdef SQLSERVER_VERSION
  6165. if (1)//::PathFileExists (dir))
  6166. {
  6167. /////////////////////////
  6168. g_branchdbarray.Add(NULL);
  6169. g_branchnamearray.Add(branchname);
  6170. g_branchdb2array.Add(NULL);
  6171. g_branchname2array.Add(branchname);
  6172. g_branchiparray.Add(branchip);
  6173. g_branchdomainarray.Add(domain);
  6174. // WriteLogin(_T("添加分店:")+branchname);
  6175. }
  6176. #endif
  6177. }
  6178. //WriteLogin(_T("添加本店:")+localname);
  6179. g_branchdbarray.Add(NULL);
  6180. g_branchnamearray.Add(localname);
  6181. g_branchiparray.Add("xxx");
  6182. g_branchdomainarray.Add(g_sdomain);
  6183. }
  6184. catch (...)
  6185. {
  6186. }
  6187. #endif
  6188. }
  6189. void CDBServerDlg::ReleaseBranchDB()
  6190. {
  6191. #ifdef ENTERPRISE_VERSION
  6192. try
  6193. {
  6194. for (int i = 0; i < g_branchdbarray.GetSize(); i++)
  6195. {
  6196. if (g_branchdbarray.ElementAt(i))
  6197. {
  6198. g_branchdbarray.ElementAt(i)->Close();
  6199. delete g_branchdbarray.ElementAt(i);
  6200. }
  6201. }
  6202. g_branchdbarray.RemoveAll();
  6203. g_branchdb2array.RemoveAll();
  6204. g_branchnamearray.RemoveAll();
  6205. g_branchname2array.RemoveAll();
  6206. g_branchiparray.RemoveAll();
  6207. g_branchdomainarray.RemoveAll();
  6208. }
  6209. catch (...)
  6210. {
  6211. WriteLogin("ReleaseBranchDB出错");
  6212. }
  6213. #endif
  6214. }
  6215. //savebranchinfo
  6216. void CDBServerDlg::LoadBranchInfo2()
  6217. {
  6218. #ifdef ENTERPRISE_VERSION
  6219. try
  6220. {
  6221. ReleaseBranchDB();
  6222. CArray<CStringArray, CStringArray>g_List1array;
  6223. {
  6224. MyLock lock("savebranchinfo");
  6225. CFile fp;
  6226. CString path = g_mainpath + "\\branchinfo.dat";
  6227. if (::PathFileExists(path) == 0)
  6228. return;
  6229. fp.Open(path, CFile::modeRead);
  6230. DWORD leng = fp.GetLength();
  6231. if (leng < sizeof(DWORD) * 2)
  6232. {
  6233. fp.Close(); return;
  6234. }
  6235. DWORD flag;
  6236. //fp.Seek(-sizeof(DWORD), CFile::end);
  6237. fp.Seek(-(int)sizeof(DWORD), CFile::end);
  6238. fp.Read(&flag, sizeof(DWORD));
  6239. if (flag != 889900)
  6240. {
  6241. fp.Close(); return;
  6242. }
  6243. fp.SeekToBegin();
  6244. DWORD arraysize;
  6245. fp.Read(&arraysize, sizeof(DWORD));
  6246. if (arraysize > 20)
  6247. {
  6248. fp.Close();
  6249. return;
  6250. }
  6251. BYTE *pData = new BYTE[leng - sizeof(DWORD)];
  6252. fp.Read(pData, leng - sizeof(DWORD));
  6253. fp.Close();
  6254. CMemFile memfile;
  6255. memfile.Attach(pData, leng - sizeof(DWORD));
  6256. CArchive ar(&memfile, CArchive::load);
  6257. g_List1array.SetSize(arraysize, 1);
  6258. for (int ii = 0; ii < g_List1array.GetSize(); ii++)
  6259. {
  6260. g_List1array.ElementAt(ii).Serialize(ar);
  6261. }
  6262. ar.Close();
  6263. memfile.Detach();
  6264. delete[]pData;
  6265. }
  6266. if (g_List1array.GetSize() == 0)return;
  6267. // SoftKey ytSoftKey;
  6268. // if(ytSoftKey.Ini()==0)
  6269. {
  6270. int value[8];
  6271. double f[8];
  6272. TCHAR s0[50] = _T(""), s1[50] = _T(""), s2[50] = _T(""), s3[50] = _T(""), s4[50] = _T(""), s5[50] = _T(""), s6[50] = _T(""), s7[50] = _T("");
  6273. //运行自定义函数
  6274. int ret = ytSoftKey.getdata(&value[0], &value[1], &value[2], &value[3], &value[4], &value[5], &value[6], &value[7],
  6275. &f[0], &f[1], &f[2], &f[3], &f[4], &f[5], &f[6], &f[7],
  6276. s0, s1, s2, s3, s4, s5, s6, s7);
  6277. if (ret != 0 && ret != -43)
  6278. {
  6279. g_sdomain = "";
  6280. }
  6281. else
  6282. g_sdomain = s1;
  6283. }
  6284. CString str, str2, localname, rights;
  6285. int i = 0;
  6286. for (/*int*/ i = 0; i < g_List1array.GetSize(); i++)
  6287. {
  6288. if (g_sdomain == g_List1array.ElementAt(i).ElementAt(0))
  6289. {
  6290. if (g_List1array.ElementAt(i).GetSize()>5)
  6291. rights = g_List1array.ElementAt(i).ElementAt(5); break;
  6292. }
  6293. }
  6294. for (i = 0; i < g_List1array.GetSize(); i++)
  6295. {
  6296. CString branchname = g_List1array.ElementAt(i).ElementAt(1);
  6297. CString branchip = g_List1array.ElementAt(i).ElementAt(2);
  6298. CString domain = g_List1array.ElementAt(i).ElementAt(0);
  6299. CString dir = g_mainpath + "\\数据\\" + branchname;
  6300. if (g_sdomain == g_List1array.ElementAt(i).ElementAt(0))
  6301. {
  6302. localname = branchname;
  6303. g_bMain = g_List1array.ElementAt(i).ElementAt(3);
  6304. continue;
  6305. }
  6306. CString branchname2 = "," + branchname + ",";
  6307. if (rights.Find(branchname2) == -1)
  6308. continue;
  6309. #ifdef SQLSERVER_VERSION
  6310. if (1)//::PathFileExists (dir))
  6311. {
  6312. ////////////////////////
  6313. g_branchdbarray.Add(NULL);
  6314. g_branchnamearray.Add(branchname);
  6315. g_branchdb2array.Add(NULL);
  6316. g_branchname2array.Add(branchname);
  6317. g_branchiparray.Add(branchip);
  6318. g_branchdomainarray.Add(domain);
  6319. }
  6320. #endif
  6321. }
  6322. g_branchdbarray.Add(NULL);
  6323. g_branchnamearray.Add(localname);
  6324. g_branchiparray.Add("xxx");
  6325. g_branchdomainarray.Add(g_sdomain);
  6326. }
  6327. catch (...)
  6328. {
  6329. }
  6330. #endif
  6331. }
  6332. int __cdecl CompareByLabel6(const void *elem1, const void *elem2)
  6333. {
  6334. CStringArray *p1 = (CStringArray*)elem1;
  6335. CStringArray *p2 = (CStringArray*)elem2;
  6336. return atoi(p1->ElementAt(5)) > atoi(p2->ElementAt(5));
  6337. }
  6338. //--------------------------------------------------------------
  6339. // Remark by Jeff 2014.12.16
  6340. // 函数:CheckMemberMsg
  6341. // 描述:
  6342. // 参数:
  6343. // 返回:
  6344. //
  6345. // 调用关系:
  6346. // 1.CheckMemberMsg() 只由 CDBServerDlg::SetTimer(4) 调用,调用频率2分钟,周期数直到程序结束。
  6347. // 2.CDBServerDlg::SetTimer(4) 由 CDBServerDlg::SetTimer(2) 调用,调用频率10毫秒,只有一个周期。
  6348. // 3.CDBServerDlg::SetTimer(2) 由 CDBServerDlg::OnInitDialog() 调用.
  6349. //--------------------------------------------------------------
  6350. void CDBServerDlg::CheckMemberMsg() // Jeff.由定时器SetTimer两分钟执行一次
  6351. {
  6352. try
  6353. {
  6354. g_curdb = &g_db;
  6355. CString sql = "delete from sendreg where [log]='0/0'";
  6356. MyExecuteSQL(&g_db, sql);
  6357. {
  6358. CStringArray idarray;
  6359. CString timestamp;
  6360. CTime tm = CTime::GetCurrentTime();
  6361. tm -= CTimeSpan(0, 1, 0, 0);
  6362. timestamp = tm.Format("%Y%m%d%H%M%S");
  6363. CRecordset myset(g_curdb);
  6364. CString sql = "select [autoid] from sendregdelay where [timestamp]<'" + timestamp + "'";
  6365. myset.Open(CRecordset::forwardOnly, sql);
  6366. while (!myset.IsEOF())
  6367. {
  6368. myset.GetFieldValue("autoid", sql);
  6369. idarray.Add(sql);
  6370. myset.MoveNext();
  6371. }
  6372. myset.Close();
  6373. for (int i = 0; i < idarray.GetSize(); i++)
  6374. {
  6375. // Jeff.deal
  6376. //sql.Format("insert into [db].[dbo].sendreg([timestamp],[msgcount],[log],[status],[issended],[isautosend],[phones],[content],[ren]) select [timestamp],[msgcount],[log],[status],[issended],[isautosend],[phones],[content],[ren] from [db].[dbo].sendregdelay where [autoid]=%d", atol(idarray.ElementAt(i)));
  6377. sql.Format("insert into sendreg([msgtype],[timestamp],[msgcount],[log],[status],[issended],[isautosend],[phones],[content],[ren]) select [msgtype],[timestamp],[msgcount],[log],[status],[issended],[isautosend],[phones],[content],[ren] from sendregdelay where [autoid]=%d", atol(idarray.ElementAt(i)));
  6378. MyExecuteSQL(&g_db, sql);
  6379. sql.Format("delete from sendregdelay where [autoid]=%d", atol(idarray.ElementAt(i)));
  6380. MyExecuteSQL(&g_db, sql);
  6381. }
  6382. }
  6383. int covertrate = 100;
  6384. CString spoint;
  6385. {
  6386. CRecordset myset(g_curdb);
  6387. CString sql = "select * from version";
  6388. myset.Open(CRecordset::forwardOnly, sql);
  6389. myset.GetFieldValue("rate2", sql);
  6390. myset.Close();
  6391. covertrate = atoi(sql);
  6392. if (covertrate == 0)covertrate = 100;
  6393. }
  6394. CString filter;
  6395. CArray<CStringArray, CStringArray>rulearray;
  6396. CArray<CStringArray, CStringArray>memberarray;
  6397. {
  6398. CRecordset myset(g_curdb);
  6399. CString sql = "select count(*) as cot from msgtemp2";
  6400. if (!filter.IsEmpty())sql += " where " + filter;
  6401. myset.Open(CRecordset::forwardOnly, sql);
  6402. myset.GetFieldValue("cot", sql);
  6403. myset.Close();
  6404. int count = atol(sql);
  6405. rulearray.SetSize(count, 1);
  6406. CRstmsgtemp2 rsSt; rsSt.m_pDatabase = g_curdb;
  6407. if (!filter.IsEmpty())rsSt.m_strFilter = filter;
  6408. rsSt.Open();
  6409. DWORD ii = 0;
  6410. while (!rsSt.IsEOF())
  6411. {
  6412. rulearray.ElementAt(ii).RemoveAll();
  6413. rulearray.ElementAt(ii).Add(rsSt.name);
  6414. rulearray.ElementAt(ii).Add(rsSt.content1);
  6415. rulearray.ElementAt(ii).Add(rsSt.content2);
  6416. rulearray.ElementAt(ii).Add(rsSt.check1);
  6417. rulearray.ElementAt(ii).Add(rsSt.check2);
  6418. rulearray.ElementAt(ii).Add(rsSt.point);
  6419. ii++;
  6420. rsSt.MoveNext();
  6421. if (rulearray.GetSize() <= ii)break;
  6422. }
  6423. rsSt.Close(); rulearray.SetSize(ii, 1);
  6424. }
  6425. if (rulearray.GetSize() == 0)return;
  6426. qsort(static_cast<void*>(&rulearray[0]), rulearray.GetSize(), sizeof(rulearray[0]), CompareByLabel6);
  6427. /////////////
  6428. {
  6429. CRecordset myset(g_curdb);
  6430. CString sql = "select count(*) as cot from membermanage"; if (!filter.IsEmpty())sql += " where " + filter;
  6431. myset.Open(CRecordset::forwardOnly, sql);
  6432. myset.GetFieldValue("cot", sql);
  6433. myset.Close();
  6434. memberarray.SetSize(atol(sql), 1);
  6435. RstMemberReg rsSt; rsSt.m_pDatabase = g_curdb; if (!filter.IsEmpty())rsSt.m_strFilter = filter;
  6436. rsSt.Open();
  6437. DWORD ii = 0;
  6438. if (covertrate != 100)
  6439. {
  6440. while (!rsSt.IsEOF())
  6441. {
  6442. memberarray.ElementAt(ii).RemoveAll();
  6443. memberarray.ElementAt(ii).Add(rsSt.m_memberno);
  6444. memberarray.ElementAt(ii).Add(rsSt.m_name);
  6445. memberarray.ElementAt(ii).Add(rsSt.m_sex);
  6446. memberarray.ElementAt(ii).Add(rsSt.m_phone);
  6447. spoint.Format("%d", atoi(rsSt.m_money)*covertrate / 100);
  6448. memberarray.ElementAt(ii).Add(spoint);
  6449. memberarray.ElementAt(ii).Add(rsSt.m_sendmark1);
  6450. memberarray.ElementAt(ii).Add(rsSt.m_sendmark2);
  6451. ii++;
  6452. rsSt.MoveNext(); if (memberarray.GetSize() <= ii)break;
  6453. }
  6454. }
  6455. else
  6456. {
  6457. while (!rsSt.IsEOF())
  6458. {
  6459. memberarray.ElementAt(ii).RemoveAll();
  6460. memberarray.ElementAt(ii).Add(rsSt.m_memberno);
  6461. memberarray.ElementAt(ii).Add(rsSt.m_name);
  6462. memberarray.ElementAt(ii).Add(rsSt.m_sex);
  6463. memberarray.ElementAt(ii).Add(rsSt.m_phone);
  6464. memberarray.ElementAt(ii).Add(rsSt.m_money);
  6465. memberarray.ElementAt(ii).Add(rsSt.m_sendmark1);
  6466. memberarray.ElementAt(ii).Add(rsSt.m_sendmark2);
  6467. ii++;
  6468. rsSt.MoveNext(); if (memberarray.GetSize() <= ii)break;
  6469. }
  6470. }
  6471. rsSt.Close(); memberarray.SetSize(ii, 1);
  6472. }
  6473. CString memberno, name, sex, phone, point, mark1, mark2, rulename, rulecheck1, rulecheck2, rulepoint, rulecontent1, rulecontent2;
  6474. for (int i = 0; i < memberarray.GetSize(); i++)
  6475. {
  6476. memberno = memberarray.ElementAt(i).ElementAt(0);
  6477. name = memberarray.ElementAt(i).ElementAt(1);
  6478. sex = memberarray.ElementAt(i).ElementAt(2);
  6479. phone = memberarray.ElementAt(i).ElementAt(3);
  6480. point = memberarray.ElementAt(i).ElementAt(4);
  6481. mark1 = "," + memberarray.ElementAt(i).ElementAt(5) + ",";
  6482. mark2 = "," + memberarray.ElementAt(i).ElementAt(6) + ",";
  6483. if (atoi(point) == 0)continue;
  6484. if (phone.IsEmpty())continue;
  6485. if (-1 == CheckPhoneType(phone))continue;
  6486. int j = 0;
  6487. for (/*int*/ j = 0; j < rulearray.GetSize(); j++)
  6488. {
  6489. if (mark1.GetLength()>4000)break;
  6490. rulename = "," + rulearray.ElementAt(j).ElementAt(0) + ",";
  6491. rulecontent1 = name + rulearray.ElementAt(j).ElementAt(1);
  6492. rulecontent2 = name + rulearray.ElementAt(j).ElementAt(2);
  6493. rulecheck1 = rulearray.ElementAt(j).ElementAt(3);
  6494. rulecheck2 = rulearray.ElementAt(j).ElementAt(4);
  6495. rulepoint = rulearray.ElementAt(j).ElementAt(5);
  6496. if (atoi(rulecheck1) == 0 && atoi(rulecheck2) == 0)continue;
  6497. if (atoi(rulecheck1))
  6498. {
  6499. if (rulecontent1.IsEmpty())continue;
  6500. if (mark1.Find(rulename) != -1)break;
  6501. if (atoi(point) >= atoi(rulepoint))continue;
  6502. if (atoi(point) < atoi(rulepoint) * 80 / 100)continue;
  6503. // if(sex=="男")
  6504. // rulecontent1.Replace ("xxx先生/女士", name+"先生");
  6505. // else
  6506. // rulecontent1.Replace ("xxx先生/女士", name+"女士");
  6507. int count = GetLengthEx(rulecontent1) / MSG_LENGTH;
  6508. if (GetLengthEx(rulecontent1) % MSG_LENGTH)
  6509. count++;
  6510. int phonenum = 1;
  6511. count *= phonenum;
  6512. CString scount;
  6513. scount.Format("%d", count);
  6514. CString timestamp = CTime::GetCurrentTime().Format("%Y%m%d%H%M%S");
  6515. CString sql;
  6516. mark1.TrimLeft(",");
  6517. mark1.TrimRight(",");
  6518. if (mark1.IsEmpty() == 0)
  6519. mark1 += ",";
  6520. rulename.TrimLeft(",");
  6521. rulename.TrimRight(",");
  6522. mark1 += rulename;
  6523. sql = "update membermanage set sendmark1='" + mark1 + "' where memberno='" + memberno + "'";
  6524. MyExecuteSQL(&g_db, sql);
  6525. mark1 = "," + mark1 + ",";
  6526. sql = "insert into sendreg([phones],[content],[timestamp],[msgcount],[status],[issended],[isautosend],[ren]) values('" + phone + "','" + rulecontent1 + "','" + timestamp + "','" + scount + "','0','0','0','系统自动发送')";
  6527. MyExecuteSQL(&g_db, sql);
  6528. }
  6529. }
  6530. ///////////////////
  6531. BOOL bSended = 0;
  6532. for (j = 0; j < rulearray.GetSize(); j++)
  6533. {
  6534. if (mark2.GetLength() > 4000)break;
  6535. if (bSended)break;
  6536. rulename = "," + rulearray.ElementAt(j).ElementAt(0) + ",";
  6537. rulecontent1 = name + rulearray.ElementAt(j).ElementAt(1);
  6538. rulecontent2 = name + rulearray.ElementAt(j).ElementAt(2);
  6539. rulecheck1 = rulearray.ElementAt(j).ElementAt(3);
  6540. rulecheck2 = rulearray.ElementAt(j).ElementAt(4);
  6541. rulepoint = rulearray.ElementAt(j).ElementAt(5);
  6542. if (atoi(rulecheck1) == 0 && atoi(rulecheck2) == 0)continue;
  6543. if (atoi(rulecheck2))
  6544. {
  6545. if (rulecontent2.IsEmpty())continue;
  6546. if (mark2.Find(rulename) != -1)break;
  6547. if (atoi(point) < atoi(rulepoint))continue;
  6548. // if(sex=="男")
  6549. // rulecontent2.Replace ("xxx先生/女士", name+"先生");
  6550. // else
  6551. // rulecontent2.Replace ("xxx先生/女士", name+"女士");
  6552. int count = GetLengthEx(rulecontent2) / MSG_LENGTH;
  6553. if (GetLengthEx(rulecontent2) % MSG_LENGTH)
  6554. count++;
  6555. int phonenum = 1;
  6556. count *= phonenum;
  6557. CString scount;
  6558. scount.Format("%d", count);
  6559. CString timestamp = CTime::GetCurrentTime().Format("%Y%m%d%H%M%S");
  6560. CString sql;
  6561. mark2.TrimLeft(",");
  6562. mark2.TrimRight(",");
  6563. if (mark2.IsEmpty() == 0)
  6564. mark2 += ",";
  6565. rulename.TrimLeft(",");
  6566. rulename.TrimRight(",");
  6567. mark2 += rulename;
  6568. sql = "update membermanage set sendmark2='" + mark2 + "' where memberno='" + memberno + "'";
  6569. MyExecuteSQL(&g_db, sql);
  6570. mark2 = "," + mark2 + ",";
  6571. sql = "insert into sendreg([phones],[content],[timestamp],[msgcount],[status],[issended],[isautosend],[ren]) values('" + phone + "','" + rulecontent2 + "','" + timestamp + "','" + scount + "','0','0','0','系统自动发送')";
  6572. MyExecuteSQL(&g_db, sql);
  6573. bSended = 1;
  6574. }
  6575. }
  6576. }
  6577. }
  6578. catch (CDBException *e)
  6579. {
  6580. WriteLogin("CheckMemberMsg");
  6581. WriteLogin(e->m_strError);
  6582. #ifdef _DEBUG
  6583. e->ReportError();
  6584. #endif
  6585. e->Delete();
  6586. }
  6587. }
  6588. void CDBServerDlg::CheckBakState() // Jeff.检查数据库bakstate表;
  6589. {
  6590. try
  6591. {
  6592. g_curdb = &g_db;
  6593. CString filter = _T("");
  6594. CArray<CStringArray, CStringArray> strArray;
  6595. CRecordset myset(g_curdb);
  6596. CString sql = "select count(*) as cot from bakstate";
  6597. if (!filter.IsEmpty())
  6598. sql += " where " + filter;
  6599. myset.Open(CRecordset::forwardOnly, sql);
  6600. myset.GetFieldValue("cot", sql);
  6601. myset.Close();
  6602. int count = atol(sql);
  6603. strArray.SetSize(count, 1);
  6604. //备份记录
  6605. CRstbakstate rsSt;
  6606. rsSt.m_pDatabase = g_curdb;
  6607. if (!filter.IsEmpty())
  6608. rsSt.m_strFilter = filter;
  6609. rsSt.Open();
  6610. int ii = 0;
  6611. while (!rsSt.IsEOF())
  6612. {
  6613. strArray.ElementAt(ii).RemoveAll();
  6614. strArray.ElementAt(ii).Add(rsSt.date);
  6615. strArray.ElementAt(ii).Add(rsSt.photo);
  6616. strArray.ElementAt(ii).Add(rsSt.info);
  6617. ii++;
  6618. rsSt.MoveNext();
  6619. if (strArray.GetSize() <= ii)
  6620. break;
  6621. }
  6622. rsSt.Close();
  6623. //只保存7天记录
  6624. strArray.SetSize(ii, 1);
  6625. while (strArray.GetSize() > 7)
  6626. {
  6627. CString sql = "delete from bakstate where [date]='" + strArray.ElementAt(0).ElementAt(0) + "'";
  6628. MyExecuteSQL(&g_db, sql);
  6629. strArray.RemoveAt(0);
  6630. }
  6631. CString path = _T("");
  6632. path.Format("%s\\log.txt", g_mainpath);
  6633. if (::PathFileExists(path))
  6634. {
  6635. CString str;
  6636. CStdioFile fp;
  6637. if (fp.Open(path, CFile::modeRead))
  6638. {
  6639. CString temp;
  6640. fp.ReadString(temp);
  6641. CString date = temp;
  6642. date.TrimRight();
  6643. while(!feof(fp.m_pStream))
  6644. {
  6645. fp.ReadString(temp);
  6646. str += temp;
  6647. }
  6648. fp.Close();
  6649. if (date.GetLength() != 10)
  6650. return;
  6651. BOOL bBak = 0;
  6652. int i = 0;
  6653. for (int i = 0; i < strArray.GetSize(); i++)
  6654. {
  6655. if (date == strArray.ElementAt(i).ElementAt(0))
  6656. {
  6657. bBak = 1;
  6658. break;
  6659. }
  6660. }
  6661. if (bBak == 0)
  6662. {
  6663. CString state1 = "0";
  6664. CString state2 = "0";
  6665. if (str.Find("照片备份成功") != -1)state1 = "1";
  6666. if (str.Find("资料备份成功") != -1)state2 = "1";
  6667. sql = "insert into bakstate([date],[photo],[info])values('" + date + "','" + state1 + "','" + state2 + "')";
  6668. MyExecuteSQL(&g_db, sql);
  6669. }
  6670. else
  6671. {
  6672. CString state1 = "0";
  6673. CString state2 = "0";
  6674. if (str.Find("照片备份成功") != -1)state1 = "1";
  6675. if (str.Find("资料备份成功") != -1)state2 = "1";
  6676. sql = "update bakstate set [photo]='" + state1 + "',[info]='" + state2 + "' where [date]='" + date + "'";
  6677. MyExecuteSQL(&g_db, sql);
  6678. }
  6679. //判断昨天
  6680. CTime tm = CTime::GetCurrentTime();
  6681. CTimeSpan dt(1, 0, 0, 0);
  6682. tm -= dt;
  6683. CString yesterday = tm.Format("%Y-%m-%d");
  6684. for (i = 0; i < strArray.GetSize(); i++)
  6685. {
  6686. if (yesterday == strArray.ElementAt(i).ElementAt(0))return;
  6687. }
  6688. if (yesterday == date)return;
  6689. sql = "insert into bakstate([date],[photo],[info])values('" + yesterday + "','0','0')";
  6690. MyExecuteSQL(&g_db, sql);
  6691. }
  6692. else
  6693. {
  6694. CTime tm = CTime::GetCurrentTime();
  6695. CTimeSpan dt(1, 0, 0, 0);
  6696. tm -= dt;
  6697. sql = "insert into bakstate([date],[photo],[info])values('" + tm.Format("%Y-%m-%d") + "','0','0')";
  6698. MyExecuteSQL(&g_db, sql);
  6699. }
  6700. }
  6701. else
  6702. {
  6703. //昨天没备份,插入一条没有备份的记录
  6704. CTime tm = CTime::GetCurrentTime();
  6705. CTimeSpan dt(1, 0, 0, 0);
  6706. tm -= dt;
  6707. for (int i = 0; i < strArray.GetSize(); i++)
  6708. {
  6709. if (tm.Format("%Y-%m-%d") == strArray.ElementAt(i).ElementAt(0))
  6710. return;
  6711. }
  6712. sql = "insert into bakstate([date],[photo],[info])values('" + tm.Format("%Y-%m-%d") + "','0','0')";
  6713. MyExecuteSQL(&g_db, sql);
  6714. }
  6715. }
  6716. catch (...)
  6717. {
  6718. WriteLogin("出错3");
  6719. }
  6720. }
  6721. //数据备份
  6722. CString CDBServerDlg::GetRegCode(int m_id, int m_time1, int m_time2)
  6723. {
  6724. TCHAR DevicePath[260];
  6725. if (FindPort(0, DevicePath) != 0)
  6726. return "";
  6727. int version;
  6728. GetIDVersion((DWORD*)&m_id, &version, DevicePath);
  6729. int d[8]; double f[8];
  6730. int idtemp = 123456;
  6731. char s0[50] = "", s1[50] = "", s2[50] = "", s3[50] = "", s4[50] = "", s5[50] = "", s6[50] = "", s7[50] = "";
  6732. //运行自定义函数
  6733. // SoftKey ytSoftKey;
  6734. int ret = 0;//ytSoftKey.Ini();
  6735. if (ret != 0)
  6736. {
  6737. return "";
  6738. }
  6739. //////////////////////////////////////////////////////////////////////////
  6740. // timedog1是对d0,d1,d2,d3进行3DES加密;
  6741. // 对锁id加密;
  6742. // 对123456加密;
  6743. // 对m_time1可运行时间加密;
  6744. // 对m_time2已运行时间加密;
  6745. ret = ytSoftKey.timedog1(&m_id, &idtemp, &m_time1, &m_time2, &d[4], &d[5], &d[6], &d[7],
  6746. &f[0], &f[1], &f[2], &f[3], &f[4], &f[5], &f[6], &f[7],
  6747. s0, s1, s2, s3, s4, s5, s6, s7);
  6748. if (ret != 0 && ret != -43)
  6749. {
  6750. return "";
  6751. }
  6752. CString str = "";
  6753. CString temp, temp2;
  6754. /////////////////////////////////////////
  6755. temp.Format("%d", abs(m_id));
  6756. int leng = temp.GetLength();
  6757. if (m_id < 0)
  6758. temp2 = "1";
  6759. else
  6760. temp2 = "0";
  6761. temp = temp2 + temp;
  6762. temp2.Format("%02d", leng);
  6763. temp = temp2 + temp;
  6764. str += temp;
  6765. //////////////////////////////////两位长度, 1为负, 0为正, 数据区
  6766. temp.Format("%d", abs(m_time1));
  6767. leng = temp.GetLength();
  6768. if (m_time1 < 0)
  6769. temp2 = "1";
  6770. else
  6771. temp2 = "0";
  6772. temp = temp2 + temp;
  6773. temp2.Format("%02d", leng);
  6774. temp = temp2 + temp;
  6775. str += temp;
  6776. //////////////////////////////////两位长度, 1为负, 0为正, 数据区
  6777. temp.Format("%d", abs(m_time2));
  6778. leng = temp.GetLength();
  6779. if (m_time2 < 0)
  6780. temp2 = "1";
  6781. else
  6782. temp2 = "0";
  6783. temp = temp2 + temp;
  6784. temp2.Format("%02d", leng);
  6785. temp = temp2 + temp;
  6786. str += temp;
  6787. //////////////////////////////////两位长度, 1为负, 0为正, 数据区
  6788. temp.Format("%d", abs(idtemp));
  6789. leng = temp.GetLength();
  6790. if (idtemp < 0)
  6791. temp2 = "1";
  6792. else
  6793. temp2 = "0";
  6794. temp = temp2 + temp;
  6795. temp2.Format("%02d", leng);
  6796. temp = temp2 + temp;
  6797. str += temp;
  6798. return str;
  6799. }
  6800. int g_ndogtimes = 0;
  6801. void CDBServerDlg::CheckRegCode() // 检查注册码信息;
  6802. {
  6803. char path[MAX_PATH];
  6804. ::GetSystemDirectory(path, MAX_PATH);
  6805. CString sysdir = path;
  6806. sysdir += "\\authcode.txt";
  6807. CStdioFile fp;
  6808. CString authcode;
  6809. if (fp.Open(sysdir, CFile::modeRead))
  6810. {
  6811. fp.ReadString(authcode);
  6812. fp.Close();
  6813. }
  6814. ::DeleteFile(sysdir); // 删除authcode.txt文件;
  6815. authcode.TrimLeft();
  6816. authcode.TrimRight();
  6817. authcode.Replace("\n", "");
  6818. authcode.Replace("\r", "");
  6819. if (authcode.GetLength() != 240)
  6820. {
  6821. return;
  6822. }
  6823. TCHAR DevicePath[260];
  6824. if (FindPort(0, DevicePath) != 0)
  6825. return;
  6826. DWORD OutID;
  6827. int version;
  6828. GetIDVersion(&OutID, &version, DevicePath);
  6829. CString str1, str2, str3, str4, str5;
  6830. str1 = authcode.Mid(0, 48);
  6831. str2 = authcode.Mid(48, 48);
  6832. str3 = authcode.Mid(96, 48);
  6833. str4 = authcode.Mid(144, 48);
  6834. str5 = authcode.Mid(192, 48);
  6835. // SoftKey ytSoftKey;
  6836. int ret = 0;//ytSoftKey.Ini();
  6837. if (ret != 0)
  6838. {
  6839. return;
  6840. }
  6841. int d[8]; double f[8];
  6842. char s0[50] = "", s1[50] = "", s2[50] = "", s3[50] = "", s4[50] = "", s5[50] = "", s6[50] = "", s7[50] = "";
  6843. //运行自定义函数
  6844. sprintf(s0, "%s", str1);
  6845. sprintf(s1, "%s", str2);
  6846. sprintf(s2, "%s", str3);
  6847. sprintf(s3, "%s", str4);
  6848. sprintf(s4, "%s", str5);
  6849. //运行自定义函数
  6850. ret = ytSoftKey.timedog2(&d[0], &d[1], &d[2], &d[3], &d[4], &d[5], &d[6], &d[7],
  6851. &f[0], &f[1], &f[2], &f[3], &f[4], &f[5], &f[6], &f[7],
  6852. s0, s1, s2, s3, s4, s5, s6, s7);
  6853. if (ret != 0 && ret != -43)
  6854. {
  6855. return;
  6856. }
  6857. str1 = s0;
  6858. str2 = s1;
  6859. str3 = s2;
  6860. str4 = s3;
  6861. str5 = s4;
  6862. authcode = str1;
  6863. authcode += str2;
  6864. authcode += str3;
  6865. authcode += str4;
  6866. authcode += str5;
  6867. str1 += str2;
  6868. str3 += str4;
  6869. DWORD id = atoi(str5.Right(8));
  6870. str5 = str5.Left(12);
  6871. if (id != OutID)
  6872. {
  6873. return;
  6874. }
  6875. TCHAR HKey[50] = "ffffffff", LKey[50] = "ffffffff";
  6876. TCHAR WHKey[41] = "0", WLKey[41] = "0";
  6877. TCHAR year[10], month[10], day[10], hour[10], minute[10], second[10];
  6878. sprintf(WHKey, "%s", str1);
  6879. sprintf(WLKey, "%s", str3);
  6880. CString temp;
  6881. temp = str5.Left(4);
  6882. str5 = str5.Right(8);
  6883. sprintf(year, "%s", temp);
  6884. temp = str5.Left(2);
  6885. str5 = str5.Right(6);
  6886. sprintf(month, "%s", temp);
  6887. temp = str5.Left(2);
  6888. str5 = str5.Right(4);
  6889. sprintf(day, "%s", temp);
  6890. temp = str5.Left(2);
  6891. str5 = str5.Right(2);
  6892. sprintf(hour, "%s", temp);
  6893. sprintf(minute, "%s", str5);
  6894. sprintf(second, "%s", "0");
  6895. ret = WriteTimeAuthToEprom(30128, HKey, LKey, WHKey, WLKey, id, year, month, day, hour, minute, DevicePath);
  6896. if (ret == 0)
  6897. {
  6898. TCHAR year2[10], month2[10], day2[10], hour2[10], minute2[10], second2[10];
  6899. GetRunTimer(year2, month2, day2, hour2, minute2, second2, DevicePath);
  6900. DWORD time1, time2;
  6901. time1 = ConvertStringToTimerReal(year, month, day, hour, minute, second);
  6902. sprintf(second2, "%s", "0");
  6903. time2 = ConvertStringToTimerReal(year2, month2, day2, hour2, minute2, second2);
  6904. if (time1 > time2)
  6905. ConvertTimerToStringReal(time1 - time2, year, month, day, hour, minute, second);
  6906. else
  6907. {
  6908. sprintf(year, "%s", "0");
  6909. sprintf(month, "%s", "0");
  6910. sprintf(day, "%s", "0");
  6911. sprintf(hour, "%s", "0");
  6912. sprintf(minute, "%s", "0");
  6913. }
  6914. g_ndogtimes++;
  6915. // str1.Format ("写入%d次 %d 年 %d 月 %d 日 %d 小时 %d 分", g_ndogtimes, atoi(year), atoi(month), atoi(day), atoi(hour), atoi(minute));
  6916. // WriteLogin(str1);
  6917. // AfxMessageBox((str1));
  6918. }
  6919. else
  6920. {
  6921. // AfxMessageBox(("授权申请码错误, 请重新向经销商索取!"));
  6922. return;
  6923. }
  6924. }
  6925. BOOL IsCtrlDown()
  6926. {
  6927. short state = GetKeyState(VK_LCONTROL);
  6928. BYTE sta = (BYTE)(state >> 8);
  6929. state = GetKeyState(VK_RCONTROL);
  6930. BYTE sta2 = (BYTE)(state >> 8);
  6931. if (sta || sta2)
  6932. return 1;
  6933. else
  6934. return 0;
  6935. }
  6936. //extern CTime GetTmFromStr(CString date);
  6937. BOOL CDBServerDlg::PreTranslateMessage(MSG* pMsg)
  6938. {
  6939. if (pMsg->message == WM_KEYDOWN)
  6940. {
  6941. switch (pMsg->wParam)
  6942. {
  6943. case 67:
  6944. AfxMessageBox("c");
  6945. break;
  6946. case VK_F8:
  6947. if (IsCtrlDown())GenYLGL();
  6948. break;
  6949. case VK_F9:
  6950. if (IsCtrlDown())
  6951. {
  6952. CString g_domain;
  6953. CArray<CStringArray, CStringArray>g_List1array;
  6954. CString autorunpath = g_mainpath + "\\branchdindan.dat";
  6955. CFile fp;
  6956. if (fp.Open(autorunpath, CFile::modeRead))
  6957. {
  6958. int nMessageLen = fp.GetLength();
  6959. BYTE *pData = new BYTE[nMessageLen];
  6960. fp.Read(pData, nMessageLen);
  6961. fp.Close();
  6962. BYTE *szChatMessage = pData;
  6963. int count;
  6964. memcpy(&count, szChatMessage + (nMessageLen - sizeof(int)), sizeof(int));
  6965. CMemFile memfile;
  6966. memfile.Attach(szChatMessage, nMessageLen);
  6967. CArchive ar(&memfile, CArchive::load);
  6968. g_List1array.SetSize(count);
  6969. for (int ii = 0; ii < g_List1array.GetSize(); ii++)
  6970. {
  6971. g_List1array.ElementAt(ii).Serialize(ar);
  6972. }
  6973. ar.Close();
  6974. memfile.Detach();
  6975. delete[]pData;
  6976. }
  6977. CString time5, id;
  6978. for (int i = 0; i < g_List1array.GetSize(); i++)
  6979. {
  6980. g_domain = "\\" + g_List1array.ElementAt(i).ElementAt(0);
  6981. id = g_List1array.ElementAt(i).ElementAt(1);
  6982. time5 = g_List1array.ElementAt(i).ElementAt(2);
  6983. WriteLogin(g_domain + "\\" + id + time5);
  6984. }
  6985. }
  6986. break;
  6987. #ifdef LYFZ_VERSION
  6988. case VK_F7:
  6989. if (IsCtrlDown())
  6990. {
  6991. if (AfxMessageBox("是否继续?", MB_YESNO | MB_ICONINFORMATION) != IDYES)return 1;
  6992. CStringArray array1;
  6993. CRstDindanForm rsSt; rsSt.m_pDatabase = &g_db;
  6994. rsSt.Open();
  6995. while (!rsSt.IsEOF())
  6996. {
  6997. array1.Add(rsSt.id);
  6998. rsSt.MoveNext();
  6999. }
  7000. rsSt.Close();
  7001. CString id, sql;
  7002. sql.Format("update dindan set status5='%s'", "无");
  7003. MyExecuteSQL(&g_db, sql);
  7004. BOOL bHasPhoto = 0;
  7005. for (int i = 0; i < array1.GetSize(); i++)
  7006. {
  7007. id = array1.ElementAt(i);
  7008. bHasPhoto = 0;
  7009. CRstClientPhoto rsSt;
  7010. rsSt.m_strFilter = "id='" + id + "'";
  7011. rsSt.Open();
  7012. if (rsSt.photo.m_dwDataLength>0)
  7013. {
  7014. bHasPhoto = 1;
  7015. }
  7016. rsSt.Close();
  7017. if (bHasPhoto)
  7018. {
  7019. sql.Format("update dindan set status5='%s' where id='%s'", "有", id);
  7020. MyExecuteSQL(&g_db, sql);
  7021. }
  7022. }
  7023. /* CStringArray array1,array2;
  7024. CRstDindanForm rsSt; rsSt.m_pDatabase=&g_db;
  7025. rsSt.Open();
  7026. while(!rsSt.IsEOF())
  7027. {
  7028. array1.Add(rsSt.id) ;
  7029. array2.Add(rsSt.time4) ;
  7030. rsSt.MoveNext();
  7031. }
  7032. rsSt.Close();
  7033. CString id,time4,time2,sql;
  7034. for(int i=0; i<array1.GetSize(); i++)
  7035. {
  7036. id=array1.ElementAt(i);
  7037. time4=array2.ElementAt(i);
  7038. if(time4.GetLength()==10)
  7039. {
  7040. CTime tm=GetTmFromStr(time4);
  7041. CTimeSpan dt(365, 0, 0, 0);
  7042. CTime tm2=tm-dt;
  7043. time2=tm2.Format("%Y-%m-%d");
  7044. sql.Format("update dindan set time2='%s' where id='%s'", time2, id);
  7045. MyExecuteSQL(&g_db, sql);
  7046. }
  7047. }*/
  7048. AfxMessageBox("完成");
  7049. }
  7050. break;
  7051. #endif //#ifdef LYFZ_VERSION
  7052. case VK_F2:
  7053. if (IsCtrlDown())
  7054. {
  7055. SelYear dlg;
  7056. if (dlg.DoModal() != IDOK)return 1;
  7057. int year = dlg.m_year;
  7058. int hisyear = CTime::GetCurrentTime().GetYear() - 1;
  7059. if (year == hisyear)
  7060. {
  7061. AfxMessageBox("不能选该年");
  7062. return 1;
  7063. }
  7064. CString str;
  7065. str.Format("此操作将%d年数据导入%d中, 确认吗?", year, hisyear);
  7066. if (AfxMessageBox(str, MB_YESNO | MB_ICONINFORMATION) != IDYES)return 1;
  7067. CDatabase *pdb = GetDB(year);
  7068. if (pdb == NULL)
  7069. {
  7070. str.Format("没有找到%d, 操作失败", year);
  7071. AfxMessageBox(str); return 1;
  7072. }
  7073. str.Format("开始%d->%d", year, hisyear);
  7074. WriteLogin(str);
  7075. CheckHistoryData(pdb, year);
  7076. str.Format("%d->%d完成", year, hisyear);
  7077. WriteLogin(str);
  7078. }
  7079. break;
  7080. case VK_F3:
  7081. if (IsCtrlDown())
  7082. {
  7083. SelYear dlg;
  7084. if (dlg.DoModal() != IDOK)return 1;
  7085. int year = dlg.m_year;
  7086. int hisyear = CTime::GetCurrentTime().GetYear() - 1;
  7087. if (year == hisyear)
  7088. {
  7089. AfxMessageBox("不能选该年");
  7090. return 1;
  7091. }
  7092. CString str;
  7093. str.Format("此操作将%d年数据导入%d中(当前数据库中没有的订单全转), 确认吗?", year, hisyear);
  7094. if (AfxMessageBox(str, MB_YESNO | MB_ICONINFORMATION) != IDYES)return 1;
  7095. CDatabase *pdb = GetDB(year);
  7096. if (pdb == NULL)
  7097. {
  7098. str.Format("没有找到%d, 操作失败", year);
  7099. AfxMessageBox(str); return 1;
  7100. }
  7101. str.Format("开始%d->%d", year, hisyear);
  7102. WriteLogin(str);
  7103. CheckHistoryData(pdb, year, 1);
  7104. str.Format("%d->%d完成", year, hisyear);
  7105. WriteLogin(str);
  7106. }
  7107. break;
  7108. case VK_F1:
  7109. CString str;
  7110. if (g_conniparray.GetSize() == 0)str = "当前无客户端连接至服务器!";
  7111. for (int i = 0; i < g_conniparray.GetSize(); i++)
  7112. {
  7113. str += "\r\n连接ip:" + g_conniparray.ElementAt(i);
  7114. }
  7115. AfxMessageBox(str);
  7116. #ifdef CONNCOUNT_VERSION
  7117. // CStringArray g_conniparray;
  7118. #endif //#ifdef CONNCOUNT_VERSION
  7119. return 1;
  7120. }
  7121. }
  7122. return CDialog::PreTranslateMessage(pMsg);
  7123. }
  7124. void CDBServerDlg::GenUPhoneData()
  7125. {
  7126. MyLock lock("processChatMessageRequestxiao");
  7127. CArray<int, int>codearray;
  7128. codearray.Add(80);
  7129. codearray.Add(90);
  7130. codearray.Add(11);
  7131. codearray.Add(138);
  7132. codearray.Add(24);
  7133. codearray.Add(181);
  7134. codearray.Add(65);
  7135. codearray.Add(56);
  7136. codearray.Add(179);
  7137. codearray.Add(53);
  7138. CFile fp;
  7139. CString savepath, g_path1;
  7140. char server[50];
  7141. DWORD leng = 50;
  7142. ::GetComputerName(server, &leng);
  7143. g_path1 = server;
  7144. g_path1 = "\\\\" + g_path1 + "\\电话录音(管理软件)$";
  7145. GetPathFromNetShareName("电话录音(管理软件)$", g_path1);
  7146. if (g_path1.IsEmpty())
  7147. {
  7148. WriteLogin("获取电精灵数据出错");
  7149. return;
  7150. }
  7151. try
  7152. {
  7153. int aa = 0;
  7154. g_curdb = &g_db;
  7155. savepath.Format("%s\\uphonedata%d.dat", g_path1, aa);
  7156. ::DeleteFile(savepath); // 删除 uphonedata%d.dat 文件;
  7157. if (fp.Open(savepath, CFile::modeCreate | CFile::modeWrite) == 0)
  7158. {
  7159. WriteLogin("更新来电精灵数据出错");
  7160. return;
  7161. }
  7162. CConnectSocket consock;
  7163. consock.m_pConndb = &g_db;
  7164. for (int i = 0; i < codearray.GetSize(); i++)
  7165. {
  7166. BYTE code = codearray.ElementAt(i);
  7167. DWORD length, arraysize;
  7168. BYTE *pReturn = NULL;
  7169. consock.GetDataFromCode(code, &pReturn, length, arraysize, "");
  7170. fp.Write(&code, sizeof(BYTE));
  7171. fp.Write(&length, sizeof(DWORD));
  7172. fp.Write(&arraysize, sizeof(DWORD));
  7173. fp.Write(pReturn, length);
  7174. }
  7175. fp.Close();
  7176. }
  7177. catch (...)
  7178. {
  7179. WriteLogin("获取来电精灵数据出错2");
  7180. }
  7181. }
  7182. //initlia
  7183. void CDBServerDlg::LoadHistoryDB() // 加载历史数据库;
  7184. {
  7185. CString path;
  7186. CString sql;
  7187. sql = "delete from historydb";
  7188. MyExecuteSQL(&g_db, sql);
  7189. CDatabase g_masterdb;
  7190. try
  7191. {
  7192. CString strCon;
  7193. strCon.Format(DB_SS_CONN_WITHOUT_PORT, g_strdbServrename, _T("master"), g_szDBAccount, g_szDBPassWord);
  7194. g_masterdb.OpenEx(strCon, CDatabase::noOdbcDialog);
  7195. }
  7196. catch (CDBException * e)
  7197. {
  7198. #ifdef _DEBUG
  7199. e->ReportError();
  7200. #endif //#ifdef _DEBUG
  7201. e->Delete();
  7202. }
  7203. for (int i = CTime::GetCurrentTime().GetYear() - 1; i >= 2009; i--)
  7204. {
  7205. CDatabase *db = new CDatabase;
  7206. try
  7207. {
  7208. CString strCon;
  7209. //strCon.Format(_T("driver={SQL Server};Server=%s;DATABASE=%d;%s"), g_strdbServrename, i, g_strdbpsw);
  7210. if ( _tcscmp(g_szDBAccount, _T("")) == 0)
  7211. strCon.Format(DB_SW_CONN_WITHOUT_PORT2, g_strdbServrename, i);
  7212. else
  7213. strCon.Format(DB_SS_CONN_WITHOUT_PORT2, g_strdbServrename, i, g_szDBAccount, g_szDBPassWord);
  7214. db->OpenEx(strCon, CDatabase::noOdbcDialog);
  7215. g_nYearArray.Add(i);
  7216. g_dbHistoryArray.Add(db);
  7217. sql.Format("insert into [historydb]([year])values('%d')", i);
  7218. MyExecuteSQL(&g_db, sql);
  7219. }
  7220. catch (CDBException * e)
  7221. {
  7222. #ifdef _DEBUG
  7223. e->ReportError();
  7224. #endif //#ifdef _DEBUG
  7225. CString strPathOfYearmdf;
  7226. CString strPathOfYearldf;
  7227. CString sql;
  7228. strPathOfYearmdf.Format("%s\\数据\\%d.mdf", g_mainpath, i);
  7229. strPathOfYearldf.Format("%s\\数据\\%d_log.LDF", g_mainpath, i);
  7230. if (PathFileExists(strPathOfYearmdf))
  7231. {
  7232. BOOL bLog = 0;
  7233. if (PathFileExists(strPathOfYearldf))
  7234. {
  7235. bLog = 1;
  7236. }
  7237. g_masterdb.SetQueryTimeout(600);
  7238. if (bLog)
  7239. sql.Format("exec sp_attach_db '%d',@filename1='%s',@filename2='%s'", i, strPathOfYearmdf, strPathOfYearldf);
  7240. else
  7241. sql.Format("exec sp_attach_db '%d',@filename1='%s'", i, strPathOfYearmdf);
  7242. try
  7243. {
  7244. g_masterdb.ExecuteSQL(sql);
  7245. }
  7246. catch (CDBException * e)
  7247. {
  7248. WriteLogin(e->m_strError);
  7249. WriteLogin("历史数据库初始化失败!!");
  7250. g_masterdb.SetQueryTimeout(100);
  7251. #ifdef _DEBUG
  7252. e->ReportError();
  7253. #endif //#ifdef _DEBUG
  7254. e->Delete();
  7255. break;
  7256. }
  7257. g_masterdb.SetQueryTimeout(100);
  7258. CString strCon;
  7259. //strCon.Format(_T("driver={SQL Server};Server=%s;DATABASE=%d;%s"), g_strdbServrename, i, g_strdbpsw);
  7260. if ( _tcscmp(g_szDBAccount, _T("")) == 0)
  7261. strCon.Format(DB_SW_CONN_WITHOUT_PORT2, g_strdbServrename, i);
  7262. else
  7263. strCon.Format(DB_SS_CONN_WITHOUT_PORT2, g_strdbServrename, i, g_szDBAccount, g_szDBPassWord);
  7264. db->OpenEx(strCon, CDatabase::noOdbcDialog);
  7265. g_nYearArray.Add(i);
  7266. g_dbHistoryArray.Add(db);
  7267. sql.Format("insert into [historydb]([year])values('%d')", i);
  7268. MyExecuteSQL(&g_db, sql);
  7269. }
  7270. else
  7271. {
  7272. //e->ReportError();
  7273. e->Delete();
  7274. //break;
  7275. }
  7276. }
  7277. }
  7278. g_masterdb.Close();
  7279. }
  7280. void CDBServerDlg::AddOneConn()
  7281. {
  7282. try
  7283. {
  7284. MyLock lock("AddOneConnxiao");
  7285. if (g_nDBCount >= 200)
  7286. {
  7287. WriteLogin("连接超数!"); return;
  7288. }
  7289. CDatabase *db = new CDatabase;
  7290. //if(AddConn(db, "db")==0)// Jeff.deal;
  7291. if (AddConn(db, g_szDBName) == 0)
  7292. return;
  7293. g_pDB[g_nDBCount] = db;
  7294. CString dbname = _T("");
  7295. for (int i = 0; i < g_nYearArray.GetSize(); i++)
  7296. {
  7297. dbname.Format("%d", g_nYearArray.ElementAt(i));
  7298. CDatabase *db = new CDatabase;
  7299. AddConn(db, dbname);
  7300. g_pHistoryDBarray[g_nDBCount].Add(db);
  7301. }
  7302. AddAdoConn();
  7303. g_nDBCount++;
  7304. }
  7305. catch (CException *e)
  7306. {
  7307. TCHAR szError[1024] = { 0 };
  7308. e->GetErrorMessage(szError, 1024);
  7309. WriteLogin("AddOneConn error" + CString(szError));
  7310. }
  7311. }
  7312. /////////////////////////////////////////////////////////////////////////////////////
  7313. /*
  7314. 函数名: AddAdoConn
  7315. 说明: 添加Logdb数据库连接
  7316. 参数:
  7317. 返回:
  7318. */
  7319. /////////////////////////////////////////////////////////////////////////////////////
  7320. void CDBServerDlg::AddAdoConn()
  7321. {
  7322. }
  7323. void GetOneConn(CDatabase **m_pdb, CArray<CDatabase*, CDatabase*>*m_dbarray, CConnectThread *pThread)
  7324. {
  7325. MyLock lock("GetOneConnxiao");
  7326. ll: for (int i = 0; i < 200; i++)
  7327. {
  7328. if (g_pDB[i] != NULL && g_pThreadPt[i] == NULL)
  7329. {
  7330. *m_pdb = g_pDB[i];
  7331. m_dbarray->Copy(g_pHistoryDBarray[i]);
  7332. g_pThreadPt[i] = pThread;
  7333. return;
  7334. }
  7335. }
  7336. if (g_nDBCount >= 200)
  7337. {
  7338. WriteLogin("连接超数2!");
  7339. *m_pdb = &g_db;
  7340. m_dbarray->Copy(g_dbHistoryArray);
  7341. return;
  7342. }
  7343. g_pMainWnd->AddOneConn();
  7344. ::Sleep(1000);
  7345. goto ll;
  7346. }
  7347. void CDBServerDlg::CheckConnCount()
  7348. {
  7349. int count = 0;
  7350. for (int i = 0; i < 200; i++)
  7351. {
  7352. if (g_pDB[i] != NULL && g_pThreadPt[i] == NULL)
  7353. {
  7354. count++;
  7355. if (count > 9)
  7356. return;
  7357. }
  7358. }
  7359. AddOneConn();
  7360. }
  7361. //delete from 背景.jpg
  7362. void CDBServerDlg::RestoreHQ()
  7363. {
  7364. CString sql;
  7365. g_curdb = &g_db;
  7366. DWORD ii = 0;
  7367. CArray<CStringArray, CStringArray>g_List1array;
  7368. {
  7369. CRecordset myset(g_curdb);
  7370. CString sql = "select count(*) as cot from dindan";
  7371. myset.Open(CRecordset::forwardOnly, sql);
  7372. myset.GetFieldValue("cot", sql);
  7373. myset.Close();
  7374. int count = atol(sql);
  7375. g_List1array.SetSize(count, 1);
  7376. CRstDindanForm rsSt; rsSt.m_pDatabase = g_curdb;
  7377. rsSt.Open();
  7378. ii = 0;
  7379. while (!rsSt.IsEOF())
  7380. {
  7381. g_List1array.ElementAt(ii).RemoveAll();
  7382. g_List1array.ElementAt(ii).Add(rsSt.id);
  7383. ii++;
  7384. rsSt.MoveNext(); if (g_List1array.GetSize() <= ii)break;
  7385. }
  7386. rsSt.Close(); g_List1array.SetSize(ii, 1);
  7387. }
  7388. for (int i = 0; i < g_List1array.GetSize(); i++)
  7389. {
  7390. // int ret=TransDinDan(pdb1, pdb2, g_List1array.ElementAt (i).ElementAt (0), lastyear);
  7391. // Jeff.deal;
  7392. //sql.Format("SELECT distinct [name],[count] FROM [db].[dbo].[dindansp2] where id='%s' and name in(select spname from shangpin where splb='婚庆服务')", g_List1array.ElementAt (i).ElementAt (0));
  7393. sql.Format("SELECT distinct [name],[count] FROM [dbo].[dindansp2] where id='%s' and name in(select spname from shangpin where splb='婚庆服务')", g_List1array.ElementAt(i).ElementAt(0));
  7394. CRecordset myset(g_curdb);
  7395. myset.Open(CRecordset::forwardOnly, sql);
  7396. CStringArray namearray;
  7397. CStringArray countarray;
  7398. while (!myset.IsEOF())
  7399. {
  7400. sql = "";
  7401. myset.GetFieldValue("name", sql);
  7402. namearray.Add(sql);
  7403. sql = "";
  7404. myset.GetFieldValue("count", sql);
  7405. countarray.Add(sql);
  7406. myset.MoveNext();
  7407. }
  7408. myset.Close();
  7409. for (int j = 0; j < namearray.GetSize(); j++)
  7410. {
  7411. CString spid, spjiage2;
  7412. // WriteLogin("name:"+namearray.ElementAt (j));
  7413. // Jeff.deal;
  7414. //sql.Format("SELECT [spid],[spjiage2] FROM [db].[dbo].[shangpin] where spname='%s'", namearray.ElementAt (j));
  7415. sql.Format("SELECT [spid],[spjiage2] FROM [dbo].[shangpin] where spname='%s'", namearray.ElementAt(j));
  7416. //WriteLogin(sql);
  7417. CRecordset myset(g_curdb);
  7418. myset.Open(CRecordset::forwardOnly, sql);
  7419. if (!myset.IsEOF())
  7420. {
  7421. myset.GetFieldValue("spid", spid);
  7422. myset.GetFieldValue("spjiage2", spjiage2);
  7423. }
  7424. myset.Close();
  7425. // Jeff.deal;
  7426. //sql.Format("SELECT count(*) as cot FROM [db].[dbo].[dindansp] where name='%s' and id='%s' and kind='2'", namearray.ElementAt (j), g_List1array.ElementAt (i).ElementAt (0));
  7427. sql.Format("SELECT count(*) as cot FROM [dbo].[dindansp] where name='%s' and id='%s' and kind='2'", namearray.ElementAt(j), g_List1array.ElementAt(i).ElementAt(0));
  7428. myset.Open(CRecordset::forwardOnly, sql);
  7429. sql = "";
  7430. if (!myset.IsEOF())
  7431. {
  7432. myset.GetFieldValue("cot", sql);
  7433. }
  7434. myset.Close();
  7435. if (atoi(sql))continue;
  7436. sql.Format("insert into [dindansp]([id],[name],[shuliang],[price],[spid],[kind])values('%s','%s','%s','%s','%s','%s')",
  7437. g_List1array.ElementAt(i).ElementAt(0), namearray.ElementAt(j), countarray.ElementAt(j), spjiage2, spid, "2");
  7438. //WriteLogin(sql);
  7439. g_db.ExecuteSQL(sql);
  7440. }
  7441. }
  7442. }
  7443. void CDBServerDlg::ManagePhoto()
  7444. {
  7445. // CClientCenter dlg1;
  7446. // dlg1.DoModal ();
  7447. ShowPic3 dlg;
  7448. dlg.DoModal();
  7449. }
  7450. //数据备份(管理软件)$
  7451. //10.lia
  7452. //----------------------------------------------------------------------------
  7453. // Remark by Jeff 2014.10.22
  7454. // 函数:GenYLGL
  7455. // 描述:调用本地客户端;
  7456. // 参数:#
  7457. // 返回:#
  7458. //
  7459. // 调用关系:
  7460. // 1.只由AutoDelPhoto()主动调用。
  7461. //
  7462. // 说明:传递genbranchdata给客户端,使客户端能够自动遍历branchinfo.dat里的分店信息,
  7463. // 客户端顺序连接所有分店并获取分店历史订单已完成取件的订单。最终将所有分店历史
  7464. // 订单已完成取件的送回服务端,保存在branchdindan2.dat中.
  7465. //----------------------------------------------------------------------------
  7466. void CDBServerDlg::GenYLGL()
  7467. {
  7468. // 1.Jeff.删除文件,g_mainpath服务器DBServer.exe的目录;
  7469. CString autorunpath = g_mainpath + "\\YLGL.exe";
  7470. ::DeleteFile(autorunpath); // 删除YLGL.exe
  7471. WriteLogin("命令行启动:" + autorunpath);
  7472. // 2.重新生成YLGL.exe
  7473. CRstUpdate rsSt;
  7474. rsSt.m_pDatabase = &g_db;
  7475. rsSt.Open();
  7476. if (!rsSt.IsEOF())
  7477. {
  7478. CFile fp;
  7479. if (fp.Open(autorunpath, CFile::modeCreate | CFile::modeWrite))
  7480. {
  7481. void *pData = GlobalLock(rsSt.data.m_hData);
  7482. fp.Write(pData, rsSt.data.m_dwDataLength);
  7483. fp.Close();
  7484. GlobalUnlock(rsSt.data.m_hData);
  7485. }
  7486. }
  7487. rsSt.Close();
  7488. // 3.执行YLGL.exe
  7489. ShellExecute(NULL, _T("open"), autorunpath, "genbranchdata", NULL, SW_HIDE);
  7490. }
  7491. //105
  7492. /************************************************************************/
  7493. /*
  7494. 函数:CheckSvcWork
  7495. 描述:检查服务工作
  7496. 参数:
  7497. LPVOID LPARAM
  7498. 返回:
  7499. */
  7500. /************************************************************************/
  7501. unsigned int CDBServerDlg::CheckSvcWork(LPVOID LPARAM)
  7502. {
  7503. CDBServerDlg* p = (CDBServerDlg*)LPARAM;
  7504. if(p != NULL)
  7505. {
  7506. while(1)
  7507. {
  7508. // 每小时检查一次
  7509. int nRet = WaitForSingleObject(p->m_hWaitTimeOut, 60*60*1000);
  7510. if(nRet != WAIT_OBJECT_0 && nRet != WAIT_TIMEOUT)
  7511. {
  7512. CString strError = _T("");
  7513. strError.Format(_T("检测服务3错误:%d\n"), GetLastError());
  7514. WriteLogin(strError);
  7515. break;
  7516. }
  7517. if(WaitForSingleObject(p->m_hExitCheckSvc, 0) == WAIT_OBJECT_0)
  7518. break;
  7519. CString strPath = _T("");
  7520. DWORD dwID = 0;
  7521. // 自动备份
  7522. dwID = FindAppProcessID(_T("lyfzBackupSvc.exe"));
  7523. if(dwID == 0)
  7524. {
  7525. strPath = g_mainpath + _T("\\lyfzBackupSvc.exe");
  7526. CString strCmd = _T("/startsvc");
  7527. SHELLEXECUTEINFO execinfo;
  7528. memset(&execinfo, 0, sizeof(execinfo));
  7529. execinfo.lpFile = strPath;
  7530. execinfo.cbSize = sizeof(execinfo);
  7531. execinfo.fMask = SEE_MASK_NOCLOSEPROCESS | SEE_MASK_FLAG_NO_UI;
  7532. execinfo.nShow = SW_HIDE;
  7533. execinfo.lpParameters = strCmd;
  7534. if(!ShellExecuteEx(&execinfo))
  7535. {
  7536. CString strError = _T("");
  7537. strError.Format(_T("检测服务1错误:%d\n"), GetLastError());
  7538. OutputDebugString(strError);
  7539. }
  7540. // WaitForSingleObject(execinfo.hProcess,INFINITE);
  7541. }
  7542. // 自动删除
  7543. dwID = FindAppProcessID(_T("lyfzDeletePhotoSvc.exe"));
  7544. if(dwID == 0)
  7545. {
  7546. strPath = g_mainpath + _T("\\lyfzDeletePhotoSvc.exe");
  7547. CString strCmd = _T("/startsvc");
  7548. SHELLEXECUTEINFO execinfo;
  7549. memset(&execinfo, 0, sizeof(execinfo));
  7550. execinfo.lpFile = strPath;
  7551. execinfo.cbSize = sizeof(execinfo);
  7552. execinfo.fMask = SEE_MASK_NOCLOSEPROCESS | SEE_MASK_FLAG_NO_UI;
  7553. execinfo.nShow = SW_HIDE;
  7554. execinfo.lpParameters = strCmd;
  7555. if(!ShellExecuteEx(&execinfo))
  7556. {
  7557. CString strError = _T("");
  7558. strError.Format(_T("检测服务2错误:%d\n"), GetLastError());
  7559. WriteLogin(strError);
  7560. }
  7561. // WaitForSingleObject(execinfo.hProcess,INFINITE);
  7562. }
  7563. }
  7564. }
  7565. _endthreadex(0);
  7566. return 0;
  7567. }
  7568. // 结束检查工作
  7569. void CDBServerDlg::TerminateCheckWork()
  7570. {
  7571. if(m_hExitCheckSvc)
  7572. SetEvent(m_hExitCheckSvc);
  7573. if(m_hWaitTimeOut)
  7574. SetEvent(m_hWaitTimeOut);
  7575. if(m_hCheckSvcThread)
  7576. {
  7577. WaitForSingleObject(m_hCheckSvcThread, INFINITE);
  7578. CloseHandle(m_hCheckSvcThread);
  7579. }
  7580. m_hCheckSvcThread = NULL;
  7581. if(m_hExitCheckSvc)
  7582. CloseHandle(m_hExitCheckSvc);
  7583. m_hExitCheckSvc = NULL;
  7584. if(m_hWaitTimeOut)
  7585. CloseHandle(m_hWaitTimeOut);
  7586. m_hWaitTimeOut = NULL;
  7587. m_bStartCheckSvc = FALSE;
  7588. }
  7589. /************************************************************************/
  7590. /*
  7591. 函数:OnStartBackupSvc
  7592. 描述:启动备份服务
  7593. 参数:
  7594. 返回:
  7595. */
  7596. /************************************************************************/
  7597. void CDBServerDlg::OnStartBackupSvc()
  7598. {
  7599. StartSvc(_T("lyfzBackupSvc.exe"));
  7600. }
  7601. /************************************************************************/
  7602. /*
  7603. 函数:OnStopBackupSvc
  7604. 描述:停止备份服务
  7605. 参数:
  7606. 返回:
  7607. */
  7608. /************************************************************************/
  7609. void CDBServerDlg::OnStopBackupSvc()
  7610. {
  7611. StopSvc(_T("lyfz Backup Service"));
  7612. }
  7613. /************************************************************************/
  7614. /*
  7615. 函数:OnStartDelPhotoSvc
  7616. 描述:启动删除服务
  7617. 参数:
  7618. 返回:
  7619. */
  7620. /************************************************************************/
  7621. void CDBServerDlg::OnStartDelPhotoSvc()
  7622. {
  7623. StartSvc(_T("lyfzDeletePhotoSvc.exe"));
  7624. }
  7625. /************************************************************************/
  7626. /*
  7627. 函数:OnStopDelPhotoSvc
  7628. 描述:停止删除服务
  7629. 参数:
  7630. 返回:
  7631. */
  7632. /************************************************************************/
  7633. void CDBServerDlg::OnStopDelPhotoSvc()
  7634. {
  7635. StopSvc(_T("lyfz Delete Photo Service"));
  7636. }
  7637. /************************************************************************/
  7638. /*
  7639. 函数:StartSvc
  7640. 描述:启动服务
  7641. 参数:
  7642. IN LPCSTR lpExeFile 程序名称
  7643. 返回:1成功,0失败
  7644. */
  7645. /************************************************************************/
  7646. int CDBServerDlg::StartSvc( IN LPCSTR lpExeFile)
  7647. {
  7648. CString strPath = _T("");
  7649. DWORD dwID = 0;
  7650. // 自动备份
  7651. dwID = FindAppProcessID(lpExeFile);
  7652. if(dwID == 0)
  7653. {
  7654. strPath = g_mainpath + _T("\\");
  7655. strPath += lpExeFile;
  7656. CString strCmd = _T("/startsvc");
  7657. SHELLEXECUTEINFO execinfo;
  7658. memset(&execinfo, 0, sizeof(execinfo));
  7659. execinfo.lpFile = strPath;
  7660. execinfo.cbSize = sizeof(execinfo);
  7661. execinfo.fMask = SEE_MASK_NOCLOSEPROCESS | SEE_MASK_FLAG_NO_UI;
  7662. execinfo.nShow = SW_HIDE;
  7663. execinfo.lpParameters = strCmd;
  7664. if(!ShellExecuteEx(&execinfo))
  7665. {
  7666. CString strError = _T("");
  7667. strError.Format(_T("检测服务%s错误:%d\n"), lpExeFile, GetLastError());
  7668. OutputDebugString(strError);
  7669. }
  7670. }
  7671. return 1;
  7672. }
  7673. // 停止服务
  7674. /************************************************************************/
  7675. /*
  7676. 函数:OnStopDelPhotoSvc
  7677. 描述:停止删除服务
  7678. 参数:
  7679. IN LPCSTR lpSvcName 服务名
  7680. 返回:1成功,0失败
  7681. */
  7682. /************************************************************************/
  7683. int CDBServerDlg::StopSvc(IN LPCSTR lpSvcName)
  7684. {
  7685. CString strError = _T("");
  7686. SC_HANDLE hSCM = ::OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);
  7687. if (hSCM == NULL)
  7688. return 0;
  7689. SC_HANDLE hService = ::OpenService(hSCM, lpSvcName, SERVICE_STOP | SERVICE_QUERY_STATUS);
  7690. if (hService == NULL)
  7691. {
  7692. strError.Format(_T("打开%s服务失败:%d"), lpSvcName, GetLastError());
  7693. OutputDebugString(strError);
  7694. ::CloseServiceHandle(hSCM);
  7695. return 0;
  7696. }
  7697. SERVICE_STATUS status;
  7698. if(!::QueryServiceStatus(hService, &status))
  7699. {
  7700. strError.Format(_T("获取%s服务状态失败:%d"), lpSvcName, GetLastError());
  7701. OutputDebugString(strError);
  7702. ::CloseServiceHandle(hService);
  7703. ::CloseServiceHandle(hSCM);
  7704. return 0;
  7705. }
  7706. if(status.dwCurrentState == SERVICE_STOPPED)
  7707. {
  7708. ::CloseServiceHandle(hService);
  7709. ::CloseServiceHandle(hSCM);
  7710. return 1;
  7711. }
  7712. ControlService(hService, SERVICE_CONTROL_STOP, &status);
  7713. DWORD dwStartTime = GetTickCount();
  7714. DWORD dwTimeout = 30*1000; // 30-second time-out
  7715. while(1)
  7716. {
  7717. Sleep( status.dwWaitHint );
  7718. if(!::QueryServiceStatus(hService, &status))
  7719. {
  7720. strError.Format(_T("获取%s服务状态失败:%d"), lpSvcName, GetLastError());
  7721. OutputDebugString(strError);
  7722. ::CloseServiceHandle(hService);
  7723. ::CloseServiceHandle(hSCM);
  7724. return 0;
  7725. }
  7726. if ( status.dwCurrentState == SERVICE_STOPPED )
  7727. break;
  7728. if ( GetTickCount() - dwStartTime > dwTimeout )
  7729. {
  7730. strError.Format(_T("停止%s服务超时:%d"), lpSvcName, GetLastError());
  7731. OutputDebugString(strError);
  7732. ::CloseServiceHandle(hService);
  7733. ::CloseServiceHandle(hSCM);
  7734. return 0;
  7735. }
  7736. }
  7737. ::CloseServiceHandle(hService);
  7738. ::CloseServiceHandle(hSCM);
  7739. return 1;
  7740. }
  7741. void CDBServerDlg::OnAutoCheckSvc()
  7742. {
  7743. g_bAutoCheckSvc = !g_bAutoCheckSvc;
  7744. CHAR szFile[MAX_PATH + 1] = "";
  7745. wsprintf(szFile, "%s\\ServiceInfo.ini", g_ModulePath);
  7746. OFSTRUCT ofStruct;
  7747. OpenFile(szFile, &ofStruct, OF_EXIST);
  7748. if (ERROR_FILE_NOT_FOUND == GetLastError())
  7749. return;
  7750. CString strValue = _T("");
  7751. strValue.Format(_T("%d"), g_bAutoCheckSvc);
  7752. WritePrivateProfileString(_T("Back"), _T("AutoCheckSvc"), strValue, szFile);
  7753. if(!g_bAutoCheckSvc)
  7754. {
  7755. TerminateCheckWork();
  7756. }
  7757. else
  7758. {
  7759. // 如果没启动自动检查
  7760. if(!m_bStartCheckSvc)
  7761. {
  7762. m_hExitCheckSvc = CreateEvent(NULL, FALSE, FALSE, NULL);
  7763. m_hWaitTimeOut = CreateEvent(NULL, FALSE, FALSE, NULL);
  7764. SetEvent(m_hWaitTimeOut);
  7765. unsigned int nThreadID = 0;
  7766. m_bStartCheckSvc = TRUE;
  7767. m_hCheckSvcThread = (HANDLE)_beginthreadex(NULL, 0, CheckSvcWork, this, 0, &nThreadID);
  7768. }
  7769. }
  7770. }