DBServerDlg.cpp 232 KB

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