DBServerDlg.cpp 232 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084408540864087408840894090409140924093409440954096409740984099410041014102410341044105410641074108410941104111411241134114411541164117411841194120412141224123412441254126412741284129413041314132413341344135413641374138413941404141414241434144414541464147414841494150415141524153415441554156415741584159416041614162416341644165416641674168416941704171417241734174417541764177417841794180418141824183418441854186418741884189419041914192419341944195419641974198419942004201420242034204420542064207420842094210421142124213421442154216421742184219422042214222422342244225422642274228422942304231423242334234423542364237423842394240424142424243424442454246424742484249425042514252425342544255425642574258425942604261426242634264426542664267426842694270427142724273427442754276427742784279428042814282428342844285428642874288428942904291429242934294429542964297429842994300430143024303430443054306430743084309431043114312431343144315431643174318431943204321432243234324432543264327432843294330433143324333433443354336433743384339434043414342434343444345434643474348434943504351435243534354435543564357435843594360436143624363436443654366436743684369437043714372437343744375437643774378437943804381438243834384438543864387438843894390439143924393439443954396439743984399440044014402440344044405440644074408440944104411441244134414441544164417441844194420442144224423442444254426442744284429443044314432443344344435443644374438443944404441444244434444444544464447444844494450445144524453445444554456445744584459446044614462446344644465446644674468446944704471447244734474447544764477447844794480448144824483448444854486448744884489449044914492449344944495449644974498449945004501450245034504450545064507450845094510451145124513451445154516451745184519452045214522452345244525452645274528452945304531453245334534453545364537453845394540454145424543454445454546454745484549455045514552455345544555455645574558455945604561456245634564456545664567456845694570457145724573457445754576457745784579458045814582458345844585458645874588458945904591459245934594459545964597459845994600460146024603460446054606460746084609461046114612461346144615461646174618461946204621462246234624462546264627462846294630463146324633463446354636463746384639464046414642464346444645464646474648464946504651465246534654465546564657465846594660466146624663466446654666466746684669467046714672467346744675467646774678467946804681468246834684468546864687468846894690469146924693469446954696469746984699470047014702470347044705470647074708470947104711471247134714471547164717471847194720472147224723472447254726472747284729473047314732473347344735473647374738473947404741474247434744474547464747474847494750475147524753475447554756475747584759476047614762476347644765476647674768476947704771477247734774477547764777477847794780478147824783478447854786478747884789479047914792479347944795479647974798479948004801480248034804480548064807480848094810481148124813481448154816481748184819482048214822482348244825482648274828482948304831483248334834483548364837483848394840484148424843484448454846484748484849485048514852485348544855485648574858485948604861486248634864486548664867486848694870487148724873487448754876487748784879488048814882488348844885488648874888488948904891489248934894489548964897489848994900490149024903490449054906490749084909491049114912491349144915491649174918491949204921492249234924492549264927492849294930493149324933493449354936493749384939494049414942494349444945494649474948494949504951495249534954495549564957495849594960496149624963496449654966496749684969497049714972497349744975497649774978497949804981498249834984498549864987498849894990499149924993499449954996499749984999500050015002500350045005500650075008500950105011501250135014501550165017501850195020502150225023502450255026502750285029503050315032503350345035503650375038503950405041504250435044504550465047504850495050505150525053505450555056505750585059506050615062506350645065506650675068506950705071507250735074507550765077507850795080508150825083508450855086508750885089509050915092509350945095509650975098509951005101510251035104510551065107510851095110511151125113511451155116511751185119512051215122512351245125512651275128512951305131513251335134513551365137513851395140514151425143514451455146514751485149515051515152515351545155515651575158515951605161516251635164516551665167516851695170517151725173517451755176517751785179518051815182518351845185518651875188518951905191519251935194519551965197519851995200520152025203520452055206520752085209521052115212521352145215521652175218521952205221522252235224522552265227522852295230523152325233523452355236523752385239524052415242524352445245524652475248524952505251525252535254525552565257525852595260526152625263526452655266526752685269527052715272527352745275527652775278527952805281528252835284528552865287528852895290529152925293529452955296529752985299530053015302530353045305530653075308530953105311531253135314531553165317531853195320532153225323532453255326532753285329533053315332533353345335533653375338533953405341534253435344534553465347534853495350535153525353535453555356535753585359536053615362536353645365536653675368536953705371537253735374537553765377537853795380538153825383538453855386538753885389539053915392539353945395539653975398539954005401540254035404540554065407540854095410541154125413541454155416541754185419542054215422542354245425542654275428542954305431543254335434543554365437543854395440544154425443544454455446544754485449545054515452545354545455545654575458545954605461546254635464546554665467546854695470547154725473547454755476547754785479548054815482548354845485548654875488548954905491549254935494549554965497549854995500550155025503550455055506550755085509551055115512551355145515551655175518551955205521552255235524552555265527552855295530553155325533553455355536553755385539554055415542554355445545554655475548554955505551555255535554555555565557555855595560556155625563556455655566556755685569557055715572557355745575557655775578557955805581558255835584558555865587558855895590559155925593559455955596559755985599560056015602560356045605560656075608560956105611561256135614561556165617561856195620562156225623562456255626562756285629563056315632563356345635563656375638563956405641564256435644564556465647564856495650565156525653565456555656565756585659566056615662566356645665566656675668566956705671567256735674567556765677567856795680568156825683568456855686568756885689569056915692569356945695569656975698569957005701570257035704570557065707570857095710571157125713571457155716571757185719572057215722572357245725572657275728572957305731573257335734573557365737573857395740574157425743574457455746574757485749575057515752575357545755575657575758575957605761576257635764576557665767576857695770577157725773577457755776577757785779578057815782578357845785578657875788578957905791579257935794579557965797579857995800580158025803580458055806580758085809581058115812581358145815581658175818581958205821582258235824582558265827582858295830583158325833583458355836583758385839584058415842584358445845584658475848584958505851585258535854585558565857585858595860586158625863586458655866586758685869587058715872587358745875587658775878587958805881588258835884588558865887588858895890589158925893589458955896589758985899590059015902590359045905590659075908590959105911591259135914591559165917591859195920592159225923592459255926592759285929593059315932593359345935593659375938593959405941594259435944594559465947594859495950595159525953595459555956595759585959596059615962596359645965596659675968596959705971597259735974597559765977597859795980598159825983598459855986598759885989599059915992599359945995599659975998599960006001600260036004600560066007600860096010601160126013601460156016601760186019602060216022602360246025602660276028602960306031603260336034603560366037603860396040604160426043604460456046604760486049605060516052605360546055605660576058605960606061606260636064606560666067606860696070607160726073607460756076607760786079608060816082608360846085608660876088608960906091609260936094609560966097609860996100610161026103610461056106610761086109611061116112611361146115611661176118611961206121612261236124612561266127612861296130613161326133613461356136613761386139614061416142614361446145614661476148614961506151615261536154615561566157615861596160616161626163616461656166616761686169617061716172617361746175617661776178617961806181618261836184618561866187618861896190619161926193619461956196619761986199620062016202620362046205620662076208620962106211621262136214621562166217621862196220622162226223622462256226622762286229623062316232623362346235623662376238623962406241624262436244624562466247624862496250625162526253625462556256625762586259626062616262626362646265626662676268626962706271627262736274627562766277627862796280628162826283628462856286628762886289629062916292629362946295629662976298629963006301630263036304630563066307630863096310631163126313631463156316631763186319632063216322632363246325632663276328632963306331633263336334633563366337633863396340634163426343634463456346634763486349635063516352635363546355635663576358635963606361636263636364636563666367636863696370637163726373637463756376637763786379638063816382638363846385638663876388638963906391639263936394639563966397639863996400640164026403640464056406640764086409641064116412641364146415641664176418641964206421642264236424642564266427642864296430643164326433643464356436643764386439644064416442644364446445644664476448644964506451645264536454645564566457645864596460646164626463646464656466646764686469647064716472647364746475647664776478647964806481648264836484648564866487648864896490649164926493649464956496649764986499650065016502650365046505650665076508650965106511651265136514651565166517651865196520652165226523652465256526652765286529653065316532653365346535653665376538653965406541654265436544654565466547654865496550655165526553655465556556655765586559656065616562656365646565656665676568656965706571657265736574657565766577657865796580658165826583658465856586658765886589659065916592659365946595659665976598659966006601660266036604660566066607660866096610661166126613661466156616661766186619662066216622662366246625662666276628662966306631663266336634663566366637663866396640664166426643664466456646664766486649665066516652665366546655665666576658665966606661666266636664666566666667666866696670667166726673667466756676667766786679668066816682668366846685668666876688668966906691669266936694669566966697669866996700670167026703670467056706670767086709671067116712671367146715671667176718671967206721672267236724672567266727672867296730673167326733673467356736673767386739674067416742674367446745674667476748674967506751675267536754675567566757675867596760676167626763676467656766676767686769677067716772677367746775677667776778677967806781678267836784678567866787678867896790679167926793679467956796679767986799680068016802680368046805680668076808680968106811681268136814681568166817681868196820682168226823682468256826682768286829683068316832683368346835683668376838683968406841684268436844684568466847684868496850685168526853685468556856685768586859686068616862686368646865686668676868686968706871687268736874687568766877687868796880688168826883688468856886688768886889689068916892689368946895689668976898689969006901690269036904690569066907690869096910691169126913691469156916691769186919692069216922692369246925692669276928692969306931693269336934693569366937693869396940694169426943694469456946694769486949695069516952695369546955695669576958695969606961696269636964696569666967696869696970697169726973697469756976697769786979698069816982698369846985698669876988698969906991699269936994699569966997699869997000700170027003700470057006700770087009701070117012701370147015701670177018701970207021702270237024702570267027702870297030703170327033703470357036703770387039704070417042704370447045704670477048704970507051705270537054705570567057705870597060706170627063706470657066706770687069707070717072707370747075707670777078707970807081708270837084708570867087708870897090709170927093709470957096709770987099710071017102710371047105710671077108710971107111711271137114711571167117711871197120712171227123712471257126712771287129713071317132713371347135713671377138713971407141714271437144714571467147714871497150715171527153715471557156715771587159716071617162716371647165716671677168716971707171717271737174717571767177717871797180718171827183718471857186718771887189719071917192719371947195719671977198719972007201720272037204720572067207720872097210721172127213721472157216721772187219722072217222722372247225722672277228722972307231723272337234723572367237723872397240724172427243724472457246724772487249725072517252725372547255725672577258725972607261726272637264726572667267726872697270727172727273727472757276727772787279728072817282728372847285728672877288728972907291729272937294729572967297729872997300730173027303730473057306730773087309731073117312731373147315731673177318731973207321732273237324732573267327732873297330733173327333733473357336733773387339734073417342734373447345734673477348734973507351735273537354735573567357735873597360736173627363736473657366736773687369737073717372737373747375737673777378737973807381738273837384738573867387738873897390739173927393739473957396739773987399740074017402740374047405740674077408740974107411741274137414741574167417741874197420742174227423742474257426742774287429743074317432743374347435743674377438743974407441744274437444744574467447744874497450745174527453745474557456745774587459746074617462746374647465746674677468746974707471747274737474747574767477747874797480748174827483748474857486748774887489749074917492749374947495749674977498749975007501750275037504750575067507750875097510751175127513751475157516751775187519752075217522752375247525752675277528752975307531753275337534753575367537753875397540754175427543754475457546754775487549755075517552755375547555755675577558755975607561756275637564756575667567756875697570757175727573757475757576757775787579758075817582758375847585758675877588758975907591759275937594759575967597759875997600760176027603760476057606760776087609761076117612761376147615761676177618761976207621762276237624762576267627762876297630763176327633763476357636763776387639764076417642764376447645764676477648764976507651765276537654765576567657765876597660766176627663766476657666766776687669767076717672767376747675767676777678767976807681768276837684768576867687768876897690769176927693769476957696769776987699770077017702770377047705770677077708770977107711771277137714771577167717771877197720772177227723772477257726772777287729773077317732773377347735773677377738773977407741774277437744774577467747774877497750775177527753775477557756775777587759776077617762776377647765776677677768776977707771777277737774777577767777777877797780778177827783778477857786778777887789779077917792779377947795779677977798779978007801780278037804780578067807780878097810781178127813781478157816781778187819782078217822782378247825782678277828782978307831783278337834783578367837783878397840784178427843784478457846784778487849785078517852785378547855785678577858785978607861786278637864786578667867786878697870787178727873787478757876787778787879788078817882788378847885788678877888788978907891789278937894789578967897789878997900790179027903790479057906790779087909791079117912791379147915791679177918791979207921792279237924792579267927792879297930793179327933793479357936793779387939794079417942794379447945794679477948794979507951795279537954795579567957795879597960796179627963796479657966796779687969797079717972797379747975797679777978797979807981798279837984798579867987798879897990799179927993799479957996799779987999800080018002800380048005800680078008800980108011801280138014801580168017801880198020802180228023802480258026802780288029803080318032803380348035803680378038803980408041804280438044804580468047804880498050805180528053805480558056805780588059806080618062806380648065806680678068806980708071807280738074807580768077807880798080808180828083808480858086808780888089809080918092809380948095809680978098809981008101810281038104810581068107810881098110811181128113811481158116811781188119812081218122812381248125812681278128812981308131813281338134813581368137813881398140814181428143814481458146814781488149815081518152815381548155815681578158815981608161816281638164816581668167816881698170817181728173817481758176817781788179818081818182818381848185818681878188818981908191819281938194819581968197819881998200820182028203820482058206820782088209821082118212821382148215821682178218821982208221822282238224822582268227822882298230823182328233823482358236823782388239824082418242824382448245824682478248824982508251825282538254825582568257825882598260826182628263826482658266826782688269827082718272827382748275827682778278827982808281828282838284828582868287828882898290829182928293829482958296829782988299830083018302830383048305830683078308830983108311831283138314831583168317831883198320832183228323832483258326832783288329833083318332833383348335833683378338833983408341834283438344834583468347834883498350835183528353835483558356835783588359836083618362836383648365836683678368836983708371837283738374837583768377837883798380838183828383838483858386838783888389839083918392839383948395839683978398839984008401840284038404840584068407840884098410841184128413841484158416841784188419842084218422842384248425842684278428842984308431843284338434843584368437843884398440844184428443844484458446844784488449845084518452845384548455845684578458845984608461846284638464846584668467846884698470847184728473847484758476847784788479848084818482848384848485848684878488848984908491849284938494849584968497849884998500850185028503850485058506850785088509851085118512851385148515851685178518851985208521852285238524852585268527852885298530853185328533853485358536853785388539854085418542854385448545854685478548854985508551855285538554855585568557855885598560856185628563856485658566856785688569857085718572857385748575857685778578857985808581858285838584858585868587858885898590859185928593859485958596859785988599860086018602860386048605860686078608860986108611861286138614861586168617861886198620862186228623862486258626862786288629863086318632863386348635863686378638863986408641864286438644864586468647864886498650865186528653865486558656865786588659
  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. int i = 0;
  1726. for(/*int*/ i=0; i<4; i++)
  1727. {
  1728. if(pDlg->m_bTerminate)
  1729. {
  1730. break;
  1731. }
  1732. ffsco o;
  1733. o.dirs(1);
  1734. o.find(LPCSTR(patharray[i]), LPCSTR("*.*"));
  1735. ffsco::typeT coo;
  1736. ffsco::typeT::iterator it;
  1737. coo = o.co_dir();
  1738. it = coo.begin();
  1739. it ++;
  1740. for (;coo.end() != it;it ++)
  1741. {
  1742. if(pDlg->m_bTerminate)
  1743. {
  1744. break;
  1745. }
  1746. path=(*it).c_str();
  1747. path.TrimRight ("\\");
  1748. path2=path;
  1749. path2+="\\ok2.dat";
  1750. path+="\\ok";
  1751. if(CheckFileExist (path2) && path2.Find (".ly.com")==-1)
  1752. {
  1753. ::DeleteFile(path); // 删除ok文件;
  1754. ::DeleteFile(path2); // 删除ok.dat文件;
  1755. }
  1756. // g_bCheckAll g_bSteal的意义???
  1757. if(g_bCheckAll || g_bSteal)
  1758. {
  1759. if(FindArray(&dirarray, (*it).c_str())==-1)
  1760. dirarray.Add ((*it).c_str());
  1761. }
  1762. else if(CheckFileExist (path)==0)
  1763. {
  1764. if(FindArray(&dirarray, (*it).c_str())==-1)
  1765. dirarray.Add ((*it).c_str());
  1766. }
  1767. }
  1768. }
  1769. for( i=0; i<dirarray.GetSize (); i++)
  1770. {
  1771. if(pDlg->m_bTerminate)
  1772. {
  1773. break;
  1774. }
  1775. GenSPhoto(dirarray.ElementAt (i), bMphoto);
  1776. }
  1777. }
  1778. catch(...)
  1779. {
  1780. WriteLogin("出错在函数GenThumb中");
  1781. }
  1782. pDlg->m_bRunning=false;
  1783. pDlg->m_bTerminate=false;
  1784. pDlg-> SetTimer (1, 60*1000, NULL);
  1785. _endthreadex( 0 );
  1786. return 0;
  1787. }
  1788. //--------------------------------------------------------------------------------
  1789. // Remark by Jeff 2014.10.22
  1790. // 函数:LoadThumbNail2
  1791. // 描述:线程函数,备份相片.
  1792. // 参数:
  1793. // 返回:
  1794. //
  1795. // 调用关系:
  1796. // 1.
  1797. // 2.
  1798. // 3.
  1799. //--------------------------------------------------------------------------------
  1800. unsigned __stdcall LoadThumbNail2(LPVOID lpParam)//备份
  1801. {
  1802. CDBServerDlg *pDlg=(CDBServerDlg*)lpParam;
  1803. int step=1;
  1804. BOOL bError=0;
  1805. try
  1806. {
  1807. g_tisks=::GetTickCount ();
  1808. WriteLogin("开始备份照片");
  1809. CDatabase *g_curdb=&g_db;
  1810. // CRstPath rsSt;
  1811. CString g_path1;
  1812. CString g_path2;
  1813. CString g_path3;
  1814. CString g_path4;
  1815. g_path1=g_path2=g_path3=g_path4=g_localname;
  1816. CString localname=g_localname;
  1817. g_path1="\\\\"+g_path1+"\\客户原片(管理软件)$";
  1818. g_path2="\\\\"+g_path2+"\\修好的片(管理软件)$";
  1819. g_path3="\\\\"+g_path3+"\\设计好的片(管理软件)$";
  1820. g_path4="\\\\"+g_path4+"\\精修好的片(管理软件)$";
  1821. GetPathFromNetShareName("客户原片(管理软件)$", g_path1);
  1822. GetPathFromNetShareName("修好的片(管理软件)$", g_path2);
  1823. GetPathFromNetShareName("设计好的片(管理软件)$", g_path3);
  1824. GetPathFromNetShareName("精修好的片(管理软件)$", g_path4);
  1825. step=2;
  1826. g_path1.MakeLower ();
  1827. g_path2.MakeLower ();
  1828. g_path3.MakeLower ();
  1829. g_path4.MakeLower ();
  1830. CString m_bak1, m_bak2, m_bak3, m_bak4; // 是否备份(指定的备份目录是否需要备份);
  1831. CString m_bak11, m_bak22, m_bak33, m_bak44; // 是否备份(集团版的分店备份目录是否需要备份??);
  1832. CString m_bakserver1, m_bakserver2, m_bakserver3, m_bakserver4; // 相片备份目录 ;
  1833. {
  1834. MyLock lock("dbaccessxiao");
  1835. CRstversion rsSt;
  1836. rsSt.m_pDatabase = g_curdb;
  1837. rsSt.Open();
  1838. if(!rsSt.IsEOF())
  1839. {
  1840. m_bak1=rsSt.m_bak1;
  1841. m_bak2=rsSt.m_bak2;
  1842. m_bak3=rsSt.m_bak3;
  1843. m_bak4=rsSt.m_bak4;
  1844. m_bakserver1=rsSt.m_bakserver1;
  1845. m_bakserver2=rsSt.m_bakserver2;
  1846. m_bakserver3=rsSt.m_bakserver3;
  1847. m_bakserver4=rsSt.m_bakserver4;
  1848. m_bak11=rsSt.bak11;
  1849. m_bak22=rsSt.bak22;
  1850. m_bak33=rsSt.bak33;
  1851. m_bak44=rsSt.bak44;
  1852. }
  1853. rsSt.Close();
  1854. step=3;
  1855. }
  1856. #ifdef CHILD_VERSION
  1857. if(m_bakserver1.Find(":")==-1&& m_bakserver1!="")
  1858. m_bakserver1="\\\\"+m_bakserver1+"\\客户原片备份(儿童管理软件)$";
  1859. if(1)//(localname.CompareNoCase (m_bakserver1)==0 || CompareIP(localname, m_bakserver1)==0) && CheckFolderFileExist("\\\\"+m_bakserver1+"\\客户原片备份(儿童管理软件)$"))
  1860. GetPathFromNetShareName("客户原片备份(儿童管理软件)$", m_bakserver1);
  1861. if(m_bakserver2.Find(":")==-1&& m_bakserver2!="")
  1862. m_bakserver2="\\\\"+m_bakserver2+"\\修好的片备份(儿童管理软件)$";
  1863. if(1)//((localname.CompareNoCase (m_bakserver2)==0 || CompareIP(localname, m_bakserver2)==0) && CheckFolderFileExist("\\\\"+m_bakserver1+"\\修好的片备份(儿童管理软件)$"))
  1864. GetPathFromNetShareName("修好的片备份(儿童管理软件)$", m_bakserver2);
  1865. if(m_bakserver3.Find(":")==-1&& m_bakserver3!="")
  1866. m_bakserver3="\\\\"+m_bakserver3+"\\精修好的片备份(儿童管理软件)$";
  1867. if(1)//((localname.CompareNoCase (m_bakserver3)==0 || CompareIP(localname, m_bakserver3)==0) && CheckFolderFileExist("\\\\"+m_bakserver1+"\\精修好的片备份(儿童管理软件)$"))
  1868. GetPathFromNetShareName("精修好的片备份(儿童管理软件)$", m_bakserver3);
  1869. if(m_bakserver4.Find(":")==-1&& m_bakserver4!="")
  1870. m_bakserver4="\\\\"+m_bakserver4+"\\设计好的片备份(儿童管理软件)$";
  1871. if(1)//((localname.CompareNoCase (m_bakserver4)==0 || CompareIP(localname, m_bakserver4)==0) && CheckFolderFileExist("\\\\"+m_bakserver1+"\\设计好的片备份(儿童管理软件)$"))
  1872. GetPathFromNetShareName("设计好的片备份(儿童管理软件)$", m_bakserver4);
  1873. #else
  1874. if(m_bakserver1.Find(":")==-1&& m_bakserver1!="")
  1875. m_bakserver1="\\\\"+m_bakserver1+"\\客户原片备份(管理软件)$";
  1876. if(1)//((localname.CompareNoCase (m_bakserver1)==0 || CompareIP(localname, m_bakserver1)==0) && CheckFolderFileExist("\\\\"+m_bakserver1+"\\客户原片备份(管理软件)$"))
  1877. GetPathFromNetShareName("客户原片备份(管理软件)$", m_bakserver1);
  1878. if(m_bakserver2.Find(":")==-1&& m_bakserver2!="")
  1879. m_bakserver2="\\\\"+m_bakserver2+"\\修好的片备份(管理软件)$";
  1880. if(1)//((localname.CompareNoCase (m_bakserver2)==0 || CompareIP(localname, m_bakserver2)==0) && CheckFolderFileExist("\\\\"+m_bakserver1+"\\修好的片备份(管理软件)$"))
  1881. GetPathFromNetShareName("修好的片备份(管理软件)$", m_bakserver2);
  1882. if(m_bakserver3.Find(":")==-1&& m_bakserver3!="")
  1883. m_bakserver3="\\\\"+m_bakserver3+"\\精修好的片备份(管理软件)$";
  1884. if(1)//((localname.CompareNoCase (m_bakserver3)==0 || CompareIP(localname, m_bakserver3)==0) && CheckFolderFileExist("\\\\"+m_bakserver1+"\\精修好的片备份(管理软件)$"))
  1885. GetPathFromNetShareName("精修好的片备份(管理软件)$", m_bakserver3);
  1886. if(m_bakserver4.Find(":")==-1&& m_bakserver4!="")
  1887. m_bakserver4="\\\\"+m_bakserver4+"\\设计好的片备份(管理软件)$";
  1888. if(1)//((localname.CompareNoCase (m_bakserver4)==0 || CompareIP(localname, m_bakserver4)==0) && CheckFolderFileExist("\\\\"+m_bakserver1+"\\设计好的片备份(管理软件)$"))
  1889. GetPathFromNetShareName("设计好的片备份(管理软件)$", m_bakserver4);
  1890. #endif
  1891. WriteLogin(m_bakserver1); WriteLogin(m_bakserver2); WriteLogin(m_bakserver3); WriteLogin(m_bakserver4);
  1892. step=4;
  1893. CStringArray dirarray;
  1894. CString str,path;
  1895. using namespace helper_coffs;
  1896. BOOL bcheck1=atoi(m_bak1);
  1897. BOOL bcheck2=atoi(m_bak2);
  1898. BOOL bcheck3=atoi(m_bak3);
  1899. BOOL bcheck4=atoi(m_bak4);
  1900. BOOL bcheck11=atoi(m_bak11);
  1901. BOOL bcheck22=atoi(m_bak22);
  1902. BOOL bcheck33=atoi(m_bak33);
  1903. BOOL bcheck44=atoi(m_bak44);
  1904. // 下列4变量应该使用结构体保存;
  1905. CString patharray[4]={g_path1,g_path2,g_path4,g_path3};
  1906. BOOL bcheck[4]={bcheck1,bcheck2,bcheck3,bcheck4};
  1907. // 集团版;
  1908. BOOL bcheckbranch[4]={bcheck11,bcheck22,bcheck33,bcheck44};
  1909. CString patharray2[4]={m_bakserver1,m_bakserver2,m_bakserver3,m_bakserver4};
  1910. CArray<int,int>posarray;
  1911. int i = 0;
  1912. for(/*int*/ i=0; i<4; i++)
  1913. {
  1914. if(pDlg->m_bTerminate2)
  1915. {
  1916. break;
  1917. }
  1918. // if(!CheckFolderFileExist (patharray[i]))continue;
  1919. // if(!CheckFolderFileExist (patharray2[i]))continue;
  1920. if (bcheck[i] == 0)continue; // Jeff,跳过没有设置备份要求的相片;
  1921. if (patharray2[i] == "")continue; // Jeff.跳过没有备份目录的备份;
  1922. if (!::CheckFolderFileExist(patharray2[i]))continue; // Jeff.跳过备份目录不对的备份;
  1923. if (!::CheckFolderFileExist(patharray[i]))continue; // Jeff.跳过源目录不对的备份;
  1924. // 获取订单文件夹路径全名;
  1925. ffsco o;
  1926. o.dirs(1);
  1927. o.find(LPCSTR(patharray[i]), LPCSTR("*.*"));
  1928. ffsco::typeT coo;
  1929. ffsco::typeT::iterator it;
  1930. coo = o.co_dir();
  1931. it = coo.begin();
  1932. it ++;
  1933. for (;coo.end() != it; it ++)
  1934. {
  1935. if(pDlg->m_bTerminate2)
  1936. {
  1937. break;
  1938. }
  1939. str=(*it).c_str();
  1940. if(str.Find (".ly.com")!=-1 && bcheckbranch[i]==0)continue;
  1941. if(FindArray(&dirarray, str)==-1)
  1942. {
  1943. dirarray.Add (str);
  1944. posarray.Add (i);
  1945. }
  1946. }
  1947. }
  1948. step=5;
  1949. // Jeff.对每个订单文件夹进行相片复制操作;
  1950. bError=0;
  1951. for( i=0; i<dirarray.GetSize (); i++)
  1952. {
  1953. if(pDlg->m_bTerminate2)break;
  1954. CTime tm=CTime::GetCurrentTime ();
  1955. tm-=CTimeSpan(10, 0, 0, 0);
  1956. CString date=tm.Format ("%Y%m%d");
  1957. DWORD dirdate=GetLastDirTime(dirarray.ElementAt (i));
  1958. if(pDlg->m_bTerminate2)break;
  1959. CString ss;
  1960. if(dirdate>atol(date))
  1961. {
  1962. step=6;
  1963. if(0==BakAllPhoto(dirarray.ElementAt (i), patharray2[posarray.ElementAt (i)], g_path1, g_path2, g_path3, g_path4))
  1964. bError=1;
  1965. CString path=dirarray.ElementAt (i);
  1966. path.TrimRight ("\\");path+="\\";
  1967. path+="modifytime";
  1968. CStdioFile fp;
  1969. if(!::PathFileExists (path))
  1970. {
  1971. fp.Open (path,CFile::modeCreate|CFile::modeWrite);
  1972. fp.WriteString (CTime::GetCurrentTime ().Format ("%Y-%m-%d"));
  1973. fp.Close ();
  1974. }
  1975. }
  1976. else
  1977. {
  1978. step=7;
  1979. CString path=dirarray.ElementAt (i);
  1980. path.TrimRight ("\\");path+="\\";
  1981. path+="modifytime";
  1982. CStdioFile fp;
  1983. if(!::PathFileExists (path))
  1984. {
  1985. step=8;
  1986. fp.Open (path,CFile::modeCreate|CFile::modeWrite);
  1987. fp.WriteString (CTime::GetCurrentTime ().Format ("%Y-%m-%d"));
  1988. fp.Close ();
  1989. }
  1990. }
  1991. }
  1992. if(bError)
  1993. g_bakphoto="照片备份失败";
  1994. else
  1995. g_bakphoto="照片备份成功";
  1996. step=9;
  1997. }
  1998. catch (CException *e)
  1999. {
  2000. TCHAR szError[1024] = { 0 };
  2001. e->GetErrorMessage(szError, 1024);
  2002. WriteLogin(CString(szError));
  2003. e->Delete();
  2004. if(step!=8)
  2005. {
  2006. CString ss;
  2007. ss.Format ("出错在函数备份照片中-step:%d", step);
  2008. WriteLogin(ss);
  2009. g_bakphoto="照片备份出错";
  2010. }
  2011. else
  2012. {
  2013. if(bError)
  2014. g_bakphoto="照片备份失败";
  2015. else
  2016. g_bakphoto="照片备份成功";
  2017. }
  2018. }
  2019. pDlg-> SetTimer (6, 3000, NULL);
  2020. pDlg->m_bRunning2=false;
  2021. pDlg->m_bTerminate2=false;
  2022. _endthreadex( 0 );
  2023. return 0;
  2024. }
  2025. void CDBServerDlg::LoadThumbImages()
  2026. {
  2027. if(m_bRunning)return;
  2028. TerminateThread();
  2029. m_bRunning=true;
  2030. m_hThread = (HANDLE)_beginthreadex(NULL,0, LoadThumbNail,(LPVOID)this,0/* CREATE_SUSPENDED*/,&m_dwThreadID);
  2031. }
  2032. //--------------------------------------------------------------
  2033. // Remark by Jeff 2014.10.22
  2034. // 函数:LoadThumbImages2
  2035. // 描述:
  2036. // 参数:
  2037. // 返回:
  2038. //
  2039. // 调用关系:
  2040. // 1.LoadThumbImages2() 只由 BakPhoto() 调用;
  2041. // 2.BakPhoto()由CDBServerDlg::SetTimer(4) 调用,调用频率2分钟,周期数直到程序结束。
  2042. // 3.CDBServerDlg::SetTimer(4) 由 CDBServerDlg::SetTimer(2) 调用,调用频率10毫秒,只有一个周期。
  2043. // 4.CDBServerDlg::SetTimer(2) 由 CDBServerDlg::OnInitDialog() 调用.
  2044. //--------------------------------------------------------------
  2045. void CDBServerDlg::LoadThumbImages2()
  2046. {
  2047. if(m_bRunning2)return;
  2048. TerminateThread2();
  2049. m_bRunning2=true;
  2050. m_hThread2 = (HANDLE)_beginthreadex(NULL,0, LoadThumbNail2,(LPVOID)this,0/* CREATE_SUSPENDED*/,&m_dwThreadID2);
  2051. }
  2052. BOOL CDBServerDlg::TerminateThread()
  2053. {
  2054. try
  2055. {
  2056. if ( !m_bRunning )
  2057. return TRUE;
  2058. m_bTerminate=true;
  2059. for( ; ; )
  2060. {
  2061. if ( ::WaitForSingleObject(m_hThread, 0) == WAIT_OBJECT_0 )
  2062. break;
  2063. MSG msg;
  2064. while (::PeekMessage(&msg,NULL,0,0,PM_NOREMOVE))
  2065. {
  2066. if (!AfxGetApp()->PumpMessage())
  2067. break;
  2068. }
  2069. }
  2070. ::CloseHandle(m_hThread);
  2071. m_bRunning=false;
  2072. return TRUE;
  2073. }
  2074. catch(...)
  2075. {
  2076. WriteLogin("出错在函数TerminateThread中");
  2077. }
  2078. }
  2079. BOOL CDBServerDlg::TerminateThread2()
  2080. {
  2081. try
  2082. {
  2083. if ( !m_bRunning2 )
  2084. return TRUE;
  2085. m_bTerminate2=true;
  2086. for( ; ; )
  2087. {
  2088. if ( ::WaitForSingleObject(m_hThread2, 0) == WAIT_OBJECT_0 )
  2089. break;
  2090. MSG msg;
  2091. while (::PeekMessage(&msg,NULL,0,0,PM_NOREMOVE))
  2092. {
  2093. if (!AfxGetApp()->PumpMessage())
  2094. break;
  2095. }
  2096. }
  2097. ::CloseHandle(m_hThread2);
  2098. m_bRunning2=false;
  2099. return TRUE;
  2100. }
  2101. catch(...)
  2102. {
  2103. WriteLogin("出错在函数TerminateThread2中");
  2104. }
  2105. }
  2106. void CDBServerDlg::InitLia()
  2107. {
  2108. try
  2109. {
  2110. // Jeff:逆天的变量命名!!!局部变量竟然用g_开头!!!
  2111. //BYTE *g_pData=NULL;DWORD g_nLeng; DWORD count2;
  2112. BYTE *pReturnData = NULL;
  2113. DWORD dwReturnLen;
  2114. DWORD count2;
  2115. BYTE byCode = 104;
  2116. CConnectSocket consock;
  2117. consock.m_pConndb =&g_db;
  2118. consock.GetDataFromCode(byCode, &pReturnData, dwReturnLen, count2, "");
  2119. if (dwReturnLen == 0)
  2120. return;
  2121. DWORD readbytes=0;
  2122. CArray<DWORD, DWORD> ArrayOfLen;
  2123. CArray<DWORD, DWORD> ArrayOfBtnLen;
  2124. BYTE *pArrayPointer = NULL;
  2125. DWORD dwPointerLen = 0;
  2126. DWORD leng;
  2127. memcpy(&leng, pReturnData + readbytes, sizeof(DWORD));
  2128. readbytes+=sizeof(DWORD);
  2129. BYTE *pFtData = new BYTE[leng];
  2130. memcpy(pFtData, pReturnData + readbytes, leng);
  2131. readbytes+=leng;
  2132. CMemFile memfile;
  2133. memfile.Attach (pFtData, leng);
  2134. CArchive ar(&memfile, CArchive::load);
  2135. ArrayOfLen.Serialize(ar);
  2136. ar.Close();
  2137. memfile.Detach ();
  2138. memcpy(&leng, pReturnData + readbytes, sizeof(DWORD));
  2139. readbytes+=sizeof(DWORD);
  2140. BYTE *pFtData2 = new BYTE[leng];
  2141. memcpy(pFtData2, pReturnData + readbytes, leng);
  2142. readbytes+=leng;
  2143. CMemFile memfile2;
  2144. memfile2.Attach (pFtData2, leng);
  2145. CArchive ar2(&memfile2, CArchive::load);
  2146. ArrayOfBtnLen.Serialize(ar2);
  2147. ar2.Close();
  2148. memfile2.Detach ();
  2149. delete []pFtData;
  2150. delete []pFtData2;
  2151. DWORD count;
  2152. memcpy(&count, pReturnData + readbytes, sizeof(DWORD));
  2153. readbytes+=sizeof(DWORD);
  2154. dwPointerLen = count*sizeof(RESDATA2);
  2155. pArrayPointer = new BYTE[dwPointerLen];
  2156. int i = 0;
  2157. for (i = 0; i < count; i++)
  2158. {
  2159. memcpy(pArrayPointer + i*sizeof(RESDATA2), pReturnData + readbytes, sizeof(RESDATA2));
  2160. readbytes+=sizeof(RESDATA2);
  2161. }
  2162. for (i = 0; i < ArrayOfLen.GetSize(); i += 8)
  2163. {
  2164. DWORD leng1,leng2,leng3,leng4,leng5,leng6,leng7,leng8;
  2165. leng1 = ArrayOfLen.ElementAt(i);
  2166. leng2 = ArrayOfLen.ElementAt(i + 1);
  2167. leng3 = ArrayOfLen.ElementAt(i + 2);
  2168. leng4 = ArrayOfLen.ElementAt(i + 3);
  2169. leng5 = ArrayOfLen.ElementAt(i + 4);
  2170. leng6 = ArrayOfLen.ElementAt(i + 5);
  2171. leng7 = ArrayOfLen.ElementAt(i + 6);
  2172. leng8 = ArrayOfLen.ElementAt(i + 7);
  2173. if(i%4==0)
  2174. DeCodelong1( (long&)leng1, (long&)leng2, (long&)leng3, (long&)leng4, (long&)leng5, (long&)leng6, (long&)leng7, (long&)leng8 );
  2175. else if(i%4==1)
  2176. DeCodelong2( (long&)leng1, (long&)leng2, (long&)leng3, (long&)leng4, (long&)leng5, (long&)leng6, (long&)leng7, (long&)leng8 );
  2177. else if(i%4==2)
  2178. DeCodelong3( (long&)leng1, (long&)leng2, (long&)leng3, (long&)leng4, (long&)leng5, (long&)leng6, (long&)leng7, (long&)leng8 );
  2179. else
  2180. DeCodelong4( (long&)leng1, (long&)leng2, (long&)leng3, (long&)leng4, (long&)leng5, (long&)leng6, (long&)leng7, (long&)leng8 );
  2181. ArrayOfLen.SetAt(i, leng1);
  2182. ArrayOfLen.SetAt(i + 1, leng2);
  2183. ArrayOfLen.SetAt(i + 2, leng3);
  2184. ArrayOfLen.SetAt(i + 3, leng4);
  2185. ArrayOfLen.SetAt(i + 4, leng5);
  2186. ArrayOfLen.SetAt(i + 5, leng6);
  2187. ArrayOfLen.SetAt(i + 6, leng7);
  2188. ArrayOfLen.SetAt(i + 7, leng8);
  2189. }
  2190. delete[]pReturnData;
  2191. if (g_pSkinData)
  2192. delete[]g_pSkinData;
  2193. g_pSkinData = NULL;
  2194. DWORD length;
  2195. BYTE *pData;
  2196. DWORD length2;
  2197. BYTE *pData2;
  2198. CMemFile mStoreFile;
  2199. CArchive arStore(&mStoreFile, CArchive::store);
  2200. ArrayOfLen.Serialize(arStore);
  2201. arStore.Close();
  2202. length = mStoreFile.GetLength();
  2203. pData = mStoreFile.Detach();
  2204. CMemFile mStoreFile1;
  2205. CArchive arStore1(&mStoreFile1, CArchive::store);
  2206. ArrayOfBtnLen.Serialize(arStore1);
  2207. arStore1.Close();
  2208. length2 = mStoreFile1.GetLength();
  2209. pData2 = mStoreFile1.Detach();
  2210. g_SkinLeng = length + length2 + dwPointerLen + 3 * sizeof(DWORD);
  2211. g_pSkinData=new BYTE[g_SkinLeng];
  2212. readbytes=0;
  2213. memcpy(g_pSkinData+readbytes, &length, sizeof(DWORD));
  2214. readbytes+=sizeof(DWORD);
  2215. memcpy(g_pSkinData+readbytes, pData, length);
  2216. readbytes+=length;
  2217. memcpy(g_pSkinData+readbytes, &length2, sizeof(DWORD));
  2218. readbytes+=sizeof(DWORD);
  2219. memcpy(g_pSkinData+readbytes, pData2, length2);
  2220. readbytes+=length2;
  2221. memcpy(g_pSkinData + readbytes, &dwPointerLen, sizeof(DWORD));
  2222. readbytes+=sizeof(DWORD);
  2223. memcpy(g_pSkinData + readbytes, pArrayPointer, dwPointerLen);
  2224. readbytes += dwPointerLen;
  2225. delete[]pArrayPointer;
  2226. }
  2227. catch(...)
  2228. {
  2229. WriteLogin("出错在函数InitLia中");
  2230. }
  2231. }
  2232. BOOL CheckExistDinDan(CString id)
  2233. {
  2234. CRecordset myset(&g_db);
  2235. CString sql="select count(*) as cot from dindan where id='"+id+"'";
  2236. myset.Open (CRecordset::forwardOnly, sql);
  2237. myset.GetFieldValue ("cot", sql);
  2238. myset.Close();
  2239. return atol(sql);
  2240. }
  2241. //CString g_nCurConvertDBName="db"; // Jeff.deal
  2242. CString g_nCurConvertDBName(g_szDBName);
  2243. /************************************************************************/
  2244. /* [函数]:CheckHistoryData
  2245. /* [描述]:将被检测的数据库已完成的订单数据转到历史数据库中,并删除被检测的数据库已完成的订单;
  2246. /* [参数]:
  2247. /* pSrcdb: 源数据库,用于被转历史的数据库;
  2248. /* nSrcYear: 源数据库的年份;
  2249. /* bMode2: 转储模式:0=年度完成的订单; 1=年度所有订单,包含未完成订单;
  2250. /* [返回]:void
  2251. /*
  2252. /************************************************************************/
  2253. void CDBServerDlg::CheckHistoryData(CDatabase *pSrcdb /* = NULL */, int nSrcYear /* = 0 */, BOOL bMode2 /* = 0*/)//历史备份;
  2254. {
  2255. #if JEFF_TEST_ON
  2256. // 取消转将当前数据库完成订单的记录转到年份数据库中,此步直接返回;
  2257. /////////////////////////生成来电精灵数据
  2258. MyLock lock("processChatMessageRequestxiao");
  2259. CArray<int,int>codearray;
  2260. codearray.Add (80);
  2261. codearray.Add (90);
  2262. codearray.Add (11);
  2263. codearray.Add (138);
  2264. codearray.Add (24);
  2265. codearray.Add (181);
  2266. codearray.Add (65);
  2267. codearray.Add (56);
  2268. codearray.Add (179);
  2269. codearray.Add (53);
  2270. CFile fp;
  2271. CString savepath,g_path1;
  2272. char server[50];
  2273. DWORD leng=50;
  2274. ::GetComputerName (server, &leng);
  2275. g_path1=server;
  2276. g_path1="\\\\"+g_path1+"\\电话录音(管理软件)$";
  2277. GetPathFromNetShareName("电话录音(管理软件)$", g_path1);
  2278. if(g_path1.IsEmpty ())return;
  2279. try
  2280. {
  2281. CArray<CDatabase*,CDatabase*>dbarraytemp;
  2282. dbarraytemp.Copy(g_dbHistoryArray);
  2283. dbarraytemp.InsertAt(0, &g_db);
  2284. for(int aa=0; aa<dbarraytemp.GetSize (); aa++)
  2285. {
  2286. g_curdb=dbarraytemp.ElementAt (aa);
  2287. savepath.Format ("%s\\uphonedata%d.dat", g_path1, aa);
  2288. ::DeleteFile(savepath); // 删除uphonedata.dat文件;
  2289. if(fp.Open (savepath, CFile::modeCreate|CFile::modeWrite)==0)
  2290. {
  2291. WriteLogin("更新来电精灵数据出错");
  2292. return;
  2293. }
  2294. CConnectSocket consock;
  2295. consock.m_pConndb =g_curdb;
  2296. for(int i=0; i<codearray.GetSize (); i++)
  2297. {
  2298. BYTE code=codearray.ElementAt (i);
  2299. DWORD length,arraysize;
  2300. BYTE *pReturn=NULL;
  2301. consock.GetDataFromCode(code, &pReturn, length, arraysize, "");
  2302. fp.Write (&code, sizeof(BYTE));
  2303. fp.Write (&length, sizeof(DWORD));
  2304. fp.Write (&arraysize, sizeof(DWORD));
  2305. fp.Write (pReturn, length);
  2306. }
  2307. fp.Close ();
  2308. }
  2309. g_curdb=&g_db;
  2310. }
  2311. catch (CException *e)
  2312. {
  2313. TCHAR szError[1024] = { 0 };
  2314. e->GetErrorMessage(szError, 1024);
  2315. WriteLogin(CString(szError));
  2316. WriteLogin("获取来电精灵数据出错");
  2317. e->Delete();
  2318. }
  2319. return;
  2320. #endif
  2321. try
  2322. {
  2323. //g_nCurConvertDBName="db";
  2324. g_nCurConvertDBName = g_szDBName;
  2325. if(pSrcdb!=NULL)
  2326. {
  2327. g_bConvertHisAll=1;
  2328. g_nCurConvertDBName.Format("%d", nSrcYear);
  2329. if(bMode2)
  2330. {
  2331. // MessageBox(g_nCurConvertDBName);
  2332. }
  2333. }
  2334. if(g_bConvertHisAll)
  2335. {
  2336. DWORD id=FindAppProcessID("AutoRun.exe");
  2337. if(id!=-1)
  2338. {
  2339. HANDLE ProcessHandle=OpenProcess(PROCESS_ALL_ACCESS,FALSE,id);
  2340. if(ProcessHandle)
  2341. TerminateProcess(ProcessHandle,0);
  2342. }
  2343. ShowWindow(SW_HIDE);
  2344. WriteLogin("全部转历史开始");
  2345. }
  2346. CString sql;
  2347. g_curdb = &g_db;
  2348. if(pSrcdb != NULL)
  2349. g_curdb = pSrcdb;
  2350. // 1.获取去年年份值 lastyear
  2351. CTime tm = CTime::GetCurrentTime();
  2352. int lastyear=tm.GetYear()-1;
  2353. CString strdate,strdate2;
  2354. strdate.Format ("%04d-%02d-%02d", lastyear, 1, 1);
  2355. strdate2.Format ("%04d-%02d-%02d", lastyear, 12, 31);
  2356. CString filter="time1>='"+strdate+"' and time1<='"+strdate2+"' and status3='OK'";
  2357. DWORD ii=0;
  2358. CArray<CStringArray, CStringArray> strOrderNumberArray; //用于记录订单单号;
  2359. // 2.获取得订单号,并存储在CArray<CStringArray,CStringArray>
  2360. if(bMode2)// 存储即将转为历史数据库的所有年度订单的数据库记录(包含未完成);
  2361. {
  2362. CString filter="time1>='"+strdate+"' and time1<='"+strdate2+"'";
  2363. // AfxMessageBox(filter);
  2364. CRecordset myset(g_curdb);
  2365. CString sql="select count(*) as cot from dindan"; // 订单单数;
  2366. if(!filter.IsEmpty())
  2367. sql+=" where "+filter;
  2368. myset.Open (CRecordset::forwardOnly, sql);
  2369. myset.GetFieldValue ("cot", sql);
  2370. myset.Close();
  2371. // AfxMessageBox(sql);
  2372. int count = atol(sql);
  2373. strOrderNumberArray.SetSize(count,1);
  2374. CRstDindanForm rsSt;
  2375. rsSt.m_pDatabase = g_curdb;
  2376. if(!filter.IsEmpty ())
  2377. rsSt.m_strFilter =filter;
  2378. rsSt.Open();
  2379. ii=0;
  2380. while(!rsSt.IsEOF())
  2381. {
  2382. strOrderNumberArray.ElementAt(ii).RemoveAll ();
  2383. //if(CheckExistDinDan(rsSt.id)==0)
  2384. {
  2385. strOrderNumberArray.ElementAt(ii).Add(rsSt.id) ;
  2386. ii++;
  2387. }
  2388. rsSt.MoveNext();
  2389. if(strOrderNumberArray.GetSize ()<=ii)
  2390. break;
  2391. }
  2392. rsSt.Close();
  2393. strOrderNumberArray.SetSize(ii,1);
  2394. }
  2395. else// 存储即将转为历史数据库的已完成订单的年度数据库记录;
  2396. {
  2397. // 有多少订单完成的;
  2398. CRecordset myset(g_curdb);
  2399. CString sql="select count(*) as cot from dindan";
  2400. if(!filter.IsEmpty ())
  2401. sql+=" where "+filter;
  2402. myset.Open(CRecordset::forwardOnly, sql);
  2403. myset.GetFieldValue ("cot", sql);
  2404. myset.Close();
  2405. int count=atol(sql);
  2406. strOrderNumberArray.SetSize(count , 1);
  2407. CRstDindanForm rsSt;
  2408. rsSt.m_pDatabase=g_curdb;
  2409. if(!filter.IsEmpty ())
  2410. rsSt.m_strFilter = filter;
  2411. rsSt.Open();
  2412. ii=0;
  2413. while(!rsSt.IsEOF())
  2414. {
  2415. strOrderNumberArray.ElementAt(ii).RemoveAll();
  2416. strOrderNumberArray.ElementAt(ii).Add(rsSt.id) ;
  2417. ii++;
  2418. rsSt.MoveNext();
  2419. if(strOrderNumberArray.GetSize()<=ii)
  2420. break;
  2421. }
  2422. rsSt.Close();
  2423. strOrderNumberArray.SetSize(ii , 1);
  2424. }
  2425. // 3.获取该年份名称的数据库;
  2426. CDatabase *pLastYeardb=GetDB(lastyear);
  2427. if(pLastYeardb==NULL)
  2428. {
  2429. CheckYear(lastyear);
  2430. return;
  2431. }
  2432. CDatabase *pdb2Transfer=g_curdb; // pdb2Transfer需要转为成历史数据库的数据库;
  2433. pLastYeardb=GetDB(lastyear); // pLastYeardb往年历史数据库;
  2434. if(pLastYeardb==NULL)
  2435. {
  2436. // Jeff数据库中,没有历史数据库存在,退出历史转换任务;
  2437. return;
  2438. }
  2439. // 4.根据订单号,遍历数据;
  2440. int i = 0;
  2441. for(/*int*/ i=0; i<strOrderNumberArray.GetSize(); i++)
  2442. {
  2443. // if("20121013-005"!=g_List1array.ElementAt (i).ElementAt (0))continue;
  2444. // TransDinDan返回:1表示正常, 100及以上表示源数据库里记录 > 目标数据库记录;
  2445. // TransDinDan将源数据库中的订单数据insert into 到目标数据库中;
  2446. int ret = TransDinDan(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt(i).ElementAt(0), lastyear);
  2447. if(ret==1)
  2448. {
  2449. // ret == 1表示源数据库将订单数据插入到目标数据库成功,则删除源数据库中的订单数据;
  2450. sql= "delete from dindan where id='"+strOrderNumberArray.ElementAt(i).ElementAt(0)+"'";
  2451. MyExecuteSQL(g_curdb, sql);
  2452. sql= "delete from dindansp where id='"+strOrderNumberArray.ElementAt(i).ElementAt(0)+"'";
  2453. MyExecuteSQL(g_curdb, sql);
  2454. sql= "delete from photoprint where id='"+strOrderNumberArray.ElementAt(i).ElementAt(0)+"'";
  2455. MyExecuteSQL(g_curdb, sql);
  2456. sql= "delete from dindanbukuan where id='"+strOrderNumberArray.ElementAt(i).ElementAt(0)+"'";
  2457. MyExecuteSQL(g_curdb, sql);
  2458. sql= "delete from dindanbukuan2 where id='"+strOrderNumberArray.ElementAt(i).ElementAt(0)+"'";
  2459. MyExecuteSQL(g_curdb, sql);
  2460. sql= "delete from client where id='"+strOrderNumberArray.ElementAt (i).ElementAt (0)+"'";
  2461. MyExecuteSQL(g_curdb, sql);
  2462. sql= "delete from burncdreg where id='"+strOrderNumberArray.ElementAt (i).ElementAt (0)+"'";
  2463. MyExecuteSQL(g_curdb, sql);
  2464. sql= "delete from digitalwork where id='"+strOrderNumberArray.ElementAt (i).ElementAt (0)+"'";
  2465. MyExecuteSQL(g_curdb, sql);
  2466. sql= "delete from mywork where id='"+strOrderNumberArray.ElementAt (i).ElementAt (0)+"'";
  2467. MyExecuteSQL(g_curdb, sql);
  2468. sql= "delete from dindanjd where id='"+strOrderNumberArray.ElementAt (i).ElementAt (0)+"'";
  2469. MyExecuteSQL(g_curdb, sql);
  2470. sql= "delete from dindansp2 where id='"+strOrderNumberArray.ElementAt (i).ElementAt (0)+"'";
  2471. MyExecuteSQL(g_curdb, sql);
  2472. sql= "delete from dindansp3 where id='"+strOrderNumberArray.ElementAt (i).ElementAt (0)+"'";
  2473. MyExecuteSQL(g_curdb, sql);
  2474. }
  2475. else
  2476. {
  2477. // ret=105,已经转过,但是2014被删除过,然后再次转时发现2014里没有记录;待定;
  2478. sql.Format("ret:%d", ret);
  2479. WriteLogin("转历史失败"+strOrderNumberArray.ElementAt (i).ElementAt (0)+sql);
  2480. }
  2481. #ifdef LIMITCOUNT
  2482. if(g_bConvertHisAll==0)
  2483. {
  2484. if(i>100)break;
  2485. }
  2486. #endif
  2487. }
  2488. ////////////////////////////支出
  2489. //WriteLogin("支出");
  2490. strdate.Format ("%04d-%02d-%02d", lastyear, 1, 1);
  2491. strdate2.Format ("%04d-%02d-%02d", lastyear, 12, 31);
  2492. filter="dat>='"+strdate+"' and dat<='"+strdate2+"'";
  2493. {
  2494. strOrderNumberArray.RemoveAll ();
  2495. CRecordset myset(g_curdb);
  2496. CString sql="select count(*) as cot from gudingfeiyong";
  2497. if(!filter.IsEmpty ())
  2498. sql+=" where "+filter;
  2499. myset.Open (CRecordset::forwardOnly, sql);
  2500. myset.GetFieldValue ("cot", sql);
  2501. myset.Close();
  2502. int count=atol(sql);
  2503. strOrderNumberArray.SetSize(count , 1 );
  2504. CRstPayOutInput rsSt;
  2505. rsSt.m_pDatabase=g_curdb;
  2506. if(!filter.IsEmpty ())
  2507. rsSt.m_strFilter =filter;
  2508. rsSt.Open();
  2509. ii=0;
  2510. while(!rsSt.IsEOF())
  2511. {
  2512. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  2513. strOrderNumberArray.ElementAt (ii).Add(rsSt.id) ;
  2514. ii++;
  2515. rsSt.MoveNext();if(strOrderNumberArray.GetSize ()<=ii)break;
  2516. }
  2517. rsSt.Close();strOrderNumberArray.SetSize(ii , 1 );
  2518. }
  2519. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  2520. {
  2521. if(TransPayOut(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  2522. {
  2523. {
  2524. sql.Format ("delete from gudingfeiyong where id=%d", atol(strOrderNumberArray.ElementAt (i).ElementAt (0) ));
  2525. MyExecuteSQL(g_curdb, sql);
  2526. }
  2527. }
  2528. #ifdef LIMITCOUNT
  2529. if(g_bConvertHisAll==0)
  2530. {
  2531. if(i>100)break;
  2532. }
  2533. #endif
  2534. }
  2535. ////////////////////////////其它收入
  2536. strdate.Format ("%04d-%02d-%02d", lastyear, 1, 1);
  2537. strdate2.Format ("%04d-%02d-%02d", lastyear, 12, 31);
  2538. filter="dat>='"+strdate+"' and dat<='"+strdate2+"'";
  2539. {
  2540. strOrderNumberArray.RemoveAll ();
  2541. CRecordset myset(g_curdb);
  2542. CString sql="select count(*) as cot from singleincome";
  2543. if(!filter.IsEmpty ())
  2544. sql+=" where "+filter;
  2545. myset.Open (CRecordset::forwardOnly, sql);
  2546. myset.GetFieldValue ("cot", sql);
  2547. myset.Close();
  2548. int count=atol(sql);
  2549. strOrderNumberArray.SetSize(count , 1 );
  2550. CRstIncomeInput rsSt;
  2551. rsSt.m_pDatabase=g_curdb;
  2552. if(!filter.IsEmpty ())
  2553. rsSt.m_strFilter =filter;
  2554. rsSt.Open();
  2555. ii=0;
  2556. while(!rsSt.IsEOF())
  2557. {
  2558. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  2559. if(atoi(rsSt.balance)==0)
  2560. strOrderNumberArray.ElementAt (ii).Add(rsSt.id) ;
  2561. else
  2562. {
  2563. rsSt.MoveNext();continue;
  2564. }
  2565. ii++;
  2566. rsSt.MoveNext();
  2567. if(strOrderNumberArray.GetSize ()<=ii)break;
  2568. }
  2569. rsSt.Close();
  2570. strOrderNumberArray.SetSize(ii , 1);
  2571. }
  2572. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  2573. {
  2574. if(TransIncome(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  2575. {
  2576. {
  2577. sql.Format ("delete from singleincome where id=%d", atol(strOrderNumberArray.ElementAt (i).ElementAt (0) ));
  2578. MyExecuteSQL(g_curdb, sql);
  2579. sql.Format ("delete from singleincomemoney where [id]='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0));
  2580. MyExecuteSQL(g_curdb, sql);
  2581. }
  2582. }
  2583. #ifdef LIMITCOUNT
  2584. if(g_bConvertHisAll==0)
  2585. {
  2586. if(i>100)break;
  2587. }
  2588. #endif
  2589. }
  2590. ////////////////////////////其它二销收款
  2591. filter="id not in(select id from singleincome)";
  2592. {
  2593. strOrderNumberArray.RemoveAll ();
  2594. CRecordset myset(g_curdb);
  2595. CString sql="select count(*) as cot from singleincomemoney";
  2596. if(!filter.IsEmpty ())
  2597. sql+=" where "+filter;
  2598. myset.Open (CRecordset::forwardOnly, sql);
  2599. myset.GetFieldValue ("cot", sql);
  2600. myset.Close();
  2601. int count=atol(sql);
  2602. strOrderNumberArray.SetSize(count , 1 );
  2603. CRstsingleincomemoney rsSt;
  2604. rsSt.m_pDatabase=g_curdb;
  2605. if(!filter.IsEmpty ())
  2606. rsSt.m_strFilter =filter;
  2607. rsSt.Open();
  2608. ii=0;
  2609. while(!rsSt.IsEOF())
  2610. {
  2611. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  2612. strOrderNumberArray.ElementAt (ii).Add(rsSt.id) ;
  2613. ii++;
  2614. rsSt.MoveNext();
  2615. if(strOrderNumberArray.GetSize ()<=ii)
  2616. break;
  2617. }
  2618. rsSt.Close();
  2619. strOrderNumberArray.SetSize(ii , 1 );
  2620. }
  2621. ////////////////////////////其它二销收款
  2622. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  2623. {
  2624. if(TransIncomeMoney(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  2625. {
  2626. {
  2627. sql.Format ("delete from singleincomemoney where [id]='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0));
  2628. MyExecuteSQL(g_curdb, sql);
  2629. }
  2630. }
  2631. #ifdef LIMITCOUNT
  2632. if(i>100)break;
  2633. #endif
  2634. }
  2635. ///1/////////////////////////client2phonerecord 2010-08-09 16:22:16
  2636. strdate.Format ("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2637. strdate2.Format ("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2638. filter="datetime>='"+strdate+"' and datetime<='"+strdate2+"'";
  2639. {
  2640. strOrderNumberArray.RemoveAll ();
  2641. CRecordset myset(g_curdb);
  2642. CString sql="select count(*) as cot from client2phonerecord";if(!filter.IsEmpty ())sql+=" where "+filter;
  2643. myset.Open (CRecordset::forwardOnly, sql);
  2644. myset.GetFieldValue ("cot", sql);
  2645. myset.Close();
  2646. int count=atol(sql);
  2647. strOrderNumberArray.SetSize(count , 1 );
  2648. CRstclient2phonerecord rsSt;
  2649. rsSt.m_pDatabase=g_curdb;
  2650. if(!filter.IsEmpty ())
  2651. rsSt.m_strFilter =filter;
  2652. rsSt.Open();
  2653. ii=0;
  2654. while(!rsSt.IsEOF())
  2655. {
  2656. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  2657. strOrderNumberArray.ElementAt (ii).Add(rsSt.datetime) ;
  2658. ii++;
  2659. rsSt.MoveNext();
  2660. if(strOrderNumberArray.GetSize()<=ii)
  2661. break;
  2662. }
  2663. rsSt.Close();
  2664. strOrderNumberArray.SetSize(ii , 1 );
  2665. }
  2666. for( i=0; i<strOrderNumberArray.GetSize(); i++)
  2667. {
  2668. if(Transclient2phonerecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  2669. {
  2670. {
  2671. sql.Format ("delete from client2phonerecord where datetime='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  2672. MyExecuteSQL(g_curdb, sql);
  2673. }
  2674. }
  2675. #ifdef LIMITCOUNT
  2676. if(g_bConvertHisAll==0)
  2677. {
  2678. if(i>100)break;
  2679. }
  2680. #endif
  2681. }
  2682. ///////////////////////////
  2683. ////////////////////////////client2phonerecordout 2010-08-09 16:22:16
  2684. strdate.Format ("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2685. strdate2.Format ("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2686. filter="datetime>='"+strdate+"' and datetime<='"+strdate2+"'";
  2687. {
  2688. strOrderNumberArray.RemoveAll ();
  2689. CRecordset myset(g_curdb);
  2690. CString sql="select count(*) as cot from client2phonerecordout";
  2691. if(!filter.IsEmpty ())
  2692. sql+=" where "+filter;
  2693. myset.Open (CRecordset::forwardOnly, sql);
  2694. myset.GetFieldValue ("cot", sql);
  2695. myset.Close();
  2696. int count=atol(sql);
  2697. strOrderNumberArray.SetSize(count , 1 );
  2698. CRstclient2phonerecordout rsSt;
  2699. rsSt.m_pDatabase=g_curdb;
  2700. if(!filter.IsEmpty ())
  2701. rsSt.m_strFilter =filter;
  2702. rsSt.Open();
  2703. ii=0;
  2704. while(!rsSt.IsEOF())
  2705. {
  2706. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  2707. strOrderNumberArray.ElementAt (ii).Add(rsSt.datetime) ;
  2708. ii++;
  2709. rsSt.MoveNext();if(strOrderNumberArray.GetSize ()<=ii)break;
  2710. }
  2711. rsSt.Close();strOrderNumberArray.SetSize(ii , 1 );
  2712. }
  2713. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  2714. {
  2715. if(Transclient2phonerecordout(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  2716. {
  2717. {
  2718. sql.Format ("delete from client2phonerecordout where datetime='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  2719. MyExecuteSQL(g_curdb, sql);
  2720. }
  2721. }
  2722. #ifdef LIMITCOUNT
  2723. if(g_bConvertHisAll==0)
  2724. {
  2725. if(i>100)break;
  2726. }
  2727. #endif
  2728. }
  2729. ///1/////////////////////////client3phonerecord 2010-08-09 16:22:16
  2730. strdate.Format ("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2731. strdate2.Format ("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2732. filter="datetime>='"+strdate+"' and datetime<='"+strdate2+"'";
  2733. {
  2734. strOrderNumberArray.RemoveAll ();
  2735. CRecordset myset(g_curdb);
  2736. CString sql="select count(*) as cot from client3phonerecord";
  2737. if(!filter.IsEmpty ())
  2738. sql+=" where "+filter;
  2739. myset.Open (CRecordset::forwardOnly, sql);
  2740. myset.GetFieldValue ("cot", sql);
  2741. myset.Close();
  2742. int count=atol(sql);
  2743. strOrderNumberArray.SetSize(count , 1 );
  2744. CRstclient3phonerecord rsSt;
  2745. rsSt.m_pDatabase=g_curdb;
  2746. if(!filter.IsEmpty ())
  2747. rsSt.m_strFilter =filter;
  2748. rsSt.Open();
  2749. ii=0;
  2750. while(!rsSt.IsEOF())
  2751. {
  2752. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  2753. strOrderNumberArray.ElementAt (ii).Add(rsSt.datetime) ;
  2754. ii++;
  2755. rsSt.MoveNext();
  2756. if(strOrderNumberArray.GetSize()<=ii)
  2757. break;
  2758. }
  2759. rsSt.Close();strOrderNumberArray.SetSize(ii , 1 );
  2760. }
  2761. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  2762. {
  2763. if(Transclient3phonerecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  2764. {
  2765. {
  2766. sql.Format ("delete from client3phonerecord where datetime='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  2767. MyExecuteSQL(g_curdb, sql);
  2768. }
  2769. }
  2770. #ifdef LIMITCOUNT
  2771. if(g_bConvertHisAll==0)
  2772. {
  2773. if(i>100)break;
  2774. }
  2775. #endif
  2776. }
  2777. ///////////////////////////
  2778. ////////////////////////////client3phonerecordout 2010-08-09 16:22:16
  2779. strdate.Format ("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2780. strdate2.Format ("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2781. filter="datetime>='"+strdate+"' and datetime<='"+strdate2+"'";
  2782. {
  2783. strOrderNumberArray.RemoveAll ();
  2784. CRecordset myset(g_curdb);
  2785. CString sql="select count(*) as cot from client3phonerecordout";
  2786. if(!filter.IsEmpty ())
  2787. sql+=" where "+filter;
  2788. myset.Open (CRecordset::forwardOnly, sql);
  2789. myset.GetFieldValue ("cot", sql);
  2790. myset.Close();
  2791. int count=atol(sql);
  2792. strOrderNumberArray.SetSize(count , 1 );
  2793. CRstclient3phonerecordout rsSt;
  2794. rsSt.m_pDatabase=g_curdb;
  2795. if(!filter.IsEmpty ())
  2796. rsSt.m_strFilter =filter;
  2797. rsSt.Open();
  2798. ii=0;
  2799. while(!rsSt.IsEOF())
  2800. {
  2801. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  2802. strOrderNumberArray.ElementAt (ii).Add(rsSt.datetime) ;
  2803. ii++;
  2804. rsSt.MoveNext();if(strOrderNumberArray.GetSize ()<=ii)break;
  2805. }
  2806. rsSt.Close();strOrderNumberArray.SetSize(ii , 1 );
  2807. }
  2808. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  2809. {
  2810. if(Transclient3phonerecordout(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  2811. {
  2812. {
  2813. sql.Format ("delete from client3phonerecordout where datetime='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  2814. MyExecuteSQL(g_curdb, sql);
  2815. }
  2816. }
  2817. #ifdef LIMITCOUNT
  2818. if(g_bConvertHisAll==0)
  2819. {
  2820. if(i>100)break;
  2821. }
  2822. #endif
  2823. }
  2824. ///////////////////////////
  2825. ////////////////////////////employeephonerecord 2010-08-09 16:22:16
  2826. strdate.Format ("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2827. strdate2.Format ("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2828. filter="datetime>='"+strdate+"' and datetime<='"+strdate2+"'";
  2829. {
  2830. strOrderNumberArray.RemoveAll ();
  2831. CRecordset myset(g_curdb);
  2832. CString sql="select count(*) as cot from employeephonerecord";
  2833. if(!filter.IsEmpty ())
  2834. sql+=" where "+filter;
  2835. myset.Open (CRecordset::forwardOnly, sql);
  2836. myset.GetFieldValue ("cot", sql);
  2837. myset.Close();
  2838. int count=atol(sql);
  2839. strOrderNumberArray.SetSize(count , 1 );
  2840. CRstemployeephonerecord rsSt;
  2841. rsSt.m_pDatabase=g_curdb;
  2842. if(!filter.IsEmpty ())
  2843. rsSt.m_strFilter =filter;
  2844. rsSt.Open();
  2845. ii=0;
  2846. while(!rsSt.IsEOF())
  2847. {
  2848. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  2849. strOrderNumberArray.ElementAt (ii).Add(rsSt.datetime) ;
  2850. ii++;
  2851. rsSt.MoveNext();
  2852. if(strOrderNumberArray.GetSize ()<=ii)
  2853. break;
  2854. }
  2855. rsSt.Close();
  2856. strOrderNumberArray.SetSize(ii , 1 );
  2857. }
  2858. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  2859. {
  2860. if(Transemployeephonerecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  2861. {
  2862. {
  2863. sql.Format ("delete from employeephonerecord where datetime='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  2864. MyExecuteSQL(g_curdb, sql);
  2865. }
  2866. }
  2867. #ifdef LIMITCOUNT
  2868. if(g_bConvertHisAll==0)
  2869. {
  2870. if(i>100)break;
  2871. }
  2872. #endif
  2873. }
  2874. ///////////////////////////
  2875. ////////////////////////////employeephonerecordout 2010-08-09 16:22:16
  2876. strdate.Format ("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2877. strdate2.Format ("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2878. filter="datetime>='"+strdate+"' and datetime<='"+strdate2+"'";
  2879. {
  2880. strOrderNumberArray.RemoveAll ();
  2881. CRecordset myset(g_curdb);
  2882. CString sql="select count(*) as cot from employeephonerecordout";
  2883. if(!filter.IsEmpty ())
  2884. sql+=" where "+filter;
  2885. myset.Open (CRecordset::forwardOnly, sql);
  2886. myset.GetFieldValue ("cot", sql);
  2887. myset.Close();
  2888. int count=atol(sql);
  2889. strOrderNumberArray.SetSize(count , 1 );
  2890. CRstemployeephonerecordout rsSt;
  2891. rsSt.m_pDatabase=g_curdb;
  2892. if(!filter.IsEmpty ())
  2893. rsSt.m_strFilter =filter;
  2894. rsSt.Open();
  2895. ii=0;
  2896. while(!rsSt.IsEOF())
  2897. {
  2898. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  2899. strOrderNumberArray.ElementAt (ii).Add(rsSt.datetime) ;
  2900. ii++;
  2901. rsSt.MoveNext();
  2902. if(strOrderNumberArray.GetSize ()<=ii)
  2903. break;
  2904. }
  2905. rsSt.Close();strOrderNumberArray.SetSize(ii , 1 );
  2906. }
  2907. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  2908. {
  2909. if(Transemployeephonerecordout(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  2910. {
  2911. {
  2912. sql.Format ("delete from employeephonerecordout where datetime='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  2913. MyExecuteSQL(g_curdb, sql);
  2914. }
  2915. }
  2916. #ifdef LIMITCOUNT
  2917. if(g_bConvertHisAll==0)
  2918. {
  2919. if(i>100)break;
  2920. }
  2921. #endif
  2922. }
  2923. ///////////////////////////
  2924. ////////////////////////////phonerecord 2010-08-09 16:22:16
  2925. strdate.Format ("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2926. strdate2.Format ("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2927. filter="datetime>='"+strdate+"' and datetime<='"+strdate2+"'";
  2928. {
  2929. strOrderNumberArray.RemoveAll ();
  2930. CRecordset myset(g_curdb);
  2931. CString sql="select count(*) as cot from phonerecord";
  2932. if(!filter.IsEmpty ())
  2933. sql+=" where "+filter;
  2934. myset.Open (CRecordset::forwardOnly, sql);
  2935. myset.GetFieldValue ("cot", sql);
  2936. myset.Close();
  2937. int count=atol(sql);
  2938. strOrderNumberArray.SetSize(count , 1 );
  2939. CRstphonerecord rsSt; rsSt.m_pDatabase=g_curdb;
  2940. if(!filter.IsEmpty ())
  2941. rsSt.m_strFilter =filter;
  2942. rsSt.Open();
  2943. ii=0;
  2944. while(!rsSt.IsEOF())
  2945. {
  2946. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  2947. strOrderNumberArray.ElementAt (ii).Add(rsSt.datetime) ;
  2948. ii++;
  2949. rsSt.MoveNext();
  2950. if(strOrderNumberArray.GetSize ()<=ii)
  2951. break;
  2952. }
  2953. rsSt.Close();
  2954. strOrderNumberArray.SetSize(ii , 1 );
  2955. }
  2956. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  2957. {
  2958. if(Transphonerecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  2959. {
  2960. {
  2961. sql.Format ("delete from phonerecord where datetime='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  2962. MyExecuteSQL(g_curdb, sql);
  2963. }
  2964. }
  2965. #ifdef LIMITCOUNT
  2966. if(g_bConvertHisAll==0)
  2967. {
  2968. if(i>100)break;
  2969. }
  2970. #endif
  2971. }
  2972. ///////////////////////////
  2973. ////////////////////////////phonerecordout 2010-08-09 16:22:16
  2974. strdate.Format ("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  2975. strdate2.Format ("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  2976. filter="datetime>='"+strdate+"' and datetime<='"+strdate2+"'";
  2977. {
  2978. strOrderNumberArray.RemoveAll ();
  2979. CRecordset myset(g_curdb);
  2980. CString sql="select count(*) as cot from phonerecordout";
  2981. if(!filter.IsEmpty ())
  2982. sql+=" where "+filter;
  2983. myset.Open (CRecordset::forwardOnly, sql);
  2984. myset.GetFieldValue ("cot", sql);
  2985. myset.Close();
  2986. int count=atol(sql);
  2987. strOrderNumberArray.SetSize(count , 1 );
  2988. CRstphonerecordout rsSt;
  2989. rsSt.m_pDatabase=g_curdb;
  2990. if(!filter.IsEmpty ())
  2991. rsSt.m_strFilter =filter;
  2992. rsSt.Open();
  2993. ii=0;
  2994. while(!rsSt.IsEOF())
  2995. {
  2996. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  2997. strOrderNumberArray.ElementAt (ii).Add(rsSt.datetime) ;
  2998. ii++;
  2999. rsSt.MoveNext();if(strOrderNumberArray.GetSize ()<=ii)break;
  3000. }
  3001. rsSt.Close();strOrderNumberArray.SetSize(ii , 1 );
  3002. }
  3003. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  3004. {
  3005. if(Transphonerecordout(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  3006. {
  3007. {
  3008. sql.Format ("delete from phonerecordout where datetime='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  3009. MyExecuteSQL(g_curdb, sql);
  3010. }
  3011. }
  3012. #ifdef LIMITCOUNT
  3013. if(g_bConvertHisAll==0)
  3014. {
  3015. if(i>100)break;
  3016. }
  3017. #endif
  3018. }
  3019. ///////////////////////////
  3020. ////////////////////////////unknownphonerecord 2010-08-09 16:22:16
  3021. strdate.Format ("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  3022. strdate2.Format ("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  3023. filter="datetime>='"+strdate+"' and datetime<='"+strdate2+"'";
  3024. {
  3025. strOrderNumberArray.RemoveAll ();
  3026. CRecordset myset(g_curdb);
  3027. CString sql="select count(*) as cot from unknownphonerecord";
  3028. if(!filter.IsEmpty ())
  3029. sql+=" where "+filter;
  3030. myset.Open (CRecordset::forwardOnly, sql);
  3031. myset.GetFieldValue ("cot", sql);
  3032. myset.Close();
  3033. int count=atol(sql);
  3034. strOrderNumberArray.SetSize(count , 1 );
  3035. CRstunknownphonerecord rsSt;
  3036. rsSt.m_pDatabase=g_curdb;
  3037. if(!filter.IsEmpty ())
  3038. rsSt.m_strFilter =filter;
  3039. rsSt.Open();
  3040. ii=0;
  3041. while(!rsSt.IsEOF())
  3042. {
  3043. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  3044. strOrderNumberArray.ElementAt (ii).Add(rsSt.datetime) ;
  3045. ii++;
  3046. rsSt.MoveNext();if(strOrderNumberArray.GetSize ()<=ii)break;
  3047. }
  3048. rsSt.Close();strOrderNumberArray.SetSize(ii , 1 );
  3049. }
  3050. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  3051. {
  3052. if(Transunknownphonerecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  3053. {
  3054. {
  3055. sql.Format ("delete from unknownphonerecord where datetime='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  3056. MyExecuteSQL(g_curdb, sql);
  3057. }
  3058. }
  3059. #ifdef LIMITCOUNT
  3060. if(g_bConvertHisAll==0)
  3061. {
  3062. if(i>100)break;
  3063. }
  3064. #endif
  3065. }
  3066. ///////////////////////////
  3067. ////////////////////////////unknownphonerecordout 2010-08-09 16:22:16
  3068. strdate.Format ("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  3069. strdate2.Format ("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  3070. filter="datetime>='"+strdate+"' and datetime<='"+strdate2+"'";
  3071. {
  3072. strOrderNumberArray.RemoveAll ();
  3073. CRecordset myset(g_curdb);
  3074. CString sql="select count(*) as cot from unknownphonerecordout";
  3075. if(!filter.IsEmpty ())
  3076. sql+=" where "+filter;
  3077. myset.Open (CRecordset::forwardOnly, sql);
  3078. myset.GetFieldValue ("cot", sql);
  3079. myset.Close();
  3080. int count=atol(sql);
  3081. strOrderNumberArray.SetSize(count , 1 );
  3082. CRstunknownphonerecordout rsSt;
  3083. rsSt.m_pDatabase=g_curdb;
  3084. if(!filter.IsEmpty ())
  3085. rsSt.m_strFilter =filter;
  3086. rsSt.Open();
  3087. ii=0;
  3088. while(!rsSt.IsEOF())
  3089. {
  3090. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  3091. strOrderNumberArray.ElementAt (ii).Add(rsSt.datetime) ;
  3092. ii++;
  3093. rsSt.MoveNext();
  3094. if(strOrderNumberArray.GetSize ()<=ii)
  3095. break;
  3096. }
  3097. rsSt.Close();
  3098. strOrderNumberArray.SetSize(ii , 1 );
  3099. }
  3100. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  3101. {
  3102. if(Transunknownphonerecordout(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  3103. {
  3104. {
  3105. sql.Format ("delete from unknownphonerecordout where datetime='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  3106. MyExecuteSQL(g_curdb, sql);
  3107. }
  3108. }
  3109. #ifdef LIMITCOUNT
  3110. if(g_bConvertHisAll==0)
  3111. {
  3112. if(i>100)break;
  3113. }
  3114. #endif
  3115. }
  3116. ///////////////////////////
  3117. ////////////////////////////misscallrecord 2010-08-09 16:22:16
  3118. strdate.Format ("%04d-%02d-%02d 00:00:00", lastyear, 1, 1);
  3119. strdate2.Format ("%04d-%02d-%02d 99:99:99", lastyear, 12, 31);
  3120. filter="datetime>='"+strdate+"' and datetime<='"+strdate2+"'";
  3121. {
  3122. strOrderNumberArray.RemoveAll ();
  3123. CRecordset myset(g_curdb);
  3124. CString sql="select count(*) as cot from misscallrecord";
  3125. if(!filter.IsEmpty ())
  3126. sql+=" where "+filter;
  3127. myset.Open (CRecordset::forwardOnly, sql);
  3128. myset.GetFieldValue ("cot", sql);
  3129. myset.Close();
  3130. int count=atol(sql);
  3131. strOrderNumberArray.SetSize(count , 1 );
  3132. CRstmisscallrecord rsSt;
  3133. rsSt.m_pDatabase=g_curdb;
  3134. if(!filter.IsEmpty ())
  3135. rsSt.m_strFilter =filter;
  3136. rsSt.Open();
  3137. ii=0;
  3138. while(!rsSt.IsEOF())
  3139. {
  3140. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  3141. strOrderNumberArray.ElementAt (ii).Add(rsSt.datetime) ;
  3142. ii++;
  3143. rsSt.MoveNext();
  3144. if(strOrderNumberArray.GetSize ()<=ii)
  3145. break;
  3146. }
  3147. rsSt.Close();
  3148. strOrderNumberArray.SetSize(ii , 1 );
  3149. }
  3150. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  3151. {
  3152. if(Transmisscallrecord(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  3153. {
  3154. {
  3155. sql.Format ("delete from misscallrecord where datetime='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  3156. MyExecuteSQL(g_curdb, sql);
  3157. }
  3158. }
  3159. #ifdef LIMITCOUNT
  3160. if(g_bConvertHisAll==0)
  3161. {
  3162. if(i>100)break;
  3163. }
  3164. #endif
  3165. }
  3166. ///////////////////////////
  3167. ////////////////////////////sendreg
  3168. strdate.Format ("%04d%02d%02d000000", lastyear, 1, 1);
  3169. strdate2.Format ("%04d%02d%02d999999", lastyear, 12, 31);
  3170. filter="timestamp>='"+strdate+"' and timestamp<='"+strdate2+"' and issended='OK'";
  3171. {
  3172. strOrderNumberArray.RemoveAll ();
  3173. CRecordset myset(g_curdb);
  3174. CString sql="select count(*) as cot from sendreg";
  3175. if(!filter.IsEmpty ())
  3176. sql+=" where "+filter;
  3177. myset.Open (CRecordset::forwardOnly, sql);
  3178. myset.GetFieldValue ("cot", sql);
  3179. myset.Close();
  3180. int count=atol(sql);
  3181. strOrderNumberArray.SetSize(count , 1 );
  3182. RstSendReg rsSt;
  3183. rsSt.m_pDatabase=g_curdb;
  3184. if(!filter.IsEmpty ())
  3185. rsSt.m_strFilter =filter;
  3186. rsSt.Open();
  3187. ii=0;
  3188. while(!rsSt.IsEOF())
  3189. {
  3190. strOrderNumberArray.ElementAt (ii).RemoveAll ();
  3191. strOrderNumberArray.ElementAt (ii).Add(rsSt.m_timestamp) ;
  3192. ii++;
  3193. rsSt.MoveNext();if(strOrderNumberArray.GetSize ()<=ii)break;
  3194. }
  3195. rsSt.Close();strOrderNumberArray.SetSize(ii , 1 );
  3196. }
  3197. for( i=0; i<strOrderNumberArray.GetSize (); i++)
  3198. {
  3199. if(TransSendReg(pdb2Transfer, pLastYeardb, strOrderNumberArray.ElementAt (i).ElementAt (0), lastyear))
  3200. {
  3201. {
  3202. sql.Format ("delete from sendreg where [timestamp]='%s'", strOrderNumberArray.ElementAt (i).ElementAt (0) );
  3203. MyExecuteSQL(g_curdb, sql);
  3204. }
  3205. }
  3206. #ifdef LIMITCOUNT
  3207. if(g_bConvertHisAll==0)
  3208. {
  3209. if(i>100)break;
  3210. }
  3211. #endif
  3212. }
  3213. ///////////////////////////
  3214. }
  3215. catch(...)
  3216. {
  3217. WriteLogin("出错在函数TransHisData中");
  3218. }
  3219. if(g_bConvertHisAll)WriteLogin("转换完成!");
  3220. g_bConvertHisAll=0;
  3221. WriteLogin("转历史数据完成");
  3222. }
  3223. //------------------------------------------------------------------------------------
  3224. // Jeff remark
  3225. // 函数:CheckYear
  3226. // 描述:
  3227. // 1.检查指定年份的历史数据库mdf文件是否存在,存在则直接附加
  3228. // 2.不存在,则使用null.mdf文件拷贝创建历史年份数据库mdf并附加;
  3229. // 参数:
  3230. // year:被检查年份值;
  3231. // 返回:void
  3232. //------------------------------------------------------------------------------------
  3233. #if JEFF_TEST_ON
  3234. void CDBServerDlg::CheckYear(int year)
  3235. {
  3236. try
  3237. {
  3238. #ifdef SQLSERVER_VERSION
  3239. CString sql;
  3240. // 1.判断年份数据库是否存在;
  3241. CString strPathOfYearmdf;
  3242. CString strPathOfYearldf;
  3243. strPathOfYearmdf.Format("%s\\数据\\%d.mdf", g_mainpath, year);
  3244. strPathOfYearldf.Format("%s\\数据\\%d_log.ldf", g_mainpath, year);
  3245. CString strPathOfnulldbmdf = g_mainpath + "\\数据\\dbnull.mdf";
  3246. CString strPathOfnulldbldf = g_mainpath + "\\数据\\dbnull_log.ldf";
  3247. if (PathFileExists(strPathOfYearmdf) == TRUE)
  3248. {
  3249. if (PathFileExists(strPathOfYearldf) == TRUE)
  3250. {
  3251. sql.Format("exec sp_attach_db '%d',@filename1='%s',@filename2='%s'", year, strPathOfYearmdf, strPathOfYearldf);
  3252. }
  3253. else
  3254. {
  3255. // 此时要删除dbnull_log.ldf文件;
  3256. // 因为如果2015没有对应的ldf文件,在逻辑名仍为dbnull没有改为2015时,他会使用dbnull_log.ldf做为2015数据库的日志文件;
  3257. // 这样造成其他数据库在使用dbnull时会产生错误;
  3258. DeleteFile(strPathOfnulldbldf);//删除dbnull_log.ldf文件;
  3259. sql.Format("exec sp_attach_db '%d',@filename1='%s'", year, strPathOfYearmdf);
  3260. }
  3261. g_db.SetQueryTimeout(600);
  3262. try
  3263. {
  3264. g_db.ExecuteSQL(sql);
  3265. }
  3266. catch (CDBException * e)
  3267. {
  3268. WriteLogin(e->m_strError);
  3269. WriteLogin("历史数据库初始化失败!");
  3270. e->Delete();
  3271. return;
  3272. }
  3273. }
  3274. else
  3275. {
  3276. // 判断dbnull.mdf文件是否存在;
  3277. if (PathFileExists(strPathOfnulldbmdf) == FALSE)
  3278. {
  3279. WriteLogin("空数据库丢失!");
  3280. return;
  3281. }
  3282. // 判断拷贝mdf文件是否失败;
  3283. if (FALSE == CopyFile(strPathOfnulldbmdf, strPathOfYearmdf, 1))
  3284. {
  3285. DWORD dwError = ::GetLastError();
  3286. CString strDescription;
  3287. strDescription.Format("dbnull.mdf拷贝为%d.mdf失败", year);
  3288. ErrorExit(strDescription, dwError);
  3289. return;
  3290. }
  3291. else
  3292. {
  3293. DeleteFile(strPathOfYearldf); // 删除%d_log.LDF文件;
  3294. if (PathFileExists(strPathOfnulldbldf) == TRUE)
  3295. {
  3296. if (FALSE == CopyFile(strPathOfnulldbldf, strPathOfYearldf, 1))
  3297. {
  3298. DWORD dwError = ::GetLastError();
  3299. CString strDescription;
  3300. strDescription.Format("null.mdf拷贝为%d.mdf", year);
  3301. ErrorExit(strDescription, dwError);
  3302. // 此时要删除dbnull_log.ldf文件;
  3303. // 因为如果2015没有对应的ldf文件,在逻辑名仍为dbnull没有改为2015时,他会使用dbnull_log.ldf做为2015数据库的日志文件;
  3304. // 这样造成其他数据库在使用dbnull时会产生错误;
  3305. DeleteFile(strPathOfnulldbldf);//删除dbnull_log.ldf文件;
  3306. sql.Format("exec sp_attach_db '%d',@filename1='%s'", year, strPathOfYearmdf);
  3307. }
  3308. else
  3309. {
  3310. sql.Format("exec sp_attach_db '%d',@filename1='%s',@filename2='%s'", year, strPathOfYearmdf, strPathOfYearldf);
  3311. }
  3312. }
  3313. else
  3314. {
  3315. // 此时要删除dbnull_log.ldf文件;
  3316. // 因为如果2015没有对应的ldf文件,在逻辑名仍为dbnull没有改为2015时,他会使用dbnull_log.ldf做为2015数据库的日志文件;
  3317. // 这样造成其他数据库在使用dbnull时会产生错误;
  3318. DeleteFile(strPathOfnulldbldf);//删除dbnull_log.ldf文件;
  3319. sql.Format("exec sp_attach_db '%d',@filename1='%s'", year, strPathOfYearmdf);
  3320. }
  3321. g_db.SetQueryTimeout(600);
  3322. try
  3323. {
  3324. g_db.ExecuteSQL(sql);
  3325. }
  3326. catch (CDBException * e)
  3327. {
  3328. WriteLogin(e->m_strError);
  3329. WriteLogin("历史数据库初始化失败!");
  3330. e->Delete();
  3331. return;
  3332. }
  3333. }
  3334. }
  3335. // 附加成功后,修改逻辑名称;
  3336. sql.Format("alter database [%d] modify file(name='dbnull',newname='%d')", year, year);
  3337. try
  3338. {
  3339. g_db.ExecuteSQL(sql);
  3340. }
  3341. catch (CDBException * e)
  3342. {
  3343. WriteLogin(e->m_strError);
  3344. WriteLogin("修改历史数据库主文件逻辑名失败,请手动修改!");
  3345. e->Delete();
  3346. }
  3347. sql.Format("alter database [%d] modify file(name='dbnull_log',newname='%d_log')", year, year);
  3348. try
  3349. {
  3350. g_db.ExecuteSQL(sql);
  3351. }
  3352. catch (CDBException * e)
  3353. {
  3354. WriteLogin(e->m_strError);
  3355. WriteLogin("修改历史数据库日志文件逻辑名失败,请手动修改!");
  3356. e->Delete();
  3357. }
  3358. OnExit2();
  3359. #else
  3360. CString path,sql;
  3361. path.Format ("%s\\数据\\%d.mdb", g_mainpath, year);
  3362. if(::PathFileExists (path)==0)
  3363. {
  3364. CString nulldb=g_mainpath+"\\数据\\dbnull.mdb";
  3365. ::CopyFile (nulldb, path, 1);
  3366. CDatabase *db=new CDatabase;
  3367. CString strCon;
  3368. strCon.Format("DRIVER=Microsoft Access Driver (*.mdb);DSN='';DBQ=%s;PWD=lijialyfz",path);
  3369. if(db->OpenEx(strCon,CDatabase::noOdbcDialog))
  3370. {
  3371. g_nYearArray.Add (year);
  3372. g_dbHistoryArray.Add (db);
  3373. sql.Format ("insert into historydb([year])values('%d')", year);
  3374. MyExecuteSQL(&g_db, sql);
  3375. }
  3376. else
  3377. delete db;
  3378. }
  3379. #endif
  3380. }
  3381. catch (...)
  3382. {
  3383. WriteLogin("出错在函数CheckYear中");
  3384. }
  3385. }
  3386. #else
  3387. void CDBServerDlg::CheckYear(int year)
  3388. {
  3389. try
  3390. {
  3391. #ifdef SQLSERVER_VERSION
  3392. CString strPathOfYearmdf;
  3393. CString strPathOfYearldf;
  3394. CString sql;
  3395. strPathOfYearmdf.Format("%s\\数据\\%d.mdf", g_mainpath, year);
  3396. strPathOfYearldf.Format("%s\\数据\\%d_log.LDF", g_mainpath, year);
  3397. ::DeleteFile(strPathOfYearldf); // 删除%d_log.LDF文件;
  3398. {
  3399. CString strPathOfnulldbmdf = g_mainpath + "\\数据\\dbnull.mdf";
  3400. CString strPathOfnulldbldf = g_mainpath + "\\数据\\dbnull_log.LDF";
  3401. ::DeleteFile(strPathOfnulldbldf); // 删除%d_log.LDF文件;
  3402. // 1.判断null.mdf文件是否存在;
  3403. if (::PathFileExists(strPathOfnulldbmdf) == 0)
  3404. {
  3405. WriteLogin("空数据库丢失!");
  3406. return;
  3407. }
  3408. // 2.若年份mdf文件不存在,用null.mdf复制一份年份mdf数据库文件;
  3409. BOOL bCopyed=0;
  3410. if (::PathFileExists(strPathOfYearmdf) == 0)
  3411. {
  3412. #if 0
  3413. ::CopyFile(nulldb, path, 1);
  3414. bCopyed=1;
  3415. #else // Jeff add:判断拷贝文件失败的原因;
  3416. if (!::CopyFile(strPathOfnulldbmdf, strPathOfYearmdf, 1))
  3417. {
  3418. DWORD dwError = ::GetLastError();
  3419. CString strDescription;
  3420. strDescription.Format("null.mdf拷贝为%d.mdf",year);
  3421. ErrorExit(strDescription,dwError);
  3422. // return;//直接返回;
  3423. }
  3424. else
  3425. {
  3426. bCopyed=1;
  3427. }
  3428. #endif
  3429. }
  3430. if (::PathFileExists(strPathOfYearmdf) == 0)
  3431. {
  3432. WriteLogin("拷贝数据库文件失败!");
  3433. return;
  3434. }
  3435. BOOL bLog=0;
  3436. if (::PathFileExists(strPathOfnulldbldf))
  3437. {
  3438. bLog=1;
  3439. }
  3440. // .将年份数据库mdf附加到数据库里;
  3441. CString sql;
  3442. if(bCopyed)
  3443. {
  3444. if(bLog)
  3445. sql.Format("exec sp_attach_db '%s',@filename1='%s',@filename2='%s'", "dbnull", strPathOfYearmdf, strPathOfYearldf);
  3446. else
  3447. sql.Format("exec sp_attach_db '%s',@filename1='%s'", "dbnull", strPathOfYearmdf);
  3448. g_db.SetQueryTimeout(600);
  3449. try
  3450. {
  3451. g_db.ExecuteSQL (sql);
  3452. }
  3453. catch(CDBException * e)
  3454. {
  3455. WriteLogin(e->m_strError);
  3456. WriteLogin("历史数据库初始化失败!");
  3457. e->Delete();
  3458. }
  3459. sql.Format("exec sp_renamedb '%s','%d'", "dbnull", year);g_db.ExecuteSQL (sql);
  3460. }
  3461. else // 没有执行CopyFile,年份mdf原本就存在;
  3462. {
  3463. if(bLog)
  3464. sql.Format("exec sp_attach_db '%d',@filename1='%s',@filename2='%s'", year, strPathOfYearmdf, strPathOfYearldf);
  3465. else
  3466. sql.Format("exec sp_attach_db '%d',@filename1='%s'", year, strPathOfYearmdf);
  3467. g_db.SetQueryTimeout(600);
  3468. try
  3469. {
  3470. g_db.ExecuteSQL (sql);
  3471. }
  3472. catch(CDBException * e)
  3473. {
  3474. WriteLogin(e->m_strError);
  3475. WriteLogin("历史数据库初始化失败!");
  3476. e->Delete();
  3477. }
  3478. }
  3479. OnExit2();
  3480. /* g_db.SetQueryTimeout(100);
  3481. CDatabase *db=new CDatabase;
  3482. try
  3483. {
  3484. CString strCon;
  3485. strCon.Format(_T("driver={SQL Server};Server=%s;DATABASE=%d;%s"), g_sservrename,year,g_sdbpsw);
  3486. db->OpenEx(strCon,CDatabase::noOdbcDialog);
  3487. g_nYearArray.Add (year);
  3488. dbarray.Add (db);
  3489. sql.Format ("insert into [historydb]([year])values('%d')", year);
  3490. MyExecuteSQL(&g_db, sql);
  3491. }
  3492. catch(CDBException * e)
  3493. {
  3494. delete db;
  3495. WriteLogin(e->m_strError);
  3496. WriteLogin("历史数据库打开失败!");
  3497. }*/
  3498. }
  3499. #else
  3500. CString path,sql;
  3501. path.Format ("%s\\数据\\%d.mdb", g_mainpath, year);
  3502. if(::PathFileExists (path)==0)
  3503. {
  3504. CString nulldb=g_mainpath+"\\数据\\dbnull.mdb";
  3505. ::CopyFile (nulldb, path, 1);
  3506. CDatabase *db=new CDatabase;
  3507. CString strCon;
  3508. strCon.Format("DRIVER=Microsoft Access Driver (*.mdb);DSN='';DBQ=%s;PWD=lijialyfz",path);
  3509. if(db->OpenEx(strCon,CDatabase::noOdbcDialog))
  3510. {
  3511. g_nYearArray.Add (year);
  3512. g_dbHistoryArray.Add (db);
  3513. sql.Format ("insert into historydb([year])values('%d')", year);
  3514. MyExecuteSQL(&g_db, sql);
  3515. }
  3516. else
  3517. delete db;
  3518. }
  3519. #endif
  3520. }
  3521. catch(...)
  3522. {
  3523. WriteLogin("出错在函数CheckYear中");
  3524. }
  3525. }
  3526. #endif
  3527. CDatabase* CDBServerDlg::GetDB(int year)
  3528. {
  3529. try
  3530. {
  3531. for(int i=0; i<g_nYearArray.GetSize (); i++)
  3532. {
  3533. if(g_nYearArray.ElementAt (i)==year)
  3534. {
  3535. return g_dbHistoryArray.ElementAt (i);
  3536. }
  3537. }
  3538. return NULL;
  3539. }
  3540. catch(...)
  3541. {
  3542. WriteLogin("出错在函数GetDB中");
  3543. }
  3544. }
  3545. /************************************************************************/
  3546. /* mark by Jeff;
  3547. /* 函数:CheckDinDanExist
  3548. /* 描述:
  3549. /* 参数:
  3550. /* pBeConverted_db:(源)
  3551. /* pToConverted_db:(目标)
  3552. /* strOderNumber:
  3553. /* pRetArray:
  3554. /*
  3555. /* 返回:1表示正常,100及以上表示源数据库里记录 > 目标数据库记录;
  3556. /*
  3557. /************************************************************************/
  3558. BOOL CDBServerDlg::CheckDinDanExist(CDatabase *pBeConverted_db, CDatabase *pToConverted_db, CString strOderNumber, CStringArray *pRetArray)
  3559. {
  3560. try
  3561. {
  3562. pRetArray->RemoveAll();
  3563. int count1=0;
  3564. int count2=0;
  3565. CString sql;
  3566. {
  3567. CRecordset myset(pBeConverted_db);
  3568. sql="select count(*) as cot from dindan where id='"+strOderNumber+"'";
  3569. myset.Open(CRecordset::forwardOnly, sql);
  3570. myset.GetFieldValue("cot", sql);
  3571. myset.Close();
  3572. count1=atoi(sql);
  3573. }
  3574. {
  3575. CRecordset myset(pToConverted_db);
  3576. sql="select count(*) as cot from dindan where id='"+strOderNumber+"'";
  3577. myset.Open(CRecordset::forwardOnly, sql);
  3578. myset.GetFieldValue("cot", sql);
  3579. myset.Close();
  3580. count2=atoi(sql);
  3581. }
  3582. if(count1>count2)//100
  3583. pRetArray->Add ("0");
  3584. else
  3585. pRetArray->Add ("1");
  3586. {
  3587. CRecordset myset(pBeConverted_db);
  3588. sql="select count(*) as cot from dindansp where id='"+strOderNumber+"'";
  3589. myset.Open (CRecordset::forwardOnly, sql);
  3590. myset.GetFieldValue ("cot", sql);
  3591. myset.Close();
  3592. count1=atoi(sql);
  3593. }
  3594. {
  3595. CRecordset myset(pToConverted_db);
  3596. sql="select count(*) as cot from dindansp where id='"+strOderNumber+"'";
  3597. myset.Open(CRecordset::forwardOnly, sql);
  3598. myset.GetFieldValue ("cot", sql);
  3599. myset.Close();
  3600. count2=atoi(sql);
  3601. }
  3602. if(count1>count2)//101
  3603. pRetArray->Add ("0");
  3604. else
  3605. pRetArray->Add ("1");
  3606. {
  3607. CRecordset myset(pBeConverted_db);
  3608. sql="select count(*) as cot from dindanbukuan where id='"+strOderNumber+"'";
  3609. myset.Open (CRecordset::forwardOnly, sql);
  3610. myset.GetFieldValue ("cot", sql);
  3611. myset.Close();
  3612. count1=atoi(sql);
  3613. }
  3614. {
  3615. CRecordset myset(pToConverted_db);
  3616. sql="select count(*) as cot from dindanbukuan where id='"+strOderNumber+"'";
  3617. myset.Open (CRecordset::forwardOnly, sql);
  3618. myset.GetFieldValue ("cot", sql);
  3619. myset.Close();
  3620. count2=atoi(sql);
  3621. }
  3622. if(count1>count2)//102
  3623. pRetArray->Add ("0");
  3624. else
  3625. pRetArray->Add ("1");
  3626. {
  3627. CRecordset myset(pBeConverted_db);
  3628. sql="select count(*) as cot from dindanbukuan2 where id='"+strOderNumber+"'";
  3629. myset.Open (CRecordset::forwardOnly, sql);
  3630. myset.GetFieldValue ("cot", sql);
  3631. myset.Close();
  3632. count1=atoi(sql);
  3633. }
  3634. {
  3635. CRecordset myset(pToConverted_db);
  3636. sql="select count(*) as cot from dindanbukuan2 where id='"+strOderNumber+"'";
  3637. myset.Open (CRecordset::forwardOnly, sql);
  3638. myset.GetFieldValue ("cot", sql);
  3639. myset.Close();
  3640. count2=atoi(sql);
  3641. }
  3642. if(count1>count2)//103
  3643. pRetArray->Add ("0");
  3644. else
  3645. pRetArray->Add ("1");
  3646. {
  3647. CRecordset myset(pBeConverted_db);
  3648. sql="select count(*) as cot from photoprint where id='"+strOderNumber+"'";
  3649. myset.Open (CRecordset::forwardOnly, sql);
  3650. myset.GetFieldValue ("cot", sql);
  3651. myset.Close();
  3652. count1=atoi(sql);
  3653. }
  3654. {
  3655. CRecordset myset(pToConverted_db);
  3656. sql="select count(*) as cot from photoprint where id='"+strOderNumber+"'";
  3657. myset.Open (CRecordset::forwardOnly, sql);
  3658. myset.GetFieldValue ("cot", sql);
  3659. myset.Close();
  3660. count2=atoi(sql);
  3661. }
  3662. if(count1>count2)//104
  3663. pRetArray->Add ("0");
  3664. else
  3665. pRetArray->Add ("1");
  3666. {
  3667. CRecordset myset(pBeConverted_db);
  3668. sql="select count(*) as cot from client where id='"+strOderNumber+"'";
  3669. myset.Open (CRecordset::forwardOnly, sql);
  3670. myset.GetFieldValue ("cot", sql);
  3671. myset.Close();
  3672. count1=atoi(sql);
  3673. }
  3674. {
  3675. CRecordset myset(pToConverted_db);
  3676. sql="select count(*) as cot from client where id='"+strOderNumber+"'";
  3677. myset.Open (CRecordset::forwardOnly, sql);
  3678. myset.GetFieldValue ("cot", sql);
  3679. myset.Close();
  3680. count2=atoi(sql);
  3681. }
  3682. if(count1>count2)//105
  3683. pRetArray->Add ("0");
  3684. else
  3685. pRetArray->Add ("1");
  3686. {
  3687. CRecordset myset(pBeConverted_db);
  3688. sql="select count(*) as cot from burncdreg where id='"+strOderNumber+"'";
  3689. myset.Open (CRecordset::forwardOnly, sql);
  3690. myset.GetFieldValue ("cot", sql);
  3691. myset.Close();
  3692. count1=atoi(sql);
  3693. }
  3694. {
  3695. CRecordset myset(pToConverted_db);
  3696. sql="select count(*) as cot from burncdreg where id='"+strOderNumber+"'";
  3697. myset.Open (CRecordset::forwardOnly, sql);
  3698. myset.GetFieldValue ("cot", sql);
  3699. myset.Close();
  3700. count2=atoi(sql);
  3701. }
  3702. if(count1>count2)//7
  3703. pRetArray->Add ("0");
  3704. else
  3705. pRetArray->Add ("1");
  3706. {
  3707. CRecordset myset(pBeConverted_db);
  3708. sql="select count(*) as cot from digitalwork where id='"+strOderNumber+"'";
  3709. myset.Open (CRecordset::forwardOnly, sql);
  3710. myset.GetFieldValue("cot", sql);
  3711. myset.Close();
  3712. count1=atoi(sql);
  3713. }
  3714. {
  3715. CRecordset myset(pToConverted_db);
  3716. sql="select count(*) as cot from digitalwork where id='"+strOderNumber+"'";
  3717. myset.Open (CRecordset::forwardOnly, sql);
  3718. myset.GetFieldValue ("cot", sql);
  3719. myset.Close();
  3720. count2=atoi(sql);
  3721. }
  3722. if(count1>count2)//8
  3723. pRetArray->Add ("0");
  3724. else
  3725. pRetArray->Add ("1");
  3726. {
  3727. CRecordset myset(pBeConverted_db);
  3728. sql="select count(*) as cot from mywork where id='"+strOderNumber+"'";
  3729. myset.Open (CRecordset::forwardOnly, sql);
  3730. myset.GetFieldValue ("cot", sql);
  3731. myset.Close();
  3732. count1=atoi(sql);
  3733. }
  3734. {
  3735. CRecordset myset(pToConverted_db);
  3736. sql="select count(*) as cot from mywork where id='"+strOderNumber+"'";
  3737. myset.Open (CRecordset::forwardOnly, sql);
  3738. myset.GetFieldValue ("cot", sql);
  3739. myset.Close();
  3740. count2=atoi(sql);
  3741. }
  3742. if(count1>count2)//9
  3743. pRetArray->Add ("0");
  3744. else
  3745. pRetArray->Add ("1");
  3746. {
  3747. CRecordset myset(pBeConverted_db);
  3748. sql="select count(*) as cot from dindanjd where id='"+strOderNumber+"'";
  3749. myset.Open (CRecordset::forwardOnly, sql);
  3750. myset.GetFieldValue ("cot", sql);
  3751. myset.Close();
  3752. count1=atoi(sql);
  3753. }
  3754. {
  3755. CRecordset myset(pToConverted_db);
  3756. sql="select count(*) as cot from dindanjd where id='"+strOderNumber+"'";
  3757. myset.Open (CRecordset::forwardOnly, sql);
  3758. myset.GetFieldValue ("cot", sql);
  3759. myset.Close();
  3760. count2=atoi(sql);
  3761. }
  3762. if( count1>count2)//10
  3763. pRetArray->Add ("0");
  3764. else
  3765. pRetArray->Add ("1");
  3766. {
  3767. CRecordset myset(pBeConverted_db);
  3768. sql="select count(*) as cot from dindansp2 where id='"+strOderNumber+"'";
  3769. myset.Open (CRecordset::forwardOnly, sql);
  3770. myset.GetFieldValue ("cot", sql);
  3771. myset.Close();
  3772. count1=atoi(sql);
  3773. }
  3774. {
  3775. CRecordset myset(pToConverted_db);
  3776. sql="select count(*) as cot from dindansp2 where id='"+strOderNumber+"'";
  3777. myset.Open (CRecordset::forwardOnly, sql);
  3778. myset.GetFieldValue ("cot", sql);
  3779. myset.Close();
  3780. count2=atoi(sql);
  3781. }
  3782. if(count1>count2)
  3783. pRetArray->Add ("0");
  3784. else
  3785. pRetArray->Add ("1");
  3786. {
  3787. CRecordset myset(pBeConverted_db);
  3788. sql="select count(*) as cot from dindansp3 where id='"+strOderNumber+"'";
  3789. myset.Open (CRecordset::forwardOnly, sql);
  3790. myset.GetFieldValue ("cot", sql);
  3791. myset.Close();
  3792. count1=atoi(sql);
  3793. }
  3794. {
  3795. CRecordset myset(pToConverted_db);
  3796. sql="select count(*) as cot from dindansp3 where id='"+strOderNumber+"'";
  3797. myset.Open (CRecordset::forwardOnly, sql);
  3798. myset.GetFieldValue ("cot", sql);
  3799. myset.Close();
  3800. count2=atoi(sql);
  3801. }
  3802. if(count1>count2)
  3803. pRetArray->Add ("0");
  3804. else
  3805. pRetArray->Add ("1");
  3806. for(int i=0; i<pRetArray->GetSize (); i++)
  3807. {
  3808. if(pRetArray->ElementAt (i)=="0")return 100+i;
  3809. }
  3810. return 1;
  3811. }
  3812. catch(CDBException * e)
  3813. {
  3814. WriteLogin(e->m_strError);
  3815. WriteLogin("出错在函数check1中");
  3816. e->Delete();
  3817. }
  3818. return 100;
  3819. }
  3820. BOOL CDBServerDlg::CheckPayOutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  3821. {
  3822. try
  3823. {
  3824. int count1=0;
  3825. int count2=0;
  3826. CString sql;
  3827. {
  3828. CRecordset myset(pdb1);
  3829. sql.Format("select count(*) as cot from gudingfeiyong where [id]=%d", atol(id));
  3830. myset.Open (CRecordset::forwardOnly, sql);
  3831. myset.GetFieldValue ("cot", sql);
  3832. myset.Close();
  3833. count1=atoi(sql);
  3834. }
  3835. {
  3836. CRecordset myset(pdb2);
  3837. sql="select count(*) as cot from gudingfeiyong where [id]='"+id+"'";
  3838. myset.Open (CRecordset::forwardOnly, sql);
  3839. myset.GetFieldValue ("cot", sql);
  3840. myset.Close();
  3841. count2=atoi(sql);
  3842. }
  3843. if(count1>count2)return 0;
  3844. return 1;
  3845. }
  3846. catch(...)
  3847. {
  3848. WriteLogin("出错在函数check2中");
  3849. }
  3850. return 0;
  3851. }
  3852. BOOL CDBServerDlg::CheckIncomeExist(CDatabase *pdb1, CDatabase *pdb2, CString id, CStringArray *pretarray)
  3853. {
  3854. try
  3855. {
  3856. pretarray->RemoveAll();
  3857. int count1=0;
  3858. int count2=0;
  3859. CString sql;
  3860. {
  3861. CRecordset myset(pdb1);
  3862. sql.Format("select count(*) as cot from singleincome where [id]=%d", atol(id));
  3863. myset.Open (CRecordset::forwardOnly, sql);
  3864. myset.GetFieldValue ("cot", sql);
  3865. myset.Close();
  3866. count1=atoi(sql);
  3867. }
  3868. {
  3869. CRecordset myset(pdb2);
  3870. sql="select count(*) as cot from singleincome where [id]='"+id+"'";
  3871. myset.Open (CRecordset::forwardOnly, sql);
  3872. myset.GetFieldValue ("cot", sql);
  3873. myset.Close();
  3874. count2=atoi(sql);
  3875. }
  3876. if(count1>count2)
  3877. pretarray->Add ("0");
  3878. else
  3879. pretarray->Add ("1");
  3880. {
  3881. CRecordset myset(pdb1);
  3882. sql.Format("select count(*) as cot from singleincomemoney where [id]='%s'", id);
  3883. myset.Open (CRecordset::forwardOnly, sql);
  3884. myset.GetFieldValue ("cot", sql);
  3885. myset.Close();
  3886. count1=atoi(sql);
  3887. }
  3888. {
  3889. CRecordset myset(pdb2);
  3890. sql.Format("select count(*) as cot from singleincomemoney where [id]='%s'", id);
  3891. myset.Open (CRecordset::forwardOnly, sql);
  3892. myset.GetFieldValue ("cot", sql);
  3893. myset.Close();
  3894. count2=atoi(sql);
  3895. }
  3896. if(count1>count2)
  3897. pretarray->Add ("0");
  3898. else
  3899. pretarray->Add ("1");
  3900. for(int i=0; i<pretarray->GetSize (); i++)
  3901. {
  3902. if(pretarray->ElementAt (i)=="0")return 0;
  3903. }
  3904. return 1;
  3905. }
  3906. catch(...)
  3907. {
  3908. WriteLogin("出错在函数check3中");
  3909. }
  3910. return 0;
  3911. }
  3912. BOOL CDBServerDlg::CheckIncomeMoneyExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  3913. {
  3914. try
  3915. {
  3916. int count1=0;
  3917. int count2=0;
  3918. CString sql;
  3919. {
  3920. CRecordset myset(pdb1);
  3921. sql.Format("select count(*) as cot from singleincomemoney where [id]='%s'", id);
  3922. myset.Open (CRecordset::forwardOnly, sql);
  3923. myset.GetFieldValue ("cot", sql);
  3924. myset.Close();
  3925. count1=atoi(sql);
  3926. }
  3927. {
  3928. CRecordset myset(pdb2);
  3929. sql.Format("select count(*) as cot from singleincomemoney where [id]='%s'", id);
  3930. myset.Open (CRecordset::forwardOnly, sql);
  3931. myset.GetFieldValue ("cot", sql);
  3932. myset.Close();
  3933. count2=atoi(sql);
  3934. }
  3935. if(count1>count2)return 0;
  3936. return 1;
  3937. }
  3938. catch(...)
  3939. {
  3940. WriteLogin("出错在函数check3中");
  3941. }
  3942. return 0;
  3943. }
  3944. /************************************************************************/
  3945. /* mark by Jeff
  3946. /* 函数:TransDinDan
  3947. /* 描述:
  3948. /* 参数:
  3949. /* pBeConverted_db:被转换的数据库(源);
  3950. /* pToConverted_db:要转到的数据库(目标);
  3951. /* strOrderNumber: 订单号;
  3952. /* nYear: 要转换的年份;
  3953. /*
  3954. /* 返回:
  3955. /************************************************************************/
  3956. int CDBServerDlg::TransDinDan(CDatabase *pBeConverted_db, CDatabase *pToConverted_db, CString strOrderNumber, int nYear)
  3957. {
  3958. int step=0;
  3959. CStringArray retarray;
  3960. try
  3961. {
  3962. CString sql,str;
  3963. // CheckDinDanExist返回:1表示正常, 100及以上表示源数据库里记录 > 目标数据库记录;
  3964. if(CheckDinDanExist(pBeConverted_db, pToConverted_db, strOrderNumber, &retarray)==1)
  3965. return 1;
  3966. step=1;
  3967. int i;
  3968. CString temp;
  3969. int colcount;
  3970. CODBCFieldInfo fieldinfo;
  3971. int ret=1;
  3972. // 以下全是insert into 到目录数据库中;
  3973. CRecordset myset(pBeConverted_db);
  3974. try
  3975. {
  3976. if(retarray.ElementAt (0)=="0")
  3977. {
  3978. sql.Format("insert into [%d].[dbo].[dindan] select * from [%s].[dbo].[dindan] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3979. MyExecuteSQL(pBeConverted_db, sql);
  3980. }
  3981. }
  3982. catch(CDBException * e)
  3983. {
  3984. WriteLogin("step2"+e->m_strError);
  3985. e->Delete();
  3986. ret=2;
  3987. }
  3988. step=2;
  3989. try
  3990. {
  3991. if(retarray.ElementAt (1)=="0")
  3992. {
  3993. sql.Format("insert into [%d].[dbo].[dindansp] select * from [%s].[dbo].[dindansp] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  3994. MyExecuteSQL(pBeConverted_db, sql);
  3995. }
  3996. }
  3997. catch(CDBException * e)
  3998. {
  3999. WriteLogin("step3"+e->m_strError);
  4000. e->Delete();
  4001. ret=3;
  4002. }
  4003. step=3;
  4004. try
  4005. {
  4006. if(retarray.ElementAt (2)=="0")
  4007. {
  4008. 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);
  4009. MyExecuteSQL(pBeConverted_db, sql);
  4010. }
  4011. }
  4012. catch(CDBException * e)
  4013. {
  4014. WriteLogin("step4"+e->m_strError);
  4015. e->Delete();
  4016. ret=4;
  4017. }
  4018. step=4;
  4019. try
  4020. {
  4021. if(retarray.ElementAt (3)=="0")
  4022. {
  4023. 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);
  4024. MyExecuteSQL(pBeConverted_db, sql);
  4025. }
  4026. }
  4027. catch(CDBException * e)
  4028. {
  4029. WriteLogin("step5"+e->m_strError);
  4030. e->Delete();
  4031. ret=5;
  4032. }
  4033. step=5;
  4034. try
  4035. {
  4036. if(retarray.ElementAt (4)=="0")
  4037. {
  4038. sql.Format("insert into [%d].[dbo].[photoprint] select * from [%s].[dbo].[photoprint] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  4039. MyExecuteSQL(pBeConverted_db, sql);
  4040. }
  4041. }
  4042. catch(CDBException * e)
  4043. {
  4044. WriteLogin("step6"+e->m_strError);
  4045. e->Delete();
  4046. ret=6;
  4047. }
  4048. step=6;
  4049. try
  4050. {
  4051. if(retarray.ElementAt (5)=="0")
  4052. {
  4053. sql.Format("insert into [%d].[dbo].[client] select * from [%s].[dbo].[client] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  4054. MyExecuteSQL(pBeConverted_db, sql);
  4055. }
  4056. }
  4057. catch(CDBException * e)
  4058. {
  4059. WriteLogin("step7"+e->m_strError);
  4060. e->Delete();
  4061. ret=7;
  4062. }
  4063. step=7;
  4064. try
  4065. {
  4066. if(retarray.ElementAt (6)=="0")
  4067. {
  4068. sql.Format("insert into [%d].[dbo].[burncdreg] select * from [%s].[dbo].[burncdreg] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  4069. MyExecuteSQL(pBeConverted_db, sql);
  4070. }
  4071. }
  4072. catch(CDBException * e)
  4073. {
  4074. WriteLogin("step8"+e->m_strError);
  4075. e->Delete();
  4076. ret=8;
  4077. }
  4078. step=8;
  4079. try
  4080. {
  4081. if(retarray.ElementAt (7)=="0")
  4082. {
  4083. sql.Format("insert into [%d].[dbo].[digitalwork] select * from [%s].[dbo].[digitalwork] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  4084. MyExecuteSQL(pBeConverted_db, sql);
  4085. }
  4086. }
  4087. catch(CDBException * e)
  4088. {
  4089. WriteLogin("step9"+e->m_strError);
  4090. e->Delete();
  4091. ret=9;
  4092. }
  4093. step=9;
  4094. try
  4095. {
  4096. if(retarray.ElementAt (8)=="0")
  4097. {
  4098. sql.Format("insert into [%d].[dbo].[mywork] select * from [%s].[dbo].[mywork] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  4099. MyExecuteSQL(pBeConverted_db, sql);
  4100. }
  4101. }
  4102. catch(CDBException * e)
  4103. {
  4104. WriteLogin("step10"+e->m_strError);
  4105. e->Delete();
  4106. ret=10;
  4107. }
  4108. step=10;
  4109. try
  4110. {
  4111. if(retarray.ElementAt (9)=="0")
  4112. {
  4113. sql.Format("insert into [%d].[dbo].[dindanjd] select * from [%s].[dbo].[dindanjd] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  4114. MyExecuteSQL(pBeConverted_db, sql);
  4115. }
  4116. }
  4117. catch(CDBException * e)
  4118. {
  4119. WriteLogin("step11"+e->m_strError);
  4120. e->Delete();
  4121. ret=11;
  4122. }
  4123. step=11;
  4124. try
  4125. {
  4126. if(retarray.ElementAt (10)=="0")
  4127. {
  4128. sql.Format("insert into [%d].[dbo].[dindansp2] select * from [%s].[dbo].[dindansp2] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  4129. MyExecuteSQL(pBeConverted_db, sql);
  4130. }
  4131. }
  4132. catch(CDBException * e)
  4133. {
  4134. WriteLogin("step12"+e->m_strError);
  4135. e->Delete();
  4136. ret=12;
  4137. }
  4138. step=12;
  4139. try
  4140. {
  4141. if(retarray.ElementAt (11)=="0")
  4142. {
  4143. sql.Format("insert into [%d].[dbo].[dindansp3] select * from [%s].[dbo].[dindansp3] where id='%s'", nYear, g_nCurConvertDBName, strOrderNumber);
  4144. MyExecuteSQL(pBeConverted_db, sql);
  4145. }
  4146. }
  4147. catch(CDBException * e)
  4148. {
  4149. WriteLogin("step13"+e->m_strError);
  4150. e->Delete();
  4151. ret=13;
  4152. }
  4153. if(ret!=1)return 200+ret;
  4154. // 插入到目标数据库后再到目标数据库里查询是否存在;
  4155. return CheckDinDanExist(pBeConverted_db, pToConverted_db, strOrderNumber, &retarray);
  4156. }
  4157. catch(...)
  4158. {
  4159. CString str;
  4160. str.Format("%d size:%d", step, retarray.GetSize());
  4161. WriteLogin("出错在函数trans1中-"+str);
  4162. }
  4163. return 0;
  4164. }
  4165. BOOL CDBServerDlg::TransPayOut(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4166. {
  4167. try
  4168. {
  4169. CString sql;
  4170. if(CheckPayOutExist(pdb1, pdb2, id))return 1;
  4171. int i;CString temp;
  4172. int colcount;
  4173. CODBCFieldInfo fieldinfo;
  4174. BOOL ret=1;
  4175. CRecordset myset(pdb1);
  4176. try
  4177. {
  4178. sql.Format("insert into [%d].[dbo].[gudingfeiyong] select * from [%s].[dbo].[gudingfeiyong] where id=%d", year, g_nCurConvertDBName, atol(id));
  4179. MyExecuteSQL(pdb1, sql);
  4180. }
  4181. catch(CDBException * e)
  4182. {
  4183. WriteLogin(e->m_strError);
  4184. e->Delete();
  4185. ret=0;
  4186. }
  4187. if(ret==0)return 0;
  4188. return CheckPayOutExist(pdb1, pdb2, id);
  4189. }
  4190. catch(...)
  4191. {
  4192. WriteLogin("出错在函数trans2中");
  4193. }
  4194. return 0;
  4195. }
  4196. //singleincome
  4197. BOOL CDBServerDlg::TransIncome(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4198. {
  4199. try
  4200. {
  4201. CString sql;
  4202. CStringArray retarray;
  4203. if(CheckIncomeExist(pdb1, pdb2, id, &retarray))return 1;
  4204. int i;CString temp;
  4205. int colcount;
  4206. CODBCFieldInfo fieldinfo;
  4207. BOOL ret=1;
  4208. CRecordset myset(pdb1);
  4209. try
  4210. {
  4211. if(retarray.ElementAt (0)=="0")
  4212. {
  4213. sql.Format("insert into [%d].[dbo].[singleincome] select * from [%s].[dbo].[singleincome] where id=%d", year, g_nCurConvertDBName, atol(id));
  4214. MyExecuteSQL(pdb1, sql);
  4215. }
  4216. }
  4217. catch(...)
  4218. {
  4219. ret=0;
  4220. }
  4221. try
  4222. {
  4223. if(retarray.ElementAt (1)=="0")
  4224. {
  4225. sql.Format("insert into [%d].[dbo].[singleincomemoney] select * from [%s].[dbo].[singleincomemoney] where id='%s'", year, g_nCurConvertDBName, id);
  4226. MyExecuteSQL(pdb1, sql);
  4227. }
  4228. }
  4229. catch(CDBException * e)
  4230. {
  4231. WriteLogin(e->m_strError);
  4232. e->Delete();
  4233. ret=0;
  4234. }
  4235. if(ret==0)return 0;
  4236. return CheckIncomeExist(pdb1, pdb2, id, &retarray);
  4237. }
  4238. catch(...)
  4239. {
  4240. WriteLogin("出错在函数trans3中");
  4241. }
  4242. return 0;
  4243. }
  4244. BOOL CDBServerDlg::TransIncomeMoney(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4245. {
  4246. try
  4247. {
  4248. CString sql;
  4249. if(CheckIncomeMoneyExist(pdb1, pdb2, id))return 1;
  4250. int i;CString temp;
  4251. int colcount;
  4252. CODBCFieldInfo fieldinfo;
  4253. BOOL ret=1;
  4254. CRecordset myset(pdb1);
  4255. try
  4256. {
  4257. sql.Format("insert into [%d].[dbo].[singleincomemoney] select * from [%s].[dbo].[singleincomemoney] where id='%s'", year, g_nCurConvertDBName, id);
  4258. MyExecuteSQL(pdb1, sql);
  4259. }
  4260. catch(CDBException * e)
  4261. {
  4262. WriteLogin(e->m_strError);
  4263. e->Delete();
  4264. ret=0;
  4265. }
  4266. if(ret==0)return 0;
  4267. return CheckIncomeMoneyExist(pdb1, pdb2, id);
  4268. }
  4269. catch(...)
  4270. {
  4271. WriteLogin("出错在函数trans3中");
  4272. }
  4273. return 0;
  4274. }
  4275. BOOL CDBServerDlg::Checkclient2phonerecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4276. {
  4277. try
  4278. {
  4279. int count1=0;
  4280. int count2=0;
  4281. CString sql;
  4282. {
  4283. CRecordset myset(pdb1);
  4284. sql="select count(*) as cot from client2phonerecord where [datetime]='"+id+"'";
  4285. myset.Open (CRecordset::forwardOnly, sql);
  4286. myset.GetFieldValue ("cot", sql);
  4287. myset.Close();
  4288. count1=atoi(sql);
  4289. }
  4290. {
  4291. CRecordset myset(pdb2);
  4292. sql="select count(*) as cot from client2phonerecord where [datetime]='"+id+"'";
  4293. myset.Open (CRecordset::forwardOnly, sql);
  4294. myset.GetFieldValue ("cot", sql);
  4295. myset.Close();
  4296. count2=atoi(sql);
  4297. }
  4298. if(count1>count2)return 0;
  4299. return 1;
  4300. }
  4301. catch(...)
  4302. {
  4303. WriteLogin("出错在函数check3中");
  4304. }
  4305. return 0;
  4306. }
  4307. BOOL CDBServerDlg::Transclient2phonerecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4308. {
  4309. try
  4310. {
  4311. CString sql;
  4312. if(Checkclient2phonerecordExist(pdb1, pdb2, id))return 1;
  4313. int i;CString temp;
  4314. int colcount;
  4315. CODBCFieldInfo fieldinfo;
  4316. BOOL ret=1;
  4317. CRecordset myset(pdb1);
  4318. try
  4319. {
  4320. sql.Format("insert into [%d].[dbo].[client2phonerecord] select * from [%s].[dbo].[client2phonerecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4321. MyExecuteSQL(pdb1, sql);
  4322. }
  4323. catch(...)
  4324. {
  4325. ret=0;
  4326. }
  4327. if(ret==0)return 0;
  4328. return Checkclient2phonerecordExist(pdb1, pdb2, id);
  4329. }
  4330. catch(...)
  4331. {
  4332. WriteLogin("出错在函数trans3中");
  4333. }
  4334. return 0;
  4335. }
  4336. BOOL CDBServerDlg::Checkclient3phonerecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4337. {
  4338. try
  4339. {
  4340. int count1=0;
  4341. int count2=0;
  4342. CString sql;
  4343. {
  4344. CRecordset myset(pdb1);
  4345. sql="select count(*) as cot from client3phonerecord where [datetime]='"+id+"'";
  4346. myset.Open (CRecordset::forwardOnly, sql);
  4347. myset.GetFieldValue ("cot", sql);
  4348. myset.Close();
  4349. count1=atoi(sql);
  4350. }
  4351. {
  4352. CRecordset myset(pdb2);
  4353. sql="select count(*) as cot from client3phonerecord where [datetime]='"+id+"'";
  4354. myset.Open (CRecordset::forwardOnly, sql);
  4355. myset.GetFieldValue ("cot", sql);
  4356. myset.Close();
  4357. count2=atoi(sql);
  4358. }
  4359. if(count1>count2)return 0;
  4360. return 1;
  4361. }
  4362. catch(...)
  4363. {
  4364. WriteLogin("出错在函数check3中");
  4365. }
  4366. return 0;
  4367. }
  4368. BOOL CDBServerDlg::Transclient3phonerecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4369. {
  4370. try
  4371. {
  4372. CString sql;
  4373. if(Checkclient3phonerecordExist(pdb1, pdb2, id))return 1;
  4374. int i;CString temp;
  4375. int colcount;
  4376. CODBCFieldInfo fieldinfo;
  4377. BOOL ret=1;
  4378. CRecordset myset(pdb1);
  4379. try
  4380. {
  4381. sql.Format("insert into [%d].[dbo].[client3phonerecord] select * from [%s].[dbo].[client3phonerecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4382. MyExecuteSQL(pdb1, sql);
  4383. }
  4384. catch(...)
  4385. {
  4386. ret=0;
  4387. }
  4388. if(ret==0)return 0;
  4389. return Checkclient3phonerecordExist(pdb1, pdb2, id);
  4390. }
  4391. catch(...)
  4392. {
  4393. WriteLogin("出错在函数trans3中");
  4394. }
  4395. return 0;
  4396. }
  4397. BOOL CDBServerDlg::Checkclient2phonerecordoutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4398. {
  4399. try
  4400. {
  4401. int count1=0;
  4402. int count2=0;
  4403. CString sql;
  4404. {
  4405. CRecordset myset(pdb1);
  4406. sql="select count(*) as cot from client2phonerecordout where [datetime]='"+id+"'";
  4407. myset.Open (CRecordset::forwardOnly, sql);
  4408. myset.GetFieldValue ("cot", sql);
  4409. myset.Close();
  4410. count1=atoi(sql);
  4411. }
  4412. {
  4413. CRecordset myset(pdb2);
  4414. sql="select count(*) as cot from client2phonerecordout where [datetime]='"+id+"'";
  4415. myset.Open (CRecordset::forwardOnly, sql);
  4416. myset.GetFieldValue ("cot", sql);
  4417. myset.Close();
  4418. count2=atoi(sql);
  4419. }
  4420. if(count1>count2)return 0;
  4421. return 1;
  4422. }
  4423. catch(...)
  4424. {
  4425. WriteLogin("出错在函数check3中");
  4426. }
  4427. return 0;
  4428. }
  4429. BOOL CDBServerDlg::Transclient2phonerecordout(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4430. {
  4431. try
  4432. {
  4433. CString sql;
  4434. if(Checkclient2phonerecordoutExist(pdb1, pdb2, id))return 1;
  4435. int i;CString temp;
  4436. int colcount;
  4437. CODBCFieldInfo fieldinfo;
  4438. BOOL ret=1;
  4439. CRecordset myset(pdb1);
  4440. try
  4441. {
  4442. sql.Format("insert into [%d].[dbo].[client2phonerecordout] select * from [%s].[dbo].[client2phonerecordout] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4443. MyExecuteSQL(pdb1, sql);
  4444. }
  4445. catch(...)
  4446. {
  4447. ret=0;
  4448. }
  4449. if(ret==0)return 0;
  4450. return Checkclient2phonerecordoutExist(pdb1, pdb2, id);
  4451. }
  4452. catch(...)
  4453. {
  4454. WriteLogin("出错在函数trans3中");
  4455. }
  4456. return 0;
  4457. }
  4458. BOOL CDBServerDlg::Checkclient3phonerecordoutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4459. {
  4460. try
  4461. {
  4462. int count1=0;
  4463. int count2=0;
  4464. CString sql;
  4465. {
  4466. CRecordset myset(pdb1);
  4467. sql="select count(*) as cot from client3phonerecordout where [datetime]='"+id+"'";
  4468. myset.Open (CRecordset::forwardOnly, sql);
  4469. myset.GetFieldValue ("cot", sql);
  4470. myset.Close();
  4471. count1=atoi(sql);
  4472. }
  4473. {
  4474. CRecordset myset(pdb2);
  4475. sql="select count(*) as cot from client3phonerecordout where [datetime]='"+id+"'";
  4476. myset.Open (CRecordset::forwardOnly, sql);
  4477. myset.GetFieldValue ("cot", sql);
  4478. myset.Close();
  4479. count2=atoi(sql);
  4480. }
  4481. if(count1>count2)return 0;
  4482. return 1;
  4483. }
  4484. catch(...)
  4485. {
  4486. WriteLogin("出错在函数check3中");
  4487. }
  4488. return 0;
  4489. }
  4490. BOOL CDBServerDlg::Transclient3phonerecordout(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4491. {
  4492. try
  4493. {
  4494. CString sql;
  4495. if(Checkclient3phonerecordoutExist(pdb1, pdb2, id))return 1;
  4496. int i;CString temp;
  4497. int colcount;
  4498. CODBCFieldInfo fieldinfo;
  4499. BOOL ret=1;
  4500. CRecordset myset(pdb1);
  4501. try
  4502. {
  4503. sql.Format("insert into [%d].[dbo].[client3phonerecordout] select * from [%s].[dbo].[client3phonerecordout] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4504. MyExecuteSQL(pdb1, sql);
  4505. }
  4506. catch(...)
  4507. {
  4508. ret=0;
  4509. }
  4510. if(ret==0)return 0;
  4511. return Checkclient3phonerecordoutExist(pdb1, pdb2, id);
  4512. }
  4513. catch(...)
  4514. {
  4515. WriteLogin("出错在函数trans3中");
  4516. }
  4517. return 0;
  4518. }
  4519. BOOL CDBServerDlg::CheckemployeephonerecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4520. {
  4521. try
  4522. {
  4523. int count1=0;
  4524. int count2=0;
  4525. CString sql;
  4526. {
  4527. CRecordset myset(pdb1);
  4528. sql="select count(*) as cot from employeephonerecord where [datetime]='"+id+"'";
  4529. myset.Open (CRecordset::forwardOnly, sql);
  4530. myset.GetFieldValue ("cot", sql);
  4531. myset.Close();
  4532. count1=atoi(sql);
  4533. }
  4534. {
  4535. CRecordset myset(pdb2);
  4536. sql="select count(*) as cot from employeephonerecord where [datetime]='"+id+"'";
  4537. myset.Open (CRecordset::forwardOnly, sql);
  4538. myset.GetFieldValue ("cot", sql);
  4539. myset.Close();
  4540. count2=atoi(sql);
  4541. }
  4542. if(count1>count2)return 0;
  4543. return 1;
  4544. }
  4545. catch(...)
  4546. {
  4547. WriteLogin("出错在函数check3中");
  4548. }
  4549. return 0;
  4550. }
  4551. BOOL CDBServerDlg::Transemployeephonerecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4552. {
  4553. try
  4554. {
  4555. CString sql;
  4556. if(CheckemployeephonerecordExist(pdb1, pdb2, id))return 1;
  4557. int i;CString temp;
  4558. int colcount;
  4559. CODBCFieldInfo fieldinfo;
  4560. BOOL ret=1;
  4561. CRecordset myset(pdb1);
  4562. try
  4563. {
  4564. sql.Format("insert into [%d].[dbo].[employeephonerecord] select * from [%s].[dbo].[employeephonerecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4565. MyExecuteSQL(pdb1, sql);
  4566. }
  4567. catch(...)
  4568. {
  4569. ret=0;
  4570. }
  4571. if(ret==0)return 0;
  4572. return CheckemployeephonerecordExist(pdb1, pdb2, id);
  4573. }
  4574. catch(...)
  4575. {
  4576. WriteLogin("出错在函数trans3中");
  4577. }
  4578. return 0;
  4579. }
  4580. BOOL CDBServerDlg::CheckemployeephonerecordoutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4581. {
  4582. try
  4583. {
  4584. int count1=0;
  4585. int count2=0;
  4586. CString sql;
  4587. {
  4588. CRecordset myset(pdb1);
  4589. sql="select count(*) as cot from employeephonerecordout where [datetime]='"+id+"'";
  4590. myset.Open (CRecordset::forwardOnly, sql);
  4591. myset.GetFieldValue ("cot", sql);
  4592. myset.Close();
  4593. count1=atoi(sql);
  4594. }
  4595. {
  4596. CRecordset myset(pdb2);
  4597. sql="select count(*) as cot from employeephonerecordout where [datetime]='"+id+"'";
  4598. myset.Open (CRecordset::forwardOnly, sql);
  4599. myset.GetFieldValue ("cot", sql);
  4600. myset.Close();
  4601. count2=atoi(sql);
  4602. }
  4603. if(count1>count2)return 0;
  4604. return 1;
  4605. }
  4606. catch(...)
  4607. {
  4608. WriteLogin("出错在函数check3中");
  4609. }
  4610. return 0;
  4611. }
  4612. BOOL CDBServerDlg::Transemployeephonerecordout(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4613. {
  4614. try
  4615. {
  4616. CString sql;
  4617. if(CheckemployeephonerecordoutExist(pdb1, pdb2, id))return 1;
  4618. int i;CString temp;
  4619. int colcount;
  4620. CODBCFieldInfo fieldinfo;
  4621. BOOL ret=1;
  4622. CRecordset myset(pdb1);
  4623. try
  4624. {
  4625. sql.Format("insert into [%d].[dbo].[employeephonerecordout] select * from [%s].[dbo].[employeephonerecordout] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4626. MyExecuteSQL(pdb1, sql);
  4627. }
  4628. catch(...)
  4629. {
  4630. ret=0;
  4631. }
  4632. if(ret==0)return 0;
  4633. return CheckemployeephonerecordoutExist(pdb1, pdb2, id);
  4634. }
  4635. catch(...)
  4636. {
  4637. WriteLogin("出错在函数trans3中");
  4638. }
  4639. return 0;
  4640. }
  4641. BOOL CDBServerDlg::CheckphonerecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4642. {
  4643. try
  4644. {
  4645. int count1=0;
  4646. int count2=0;
  4647. CString sql;
  4648. {
  4649. CRecordset myset(pdb1);
  4650. sql="select count(*) as cot from phonerecord where [datetime]='"+id+"'";
  4651. myset.Open (CRecordset::forwardOnly, sql);
  4652. myset.GetFieldValue ("cot", sql);
  4653. myset.Close();
  4654. count1=atoi(sql);
  4655. }
  4656. {
  4657. CRecordset myset(pdb2);
  4658. sql="select count(*) as cot from phonerecord where [datetime]='"+id+"'";
  4659. myset.Open (CRecordset::forwardOnly, sql);
  4660. myset.GetFieldValue ("cot", sql);
  4661. myset.Close();
  4662. count2=atoi(sql);
  4663. }
  4664. if(count1>count2)return 0;
  4665. return 1;
  4666. }
  4667. catch(...)
  4668. {
  4669. WriteLogin("出错在函数check3中");
  4670. }
  4671. return 0;
  4672. }
  4673. BOOL CDBServerDlg::Transphonerecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4674. {
  4675. try
  4676. {
  4677. CString sql;
  4678. if(CheckphonerecordExist(pdb1, pdb2, id))return 1;
  4679. int i;CString temp;
  4680. int colcount;
  4681. CODBCFieldInfo fieldinfo;
  4682. BOOL ret=1;
  4683. CRecordset myset(pdb1);
  4684. try
  4685. {
  4686. sql.Format("insert into [%d].[dbo].[phonerecord] select * from [%s].[dbo].[phonerecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4687. MyExecuteSQL(pdb1, sql);
  4688. }
  4689. catch(...)
  4690. {
  4691. ret=0;
  4692. }
  4693. if(ret==0)return 0;
  4694. return CheckphonerecordExist(pdb1, pdb2, id);
  4695. }
  4696. catch(...)
  4697. {
  4698. WriteLogin("出错在函数trans3中");
  4699. }
  4700. return 0;
  4701. }
  4702. BOOL CDBServerDlg::CheckphonerecordoutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4703. {
  4704. try
  4705. {
  4706. int count1=0;
  4707. int count2=0;
  4708. CString sql;
  4709. {
  4710. CRecordset myset(pdb1);
  4711. sql="select count(*) as cot from phonerecordout where [datetime]='"+id+"'";
  4712. myset.Open (CRecordset::forwardOnly, sql);
  4713. myset.GetFieldValue ("cot", sql);
  4714. myset.Close();
  4715. count1=atoi(sql);
  4716. }
  4717. {
  4718. CRecordset myset(pdb2);
  4719. sql="select count(*) as cot from phonerecordout where [datetime]='"+id+"'";
  4720. myset.Open (CRecordset::forwardOnly, sql);
  4721. myset.GetFieldValue ("cot", sql);
  4722. myset.Close();
  4723. count2=atoi(sql);
  4724. }
  4725. if(count1>count2)return 0;
  4726. return 1;
  4727. }
  4728. catch(...)
  4729. {
  4730. WriteLogin("出错在函数check3中");
  4731. }
  4732. return 0;
  4733. }
  4734. BOOL CDBServerDlg::Transphonerecordout(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4735. {
  4736. try
  4737. {
  4738. CString sql;
  4739. if(CheckphonerecordoutExist(pdb1, pdb2, id))return 1;
  4740. int i;CString temp;
  4741. int colcount;
  4742. CODBCFieldInfo fieldinfo;
  4743. BOOL ret=1;
  4744. CRecordset myset(pdb1);
  4745. try
  4746. {
  4747. sql.Format("insert into [%d].[dbo].[phonerecordout] select * from [%s].[dbo].[phonerecordout] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4748. MyExecuteSQL(pdb1, sql);
  4749. }
  4750. catch(...)
  4751. {
  4752. ret=0;
  4753. }
  4754. if(ret==0)return 0;
  4755. return CheckphonerecordoutExist(pdb1, pdb2, id);
  4756. }
  4757. catch(...)
  4758. {
  4759. WriteLogin("出错在函数trans3中");
  4760. }
  4761. return 0;
  4762. }
  4763. BOOL CDBServerDlg::CheckunknownphonerecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4764. {
  4765. try
  4766. {
  4767. int count1=0;
  4768. int count2=0;
  4769. CString sql;
  4770. {
  4771. CRecordset myset(pdb1);
  4772. sql="select count(*) as cot from unknownphonerecord where [datetime]='"+id+"'";
  4773. myset.Open (CRecordset::forwardOnly, sql);
  4774. myset.GetFieldValue ("cot", sql);
  4775. myset.Close();
  4776. count1=atoi(sql);
  4777. }
  4778. {
  4779. CRecordset myset(pdb2);
  4780. sql="select count(*) as cot from unknownphonerecord where [datetime]='"+id+"'";
  4781. myset.Open (CRecordset::forwardOnly, sql);
  4782. myset.GetFieldValue ("cot", sql);
  4783. myset.Close();
  4784. count2=atoi(sql);
  4785. }
  4786. if(count1>count2)return 0;
  4787. return 1;
  4788. }
  4789. catch(...)
  4790. {
  4791. WriteLogin("出错在函数check3中");
  4792. }
  4793. return 0;
  4794. }
  4795. BOOL CDBServerDlg::Transunknownphonerecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4796. {
  4797. try
  4798. {
  4799. CString sql;
  4800. if(CheckunknownphonerecordExist(pdb1, pdb2, id))return 1;
  4801. int i;CString temp;
  4802. int colcount;
  4803. CODBCFieldInfo fieldinfo;
  4804. BOOL ret=1;
  4805. CRecordset myset(pdb1);
  4806. try
  4807. {
  4808. sql.Format("insert into [%d].[dbo].[unknownphonerecord] select * from [%s].[dbo].[unknownphonerecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4809. MyExecuteSQL(pdb1, sql);
  4810. }
  4811. catch(...)
  4812. {
  4813. ret=0;
  4814. }
  4815. if(ret==0)return 0;
  4816. return CheckunknownphonerecordExist(pdb1, pdb2, id);
  4817. }
  4818. catch(...)
  4819. {
  4820. WriteLogin("出错在函数trans3中");
  4821. }
  4822. return 0;
  4823. }
  4824. BOOL CDBServerDlg::CheckunknownphonerecordoutExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4825. {
  4826. try
  4827. {
  4828. int count1=0;
  4829. int count2=0;
  4830. CString sql;
  4831. {
  4832. CRecordset myset(pdb1);
  4833. sql="select count(*) as cot from unknownphonerecordout where [datetime]='"+id+"'";
  4834. myset.Open (CRecordset::forwardOnly, sql);
  4835. myset.GetFieldValue ("cot", sql);
  4836. myset.Close();
  4837. count1=atoi(sql);
  4838. }
  4839. {
  4840. CRecordset myset(pdb2);
  4841. sql="select count(*) as cot from unknownphonerecordout where [datetime]='"+id+"'";
  4842. myset.Open (CRecordset::forwardOnly, sql);
  4843. myset.GetFieldValue ("cot", sql);
  4844. myset.Close();
  4845. count2=atoi(sql);
  4846. }
  4847. if(count1>count2)return 0;
  4848. return 1;
  4849. }
  4850. catch(...)
  4851. {
  4852. WriteLogin("出错在函数check3中");
  4853. }
  4854. return 0;
  4855. }
  4856. BOOL CDBServerDlg::Transunknownphonerecordout(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4857. {
  4858. try
  4859. {
  4860. CString sql;
  4861. if(CheckunknownphonerecordoutExist(pdb1, pdb2, id))return 1;
  4862. int i;CString temp;
  4863. int colcount;
  4864. CODBCFieldInfo fieldinfo;
  4865. BOOL ret=1;
  4866. CRecordset myset(pdb1);
  4867. try
  4868. {
  4869. sql.Format("insert into [%d].[dbo].[unknownphonerecordout] select * from [%s].[dbo].[unknownphonerecordout] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4870. MyExecuteSQL(pdb1, sql);
  4871. }
  4872. catch(...)
  4873. {
  4874. ret=0;
  4875. }
  4876. if(ret==0)return 0;
  4877. return CheckunknownphonerecordoutExist(pdb1, pdb2, id);
  4878. }
  4879. catch(...)
  4880. {
  4881. WriteLogin("出错在函数trans3中");
  4882. }
  4883. return 0;
  4884. }
  4885. BOOL CDBServerDlg::CheckmisscallrecordExist(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4886. {
  4887. try
  4888. {
  4889. int count1=0;
  4890. int count2=0;
  4891. CString sql;
  4892. {
  4893. CRecordset myset(pdb1);
  4894. sql="select count(*) as cot from misscallrecord where [datetime]='"+id+"'";
  4895. myset.Open (CRecordset::forwardOnly, sql);
  4896. myset.GetFieldValue ("cot", sql);
  4897. myset.Close();
  4898. count1=atoi(sql);
  4899. }
  4900. {
  4901. CRecordset myset(pdb2);
  4902. sql="select count(*) as cot from misscallrecord where [datetime]='"+id+"'";
  4903. myset.Open (CRecordset::forwardOnly, sql);
  4904. myset.GetFieldValue ("cot", sql);
  4905. myset.Close();
  4906. count2=atoi(sql);
  4907. }
  4908. if(count1>count2)return 0;
  4909. return 1;
  4910. }
  4911. catch(...)
  4912. {
  4913. WriteLogin("出错在函数check3中");
  4914. }
  4915. return 0;
  4916. }
  4917. BOOL CDBServerDlg::Transmisscallrecord(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4918. {
  4919. try
  4920. {
  4921. CString sql;
  4922. if(CheckmisscallrecordExist(pdb1, pdb2, id))return 1;
  4923. int i;
  4924. CString temp;
  4925. int colcount;
  4926. CODBCFieldInfo fieldinfo;
  4927. BOOL ret=1;
  4928. CRecordset myset(pdb1);
  4929. try
  4930. {
  4931. sql.Format("insert into [%d].[dbo].[misscallrecord] select * from [%s].[dbo].[misscallrecord] where [datetime]='%s'", year, g_nCurConvertDBName, id);
  4932. MyExecuteSQL(pdb1, sql);
  4933. }
  4934. catch(...)
  4935. {
  4936. ret=0;
  4937. }
  4938. if(ret==0)return 0;
  4939. return CheckmisscallrecordExist(pdb1, pdb2, id);
  4940. }
  4941. catch(...)
  4942. {
  4943. WriteLogin("出错在函数trans3中");
  4944. }
  4945. return 0;
  4946. }
  4947. BOOL CDBServerDlg::CheckSendReg(CDatabase *pdb1, CDatabase *pdb2, CString id)
  4948. {
  4949. try
  4950. {
  4951. int count1=0;
  4952. int count2=0;
  4953. CString sql;
  4954. {
  4955. CRecordset myset(pdb1);
  4956. sql.Format("select count(*) as cot from sendreg where [timestamp]='%s'", id );
  4957. myset.Open (CRecordset::forwardOnly, sql);
  4958. myset.GetFieldValue ("cot", sql);
  4959. myset.Close();
  4960. count1=atoi(sql);
  4961. }
  4962. {
  4963. CRecordset myset(pdb2);
  4964. sql.Format("select count(*) as cot from sendreg where [timestamp]='%s'", id );
  4965. myset.Open (CRecordset::forwardOnly, sql);
  4966. myset.GetFieldValue ("cot", sql);
  4967. myset.Close();
  4968. count2=atoi(sql);
  4969. }
  4970. if(count1>count2)return 0;
  4971. return 1;
  4972. }
  4973. catch(...)
  4974. {
  4975. WriteLogin("出错在函数check3中");
  4976. }
  4977. return 0;
  4978. }
  4979. BOOL CDBServerDlg::TransSendReg(CDatabase *pdb1, CDatabase *pdb2, CString id, int year)
  4980. {
  4981. try
  4982. {
  4983. CString sql;
  4984. if(CheckSendReg(pdb1, pdb2, id))return 1;
  4985. int i;
  4986. CString temp;
  4987. int colcount;
  4988. CODBCFieldInfo fieldinfo;
  4989. BOOL ret=1;
  4990. CRecordset myset(pdb1);
  4991. try
  4992. {
  4993. sql.Format("insert into [%d].[dbo].[sendreg] select * from [%s].[dbo].[sendreg] where [timestamp]='%s'", year, g_nCurConvertDBName, id);
  4994. MyExecuteSQL(pdb1, sql);
  4995. }
  4996. catch(...)
  4997. {
  4998. ret=0;
  4999. }
  5000. if(ret==0)return 0;
  5001. return CheckSendReg(pdb1, pdb2, id);
  5002. }
  5003. catch(...)
  5004. {
  5005. WriteLogin("出错在函数trans3中");
  5006. }
  5007. return 0;
  5008. }
  5009. void CDBServerDlg::MyExecuteSQL(CDatabase* pdb, CString sql)
  5010. {
  5011. try
  5012. {
  5013. MyLock lock("dbaccessxiao");
  5014. pdb->ExecuteSQL (sql);
  5015. }
  5016. catch(...)
  5017. {
  5018. // WriteLogin("出错在函数executesql中");
  5019. }
  5020. }
  5021. void CDBServerDlg::UpdateDate()
  5022. {
  5023. try
  5024. {
  5025. HWND hwnd=::FindWindow (NULL, "AutoRun.exe - 应用程序错误");
  5026. if(hwnd)
  5027. {
  5028. HWND child=::FindWindowEx(hwnd, 0, NULL, "确定");
  5029. CWnd *pWnd = CWnd::FromHandle( child );
  5030. ::PostMessage( hwnd, WM_COMMAND, pWnd->GetDlgCtrlID(), (LPARAM) child );
  5031. }
  5032. CString autorunpath=g_mainpath+"\\AutoRun.exe";
  5033. if(0==g_bConvertHisAll)
  5034. ShellExecute(NULL, _T("open"), g_mainpath+"\\AutoRun.exe", NULL, NULL, SW_HIDE);
  5035. HANDLE hMutex = ::OpenMutex(NULL, FALSE, _T("lyfzSMSHandle"));
  5036. if (GetLastError() == ERROR_FILE_NOT_FOUND)
  5037. {
  5038. autorunpath = g_mainpath + "\\SMSHandle.exe";
  5039. ShellExecute(NULL, _T("open"), autorunpath, NULL, NULL, SW_HIDE);
  5040. }
  5041. if (hMutex) CloseHandle(hMutex);
  5042. #ifdef ENTERPRISE_VERSION
  5043. autorunpath=g_mainpath+"\\DataSyncReceive.exe";
  5044. ShellExecute(NULL, _T("open"), autorunpath, NULL, NULL, SW_HIDE);
  5045. autorunpath=g_mainpath+"\\DataSyncSend.exe";
  5046. ShellExecute(NULL, _T("open"), autorunpath, NULL, NULL, SW_HIDE);
  5047. autorunpath=g_mainpath+"\\CPhotoFTPReceive.exe";
  5048. ShellExecute(NULL, _T("open"), autorunpath, NULL, NULL, SW_HIDE);
  5049. autorunpath=g_mainpath+"\\CPhotoFTPSend.exe";
  5050. ShellExecute(NULL, _T("open"), autorunpath, NULL, NULL, SW_HIDE);
  5051. #endif
  5052. }
  5053. catch(...)
  5054. {
  5055. WriteLogin("出错在函数UpdateDate中");
  5056. }
  5057. }
  5058. BOOL CheckDateOK(CString str)
  5059. {
  5060. try
  5061. {
  5062. CString tip;
  5063. int i;
  5064. CString demo=CTime::GetCurrentTime ().Format ("%Y-%m-%d");
  5065. if(str.GetLength ()!=demo.GetLength ())
  5066. goto ll;
  5067. //2009-01-01
  5068. if(str.GetAt (4)!='-')
  5069. goto ll;
  5070. if(str.GetAt (7)!='-')
  5071. goto ll;
  5072. for( i=0; i<str.GetLength (); i++)
  5073. {
  5074. if(i==4 || i==7)continue;
  5075. if(str.GetAt (i)<'0' || str.GetAt (i)>'9')
  5076. goto ll;
  5077. }
  5078. return 1;
  5079. ll:
  5080. return 0;
  5081. }
  5082. catch(...)
  5083. {
  5084. WriteLogin("出错");
  5085. }
  5086. }
  5087. //--------------------------------------------------------------------------
  5088. // Remark by Jeff:2014.10.22
  5089. // 函数:AutoDelPhoto
  5090. // 描述:自动删除取件后的订单相片,包括客户原片、初修片、精修片、设计片。(不含备份相片)
  5091. // 参数:#
  5092. // 返回:#
  5093. //
  5094. // 调用关系:
  5095. // 1.AutoDelPhoto()由 BakPhoto()调用。
  5096. // 2.BakPhoto()由CDBServerDlg::SetTimer(4) 调用,调用频率2分钟,周期数直到程序结束。
  5097. // 3.CDBServerDlg::SetTimer(4) 由 CDBServerDlg::SetTimer(2) 调用,调用频率10毫秒,只有一个周期。
  5098. // 4.CDBServerDlg::SetTimer(2) 由 CDBServerDlg::OnInitDialog() 调用.
  5099. //
  5100. //--------------------------------------------------------------------------
  5101. void CDBServerDlg::AutoDelPhoto() // Jeff自动删除取件后的订单相片;
  5102. {
  5103. try
  5104. {
  5105. #ifdef ENTERPRISE_VERSION
  5106. GenYLGL();
  5107. #endif
  5108. g_curdb=&g_db;
  5109. BOOL bcheck1; // 自动删除客人原片;
  5110. BOOL bcheck2; // 自动删除客人初修片;
  5111. BOOL bcheck3; // 自动删除客人精修片;
  5112. BOOL bcheck4; // 自动删除客人设计片;
  5113. int edit1; // 多少个月后删除原片;
  5114. int edit2; // 多少个月后删除初修片;
  5115. int edit3; // 多少个月后删除精修片;
  5116. int edit4; // 多少个月后删除设计片;
  5117. CString m_bakserver1; // 自动备份客人原片的备份机器;
  5118. CString m_bakserver2; // 自动备份客人初修片的备份机器
  5119. CString m_bakserver3; // 自动备份客人精修片的备份机器;
  5120. CString m_bakserver4; // 自动备份客人设计片的备份机器;
  5121. // CDBServerDlg::m_bakserver5 : 自动备份系统数据的备份机器;
  5122. // 1.从version表中获取状态信息;
  5123. CRstversion tableOfVersion;
  5124. tableOfVersion.m_pDatabase = g_curdb;
  5125. tableOfVersion.Open();
  5126. if (!tableOfVersion.IsEOF())
  5127. {
  5128. bcheck1 = atoi(tableOfVersion.m_check1);
  5129. bcheck2 = atoi(tableOfVersion.m_check2);
  5130. bcheck3 = atoi(tableOfVersion.m_check3);
  5131. bcheck4 = atoi(tableOfVersion.m_check4);
  5132. edit1 = atoi(tableOfVersion.m_edit1);
  5133. edit2 = atoi(tableOfVersion.m_edit2);
  5134. edit3 = atoi(tableOfVersion.m_edit3);
  5135. edit4 = atoi(tableOfVersion.m_edit4);
  5136. m_bakserver1 = tableOfVersion.m_bakserver1;
  5137. m_bakserver2 = tableOfVersion.m_bakserver2;
  5138. m_bakserver3 = tableOfVersion.m_bakserver3;
  5139. m_bakserver4 = tableOfVersion.m_bakserver4;
  5140. m_bakserver5 = tableOfVersion.m_bakserver5;
  5141. }
  5142. tableOfVersion.Close();
  5143. // 2.
  5144. g_bakinfo="资料未备份";
  5145. g_bakphoto="照片未备份";
  5146. WriteLogin("开始备份数据库");
  5147. if (!m_bakserver5.IsEmpty()) // 自动备份系统数据的备份机器;
  5148. {
  5149. CString bakpath;
  5150. CString localname;
  5151. localname=g_localname;
  5152. #ifdef CHILD_VERSION
  5153. if(m_bakserver5.Find(":")==-1&& m_bakserver5!="")
  5154. m_bakserver5="\\\\"+m_bakserver5+"\\数据备份(儿童管理软件)$";
  5155. if(1)//localname.CompareNoCase (m_bakserver5)==0 || CompareIP(localname, m_bakserver5)==0)
  5156. GetPathFromNetShareName("数据备份(儿童管理软件)$", m_bakserver5);
  5157. #else
  5158. if(m_bakserver5.Find(":")==-1&& m_bakserver5!="")
  5159. m_bakserver5="\\\\"+m_bakserver5+"\\数据备份(管理软件)$";
  5160. if(1)//localname.CompareNoCase (m_bakserver5)==0 || CompareIP(localname, m_bakserver5)==0)
  5161. GetPathFromNetShareName("数据备份(管理软件)$", m_bakserver5);
  5162. #endif
  5163. WriteLogin(m_bakserver5);
  5164. if(::CheckFolderFileExist (m_bakserver5))
  5165. BakData(m_bakserver5, 1, 1);
  5166. }
  5167. WriteLogin("数据库备份完成"); // Jeff:只是备份数据库;
  5168. #if 0 // Jeff:old code;
  5169. if( !(bcheck1 || bcheck2 || bcheck3 || bcheck4) )
  5170. {
  5171. return;
  5172. }
  5173. #else
  5174. // 四个同时为假,退出删除操作;
  5175. if (!(bcheck1 | bcheck2 | bcheck3 | bcheck4))
  5176. {
  5177. return;
  5178. }
  5179. #endif
  5180. // path 4种类型相片的存储目录;
  5181. CStringArray patharray;
  5182. {
  5183. char server[50];
  5184. DWORD leng=50;
  5185. ::GetComputerName (server, &leng);
  5186. CString spathserver=server;
  5187. // O:original;
  5188. // E:early;
  5189. // F:further;
  5190. // D:Design;
  5191. CString strOSaveDirectory;
  5192. CString strESaveDirectory;
  5193. CString strFSaveDirectory;
  5194. CString strDSaveDirectory;
  5195. strOSaveDirectory = strESaveDirectory = strFSaveDirectory = strDSaveDirectory = server;
  5196. strOSaveDirectory = "\\\\" + strOSaveDirectory + "\\客户原片(管理软件)$";
  5197. strESaveDirectory = "\\\\" + strESaveDirectory + "\\修好的片(管理软件)$";
  5198. strFSaveDirectory = "\\\\" + strFSaveDirectory + "\\设计好的片(管理软件)$";
  5199. strDSaveDirectory = "\\\\" + strDSaveDirectory + "\\精修好的片(管理软件)$";
  5200. GetPathFromNetShareName("客户原片(管理软件)$", strOSaveDirectory);
  5201. GetPathFromNetShareName("修好的片(管理软件)$", strESaveDirectory);
  5202. GetPathFromNetShareName("设计好的片(管理软件)$", strFSaveDirectory);
  5203. GetPathFromNetShareName("精修好的片(管理软件)$", strDSaveDirectory);
  5204. patharray.Add(strOSaveDirectory);
  5205. patharray.Add(strESaveDirectory);
  5206. patharray.Add(strFSaveDirectory);
  5207. patharray.Add(strDSaveDirectory);
  5208. }
  5209. if (patharray.GetSize() == 0)
  5210. return;
  5211. CArray<CDatabase*,CDatabase*>dbarray2;
  5212. dbarray2.Copy(g_dbHistoryArray);
  5213. dbarray2.InsertAt(0, &g_db);
  5214. //------------------------------------------------------------------------------------------------------------------------
  5215. WriteLogin("开始删除取件后照片");
  5216. for(int n=0; n<min(3,dbarray2.GetSize ()); n++)
  5217. {
  5218. g_curdb=dbarray2.ElementAt (n);
  5219. CArray<CStringArray, CStringArray>strArrayOfPhoto2BeDel;
  5220. CString filter="status3='OK' and time5 is not null and time5<>''";
  5221. CRecordset myset(g_curdb);
  5222. CString sql = "select count(*) as cot from dindan";
  5223. if (!filter.IsEmpty())
  5224. sql += " where " + filter;
  5225. myset.Open (CRecordset::forwardOnly, sql);
  5226. myset.GetFieldValue ("cot", sql);
  5227. myset.Close();
  5228. int count=atol(sql);
  5229. if(count==0)continue;
  5230. strArrayOfPhoto2BeDel.SetSize(count, 1);
  5231. CRstDindanForm rsSt;
  5232. rsSt.m_pDatabase = g_curdb;
  5233. if (!filter.IsEmpty())
  5234. rsSt.m_strFilter = filter;
  5235. rsSt.Open();
  5236. INT_PTR nIndex = 0;
  5237. while(!rsSt.IsEOF())
  5238. {
  5239. strArrayOfPhoto2BeDel.ElementAt(nIndex).RemoveAll();
  5240. strArrayOfPhoto2BeDel.ElementAt(nIndex).Add(rsSt.id);
  5241. strArrayOfPhoto2BeDel.ElementAt(nIndex).Add(rsSt.time5);
  5242. nIndex++;
  5243. rsSt.MoveNext();
  5244. if (strArrayOfPhoto2BeDel.GetSize() <= nIndex)break;
  5245. }
  5246. rsSt.Close();
  5247. strArrayOfPhoto2BeDel.SetSize(nIndex, 1);
  5248. CString time5;
  5249. CString id;
  5250. CTime curtm=CTime::GetCurrentTime ();
  5251. CString strtime;
  5252. for (int i = 0; i < strArrayOfPhoto2BeDel.GetSize(); i++)
  5253. {
  5254. id = strArrayOfPhoto2BeDel.ElementAt(i).ElementAt(0);
  5255. time5 = strArrayOfPhoto2BeDel.ElementAt(i).ElementAt(1);
  5256. if(bcheck1)//原片
  5257. {
  5258. CTimeSpan sp(edit1*30, 0, 0, 0);
  5259. CTime tm=curtm-sp;
  5260. strtime=tm.Format ("%Y-%m-%d");
  5261. if (strtime > time5) // Jeff,这种比较是否正确???
  5262. {
  5263. if (DelPhoto1(patharray.ElementAt(0), strArrayOfPhoto2BeDel.ElementAt(i).ElementAt(0)))
  5264. WriteLogin("原片" + patharray.ElementAt(0) + "\\" + strArrayOfPhoto2BeDel.ElementAt(i).ElementAt(0));
  5265. // DelPhoto1(patharray2.ElementAt (0),g_List1array.ElementAt (i).ElementAt (0));
  5266. }
  5267. }
  5268. if(bcheck2)
  5269. {
  5270. CTimeSpan sp(edit2*30, 0, 0, 0);
  5271. CTime tm=curtm-sp;
  5272. strtime=tm.Format ("%Y-%m-%d");
  5273. if(strtime>time5)
  5274. {
  5275. DelPhoto1(patharray.ElementAt(1), strArrayOfPhoto2BeDel.ElementAt(i).ElementAt(0));
  5276. // DelPhoto1(patharray2.ElementAt (2),g_List1array.ElementAt (i).ElementAt (0));
  5277. }
  5278. }
  5279. if(bcheck3)
  5280. {
  5281. CTimeSpan sp(edit3*30, 0, 0, 0);
  5282. CTime tm=curtm-sp;
  5283. strtime=tm.Format ("%Y-%m-%d");
  5284. if(strtime>time5)
  5285. {
  5286. DelPhoto1(patharray.ElementAt(2), strArrayOfPhoto2BeDel.ElementAt(i).ElementAt(0));
  5287. // DelPhoto1(patharray2.ElementAt (2),g_List1array.ElementAt (i).ElementAt (0));
  5288. }
  5289. }
  5290. if(bcheck4)
  5291. {
  5292. CTimeSpan sp(edit4*30, 0, 0, 0);
  5293. CTime tm=curtm-sp;
  5294. strtime=tm.Format ("%Y-%m-%d");
  5295. if(strtime>time5)
  5296. {
  5297. DelPhoto1(patharray.ElementAt(3), strArrayOfPhoto2BeDel.ElementAt(i).ElementAt(0));
  5298. }
  5299. }
  5300. }
  5301. }
  5302. //------------------------------------------------------------------------------------------------------------------------
  5303. g_curdb=&g_db;
  5304. #ifdef ENTERPRISE_VERSION // Jeff:若是集团版,会再次删除本店已取件的历史订单一次。多操作了一次!
  5305. WriteLogin("本店查完,开始检查分店");
  5306. CString g_domain;
  5307. CArray<CStringArray, CStringArray>g_List1array;
  5308. CString autorunpath=g_mainpath+"\\branchdindan.dat";
  5309. CFile fp;
  5310. if(fp.Open(autorunpath, CFile::modeRead))
  5311. {
  5312. int nMessageLen=fp.GetLength();
  5313. BYTE *pData=new BYTE[nMessageLen];
  5314. fp.Read(pData, nMessageLen);
  5315. fp.Close();
  5316. BYTE *szChatMessage = pData;
  5317. int count;
  5318. memcpy(&count, szChatMessage+(nMessageLen-sizeof(int)), sizeof(int));
  5319. CMemFile memfile;
  5320. memfile.Attach (szChatMessage, nMessageLen);
  5321. CArchive ar(&memfile, CArchive::load);
  5322. g_List1array.SetSize(count);
  5323. for(int ii=0; ii<g_List1array.GetSize (); ii++)
  5324. {
  5325. g_List1array.ElementAt (ii).Serialize (ar);
  5326. }
  5327. ar.Close();
  5328. memfile.Detach ();
  5329. delete []pData;
  5330. }
  5331. CString time5,id;
  5332. CTime curtm=CTime::GetCurrentTime ();
  5333. CString strtime;
  5334. for(int i=0; i<g_List1array.GetSize (); i++)
  5335. {
  5336. g_domain="\\"+g_List1array.ElementAt (i).ElementAt (0);
  5337. if(g_domain.Find (".ly.com")==-1)continue;
  5338. id=g_List1array.ElementAt (i).ElementAt (1);
  5339. time5=g_List1array.ElementAt (i).ElementAt (2);
  5340. if(bcheck1)//原片
  5341. {
  5342. CTimeSpan sp(edit1*30, 0, 0, 0);
  5343. CTime tm=curtm-sp;
  5344. strtime=tm.Format ("%Y-%m-%d");
  5345. if(strtime>time5)
  5346. {
  5347. if(DelPhoto1(patharray.ElementAt (0)+g_domain,id))
  5348. WriteLogin("分店原片"+patharray.ElementAt (0)+g_domain+"\\"+id );
  5349. }
  5350. }
  5351. if(bcheck2)
  5352. {
  5353. CTimeSpan sp(edit2*30, 0, 0, 0);
  5354. CTime tm=curtm-sp;
  5355. strtime=tm.Format ("%Y-%m-%d");
  5356. if(strtime>time5)
  5357. {
  5358. DelPhoto1(patharray.ElementAt (1)+g_domain,id);
  5359. // DelPhoto1(patharray2.ElementAt (2),id);
  5360. }
  5361. }
  5362. if(bcheck3)
  5363. {
  5364. CTimeSpan sp(edit3*30, 0, 0, 0);
  5365. CTime tm=curtm-sp;
  5366. strtime=tm.Format ("%Y-%m-%d");
  5367. if(strtime>time5)
  5368. {
  5369. DelPhoto1(patharray.ElementAt (2)+g_domain,id);
  5370. // DelPhoto1(patharray2.ElementAt (2),id);
  5371. }
  5372. }
  5373. if(bcheck4)
  5374. {
  5375. CTimeSpan sp(edit4*30, 0, 0, 0);
  5376. CTime tm=curtm-sp;
  5377. strtime=tm.Format ("%Y-%m-%d");
  5378. if(strtime>time5)
  5379. {
  5380. DelPhoto1(patharray.ElementAt (3)+g_domain,id);
  5381. }
  5382. }
  5383. }
  5384. g_curdb=&g_db;
  5385. #endif
  5386. WriteLogin("检查删除照片完成");
  5387. }
  5388. catch(...)
  5389. {
  5390. WriteLogin("出错在函数AutoDelPhoto中");
  5391. }
  5392. g_curdb=&g_db;
  5393. }
  5394. //------------------------------------------------------------------
  5395. // Remark by Jeff:2014.10.11
  5396. // 函数:DelPhoto1
  5397. // 描述:删除指定路径下的订单文件夹;
  5398. // 参数:
  5399. // path: 指定要删除文件的根目录;
  5400. // strOrderNumber: 将要删除的订单号文件夹;
  5401. // 返回:
  5402. //-----------------------------------------------------------------
  5403. BOOL CDBServerDlg::DelPhoto1(CString path, CString strOrderNumber)
  5404. {
  5405. if (path == "")
  5406. return 0;
  5407. if (::CheckFolderFileExist(path + "\\" + strOrderNumber))
  5408. {
  5409. DeleteDirectory(path + "\\" + strOrderNumber);
  5410. return 1;
  5411. }
  5412. }
  5413. //-----------------------------------------------------------------------
  5414. // Remark by Jeff 2014.10.22
  5415. // 函数:BakPhoto
  5416. // 描述:对影楼相片进行备份和删除取件相片
  5417. // 参数:#
  5418. // 返回:#
  5419. //
  5420. // 调用关系:
  5421. // 1.BakPhoto()由CDBServerDlg::SetTimer(4) 调用,调用频率2分钟,周期数直到程序结束。
  5422. // 2.CDBServerDlg::SetTimer(4) 由 CDBServerDlg::SetTimer(2) 调用,调用频率10毫秒,只有一个周期。
  5423. // 3.CDBServerDlg::SetTimer(2) 由 CDBServerDlg::OnInitDialog() 调用.
  5424. //-----------------------------------------------------------------------
  5425. void CDBServerDlg::BakPhoto() // Jeff:备份相片/删除取件相片;
  5426. {
  5427. try
  5428. {
  5429. int i = 0;
  5430. g_curdb=&g_db;
  5431. CString m_bak1,m_bak2,m_bak3,m_bak4,m_bak6,m_baktime; // Jeff:m_bak6自动备份完毕后自动关机;
  5432. CString m_bakserver1,m_bakserver2,m_bakserver3,m_bakserver4;
  5433. CString msgcheck4,msgtime,msgphones,msgphones2,msgcompanyname;
  5434. CString balance,msgaccount;
  5435. {
  5436. MyLock lock("dbaccessxiao");
  5437. CRstversion rsSt;
  5438. rsSt.m_pDatabase = g_curdb;
  5439. rsSt.Open();
  5440. if(!rsSt.IsEOF())
  5441. {
  5442. m_bak1=rsSt.m_bak1;
  5443. m_bak2=rsSt.m_bak2;
  5444. m_bak3=rsSt.m_bak3;
  5445. m_bak4=rsSt.m_bak4;
  5446. m_bakserver1=rsSt.m_bakserver1;
  5447. m_bakserver2=rsSt.m_bakserver2;
  5448. m_bakserver3=rsSt.m_bakserver3;
  5449. m_bakserver4=rsSt.m_bakserver4;
  5450. m_bak6=rsSt.m_bak6;
  5451. m_baktime=rsSt.m_baktime;
  5452. msgcheck4=rsSt.msgcheck4;
  5453. msgtime=rsSt.msgtime;
  5454. msgphones=rsSt.msgphones;
  5455. msgphones2=rsSt.msgphones2;
  5456. msgcompanyname=rsSt.msgcompanyname;
  5457. balance=rsSt.msgbalance;
  5458. msgaccount=rsSt.msgaccount;
  5459. }
  5460. rsSt.Close();
  5461. }
  5462. /////////////检测发短信回财务
  5463. if(msgphones2.IsEmpty ()==0)
  5464. {
  5465. MyLock lock("dbaccessxiao");
  5466. CStringArray array,timearray;
  5467. CString timestamp;
  5468. timestamp=CTime::GetCurrentTime ().Format ("%Y-%m-%d");
  5469. timestamp+="%";
  5470. CRecordset myset(g_curdb);
  5471. CString sql="select phones,timestamp from sendregreceive where [timestamp] like '"+timestamp+"' and [content]='001' and [status]='OK'";
  5472. myset.Open (CRecordset::forwardOnly, sql);
  5473. CString phones;
  5474. while(!myset.IsEOF())
  5475. {
  5476. myset.GetFieldValue ("phones", phones);
  5477. myset.GetFieldValue ("timestamp", timestamp);
  5478. if(msgphones2.Find (phones)!=-1)
  5479. {
  5480. array.Add(phones ) ;
  5481. timearray.Add (timestamp );
  5482. }
  5483. myset.MoveNext();
  5484. }
  5485. myset.Close();
  5486. if(array.GetSize ())
  5487. {
  5488. CString sql;
  5489. for(/*int*/ i=0; i<array.GetSize (); i++)
  5490. {
  5491. sql="update sendregreceive set [status]='' where [timestamp]='"+timearray.ElementAt (i)+"'";
  5492. MyExecuteSQL (&g_db, sql);
  5493. }
  5494. CArray<CStringArray, CStringArray>List11array;
  5495. CArray<CStringArray, CStringArray>List2array;
  5496. CArray<CStringArray, CStringArray>List3array;
  5497. CArray<CStringArray, CStringArray>other2salearray;
  5498. CArray<CStringArray, CStringArray>memberarray;
  5499. CString strdate=CTime::GetCurrentTime ().Format ("%Y-%m-%d");
  5500. CArray<CDatabase*,CDatabase*>dbarraytemp;
  5501. dbarraytemp.Copy(g_dbHistoryArray);
  5502. while(dbarraytemp.GetSize()>1)
  5503. {
  5504. int last=dbarraytemp.GetSize()-1;
  5505. dbarraytemp.RemoveAt(last);
  5506. }
  5507. dbarraytemp.InsertAt(0, &g_db);
  5508. for(int a=dbarraytemp.GetSize ()-1; a>=0; a--)
  5509. {
  5510. g_curdb=dbarraytemp.ElementAt (a);
  5511. CString filter="[dat]='"+strdate+"'";
  5512. filter="[dat]='"+strdate+"' and ([sale2type] is null or [sale2type]='')";
  5513. {
  5514. CRecordset myset(g_curdb);
  5515. CString sql="select count(*) as cot from singleincome";if(!filter.IsEmpty ())sql+=" where "+filter;
  5516. myset.Open (CRecordset::forwardOnly, sql);
  5517. myset.GetFieldValue ("cot", sql);
  5518. myset.Close();
  5519. int count=atol(sql);
  5520. int oldsize=List2array.GetSize ();
  5521. List2array.SetSize(oldsize+count , 1 );
  5522. CRstIncomeInput rsSt; rsSt.m_pDatabase=g_curdb; if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  5523. rsSt.Open();
  5524. int ii=0;
  5525. while(!rsSt.IsEOF())
  5526. {
  5527. List2array.ElementAt (oldsize+ii).RemoveAll ();
  5528. List2array.ElementAt (oldsize+ii).Add(rsSt.id) ;
  5529. List2array.ElementAt (oldsize+ii).Add(rsSt.name) ;
  5530. List2array.ElementAt (oldsize+ii).Add(rsSt.money) ;
  5531. List2array.ElementAt (oldsize+ii).Add(rsSt.date) ;
  5532. List2array.ElementAt (oldsize+ii).Add(rsSt.renyuan1) ;
  5533. List2array.ElementAt (oldsize+ii).Add(rsSt.renyuan2) ;
  5534. List2array.ElementAt (oldsize+ii).Add(rsSt.renyuan3) ;
  5535. List2array.ElementAt (oldsize+ii).Add(rsSt.bz) ;
  5536. List2array.ElementAt (oldsize+ii).Add(rsSt.sale2type) ;
  5537. ii++;
  5538. rsSt.MoveNext();if(List2array.GetSize ()<=ii)break;
  5539. }
  5540. rsSt.Close();List2array.SetSize(oldsize+ii , 1 );
  5541. }
  5542. filter="[dat]='"+strdate+"'";
  5543. {
  5544. CRecordset myset(g_curdb);
  5545. CString sql="select count(*) as cot from gudingfeiyong";if(!filter.IsEmpty ())sql+=" where "+filter;
  5546. myset.Open (CRecordset::forwardOnly, sql);
  5547. myset.GetFieldValue ("cot", sql);
  5548. myset.Close();
  5549. int count=atol(sql);
  5550. int oldsize=List3array.GetSize ();
  5551. List3array.SetSize(oldsize+count , 1 );
  5552. CRstPayOutInput rsSt; rsSt.m_pDatabase=g_curdb; if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  5553. rsSt.Open();
  5554. int ii=0;
  5555. while(!rsSt.IsEOF())
  5556. {
  5557. List3array.ElementAt (oldsize+ii).RemoveAll ();
  5558. List3array.ElementAt (oldsize+ii).Add(rsSt.id) ;
  5559. List3array.ElementAt (oldsize+ii).Add(rsSt.name) ;
  5560. List3array.ElementAt (oldsize+ii).Add(rsSt.money) ;
  5561. List3array.ElementAt (oldsize+ii).Add(rsSt.date) ;
  5562. List3array.ElementAt (oldsize+ii).Add(rsSt.renyuan1) ;
  5563. List3array.ElementAt (oldsize+ii).Add(rsSt.renyuan2) ;
  5564. List3array.ElementAt (oldsize+ii).Add(rsSt.bz) ;
  5565. ii++;
  5566. rsSt.MoveNext();if(List3array.GetSize ()<=ii)break;
  5567. }
  5568. rsSt.Close();List3array.SetSize(oldsize+ii , 1 );
  5569. }
  5570. filter="[date]='"+strdate+"'";
  5571. {
  5572. CRecordset myset(g_curdb);
  5573. CString sql="select count(*) as cot from dindanbukuan";if(!filter.IsEmpty ())sql+=" where "+filter;
  5574. myset.Open (CRecordset::forwardOnly, sql);
  5575. myset.GetFieldValue ("cot", sql);
  5576. myset.Close();
  5577. int count=atol(sql);
  5578. int oldsize=List11array.GetSize ();
  5579. List11array.SetSize(oldsize+count , 1 );
  5580. CRstBuKuan rsSt; rsSt.m_pDatabase=g_curdb; if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  5581. rsSt.Open();
  5582. int ii=0;
  5583. while(!rsSt.IsEOF())
  5584. {
  5585. List11array.ElementAt (oldsize+ii).RemoveAll ();
  5586. List11array.ElementAt (oldsize+ii).Add(rsSt.m_id) ;
  5587. List11array.ElementAt (oldsize+ii).Add(rsSt.m_ren) ;
  5588. List11array.ElementAt (oldsize+ii).Add(rsSt.m_money) ;
  5589. List11array.ElementAt (oldsize+ii).Add(rsSt.m_bz) ;
  5590. List11array.ElementAt (oldsize+ii).Add(rsSt.m_kind) ;
  5591. List11array.ElementAt (oldsize+ii).Add(rsSt.m_date) ;
  5592. ii++;
  5593. rsSt.MoveNext();if(List11array.GetSize ()<=ii)break;
  5594. }
  5595. rsSt.Close();List11array.SetSize(oldsize+ii , 1 );
  5596. }
  5597. filter="[date]='"+strdate+"'";
  5598. {
  5599. CRecordset myset(g_curdb);
  5600. CString sql="select count(*) as cot from singleincomemoneyview";if(!filter.IsEmpty ())sql+=" where "+filter;
  5601. myset.Open (CRecordset::forwardOnly, sql);
  5602. myset.GetFieldValue ("cot", sql);
  5603. myset.Close();
  5604. int count=atol(sql);
  5605. int oldsize=other2salearray.GetSize ();
  5606. other2salearray.SetSize(oldsize+count , 1 );
  5607. CRstsingleincomemoneyview rsSt; rsSt.m_pDatabase=g_curdb;if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  5608. rsSt.Open();
  5609. int ii=0;
  5610. while(!rsSt.IsEOF())
  5611. {
  5612. other2salearray.ElementAt (oldsize+ii).RemoveAll ();
  5613. other2salearray.ElementAt (oldsize+ii).Add(rsSt.name) ;
  5614. other2salearray.ElementAt (oldsize+ii).Add(rsSt.renyuan1) ;
  5615. other2salearray.ElementAt (oldsize+ii).Add(rsSt.renyuan3) ;
  5616. other2salearray.ElementAt (oldsize+ii).Add(rsSt.sale2type) ;
  5617. other2salearray.ElementAt (oldsize+ii).Add(rsSt.money) ;
  5618. other2salearray.ElementAt (oldsize+ii).Add(rsSt.date) ;
  5619. other2salearray.ElementAt (oldsize+ii).Add(rsSt.clerk) ;
  5620. other2salearray.ElementAt (oldsize+ii).Add(rsSt.paytype) ;
  5621. other2salearray.ElementAt (oldsize+ii).Add(rsSt.autoid) ;
  5622. other2salearray.ElementAt (oldsize+ii).Add(rsSt.financecheck) ;
  5623. ii++;
  5624. rsSt.MoveNext();if(other2salearray.GetSize ()<=ii)break;
  5625. }
  5626. rsSt.Close();other2salearray.SetSize(oldsize+ii , 1 );
  5627. }
  5628. filter="[date]='"+strdate+"'";
  5629. {
  5630. CRecordset myset(g_curdb);
  5631. CString sql="select count(*) as cot from memberview"; if(!filter.IsEmpty ())sql+=" where "+filter;
  5632. myset.Open (CRecordset::forwardOnly, sql);
  5633. myset.GetFieldValue ("cot", sql);
  5634. myset.Close();
  5635. int count=atol(sql);
  5636. int oldsize=memberarray.GetSize ();
  5637. memberarray.SetSize(oldsize+count , 1 );
  5638. memberviewReg rsSt; rsSt.m_pDatabase=g_curdb;if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  5639. rsSt.Open();
  5640. DWORD ii=0;
  5641. while(!rsSt.IsEOF())
  5642. {
  5643. memberarray.ElementAt (oldsize+ii).RemoveAll ();
  5644. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_id) ;
  5645. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_memberno) ;
  5646. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_name) ;
  5647. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_money) ;
  5648. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_date) ;
  5649. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_clerk) ;
  5650. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_financecheck) ;
  5651. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_moneytype) ;
  5652. ii++;
  5653. rsSt.MoveNext();if(memberarray.GetSize ()<=ii)break;
  5654. }
  5655. rsSt.Close();memberarray.SetSize(oldsize+ii , 1 );
  5656. }
  5657. }//
  5658. g_curdb=&g_db;
  5659. CString str;
  5660. int pos=0;
  5661. int dindanshu=0;
  5662. float income=0;
  5663. float incomedd=0;
  5664. float incomebk=0;
  5665. float incomehq=0;
  5666. float incomeqt=0;
  5667. float payout=0;
  5668. for( i=0; i<List11array.GetSize (); i++)
  5669. {
  5670. str=List11array.ElementAt (i).ElementAt (2);
  5671. income+=atof(str);
  5672. // income2+=atof(str);
  5673. if(List11array.ElementAt (i).ElementAt (3)=="预约收款")
  5674. {
  5675. incomedd+=atof(str);
  5676. dindanshu++;
  5677. }
  5678. else if(List11array.ElementAt (i).ElementAt (3)=="预约补款")
  5679. {
  5680. incomebk+=atof(str);
  5681. }
  5682. else
  5683. {
  5684. incomehq+=atof(str);
  5685. }
  5686. pos++;
  5687. }
  5688. for( i=0; i<List2array.GetSize (); i++)
  5689. {
  5690. str=List2array.ElementAt (i).ElementAt (2);
  5691. income+=atof(str);
  5692. /* if(List2array.ElementAt (i).ElementAt (8)!="")
  5693. {
  5694. income2+=atof(str);
  5695. }*/
  5696. if(List2array.ElementAt (i).ElementAt (8)=="")
  5697. {
  5698. incomeqt+=atof(str);
  5699. }
  5700. pos++;
  5701. }
  5702. for( i=0; i<List3array.GetSize (); i++)
  5703. {
  5704. str=List3array.ElementAt (i).ElementAt (2);
  5705. payout+=atof(str);
  5706. pos++;
  5707. }
  5708. for( i=0; i<other2salearray.GetSize (); i++)
  5709. {
  5710. str=other2salearray.ElementAt (i).ElementAt (4);
  5711. income+=atof(str);
  5712. incomehq+=atof(str);
  5713. pos++;
  5714. }
  5715. for( i=0; i<memberarray.GetSize (); i++)
  5716. {
  5717. str=memberarray.ElementAt (i).ElementAt (3);
  5718. income+=atof(str);
  5719. pos++;
  5720. }
  5721. CTime tm=CTime::GetCurrentTime ();
  5722. CString content=msgcompanyname+tm.Format ("%Y-%m-%d");
  5723. content+="财报:";
  5724. str.Format ("%d", (int)income);
  5725. ::ConvertToPrice (str);
  5726. content+="收:"+str;
  5727. str.Format ("%d", (int)incomedd);
  5728. ::ConvertToPrice (str);
  5729. content+="定:"+str;
  5730. str.Format ("%d", (int)incomebk);
  5731. ::ConvertToPrice (str);
  5732. content+="补:"+str;
  5733. str.Format ("%d", (int)incomehq);
  5734. ::ConvertToPrice (str);
  5735. content+="后:"+str;
  5736. str.Format ("%d", (int)incomeqt);
  5737. ::ConvertToPrice (str);
  5738. content+="其它:"+str;
  5739. str.Format ("%d", (int)payout);
  5740. ::ConvertToPrice (str);
  5741. content+="支出:"+str;
  5742. str.Format ("%d", (int)(income-payout));
  5743. ::ConvertToPrice (str);
  5744. content+="净收:"+str;
  5745. str.Format ("%d", dindanshu);
  5746. content+="定单:"+str;
  5747. if(msgaccount!="")
  5748. {
  5749. if(atoi(balance)<200)
  5750. {
  5751. content+="您的余额小于两百条,请及时充值。联系电话4006067068";
  5752. }
  5753. else if(atoi(balance)<500)
  5754. {
  5755. content+="您的余额小于五百条,请及时充值。联系电话4006067068";
  5756. }
  5757. else if(atoi(balance)<800)
  5758. {
  5759. content+="您的余额小于八百条,请及时充值。联系电话4006067068";
  5760. }
  5761. else if(atoi(balance)<1000)
  5762. {
  5763. content+="您的余额小于一千条,请及时充值。联系电话4006067068";
  5764. }
  5765. }
  5766. int count=GetLengthEx(content)/MSG_LENGTH;
  5767. if(GetLengthEx(content)%MSG_LENGTH)
  5768. count++;
  5769. int phonenum=0;
  5770. phonenum=1;
  5771. count*=phonenum;
  5772. CString scount;
  5773. scount.Format ("%d", count);
  5774. CString timestamp=tm.Format ("%Y%m%d%H%M%S");
  5775. for( i=0; i<1; i++)
  5776. {
  5777. sql="insert into sendreg([phones],[content],[timestamp],[msgcount],[status],[issended],[isautosend],[ren]) values('"+array.ElementAt (i)+"','"+content+"','"+timestamp+"','"+scount+"','0','0','0','系统自动发送')";
  5778. MyExecuteSQL (&g_db, sql);
  5779. }
  5780. }
  5781. }
  5782. /////////////
  5783. if(atoi(msgcheck4) && msgphones!="")
  5784. {//发老板短信
  5785. if(atoi(msgtime)<=CTime::GetCurrentTime ().GetHour ())
  5786. {
  5787. MyLock lock("dbaccessxiao");
  5788. CString timestamp;
  5789. timestamp=CTime::GetCurrentTime ().Format ("%Y%m%d");
  5790. timestamp+="%";
  5791. CRecordset myset(g_curdb);
  5792. CString sql="select count(*) as cot from sendreg where [timestamp] like '"+timestamp+"' and [phones]='"+msgphones+"' and [isautosend]='3'";
  5793. myset.Open (CRecordset::forwardOnly, sql);
  5794. myset.GetFieldValue ("cot", sql);
  5795. myset.Close();
  5796. int count=atol(sql);
  5797. if(count==0)
  5798. {
  5799. CArray<CStringArray, CStringArray>List11array;
  5800. CArray<CStringArray, CStringArray>List2array;
  5801. CArray<CStringArray, CStringArray>List3array;
  5802. CArray<CStringArray, CStringArray>other2salearray;
  5803. CArray<CStringArray, CStringArray>memberarray;
  5804. CString strdate=CTime::GetCurrentTime ().Format ("%Y-%m-%d");
  5805. CArray<CDatabase*,CDatabase*>dbarraytemp;
  5806. dbarraytemp.Copy(g_dbHistoryArray);
  5807. while(dbarraytemp.GetSize()>1)
  5808. {
  5809. int last=dbarraytemp.GetSize()-1;
  5810. dbarraytemp.RemoveAt(last);
  5811. }
  5812. dbarraytemp.InsertAt(0, &g_db);
  5813. for(int a=dbarraytemp.GetSize ()-1; a>=0; a--)
  5814. {
  5815. g_curdb=dbarraytemp.ElementAt (a);
  5816. CString filter="[dat]='"+strdate+"'";
  5817. filter="[dat]='"+strdate+"' and ([sale2type] is null or [sale2type]='')";
  5818. {
  5819. CRecordset myset(g_curdb);
  5820. CString sql="select count(*) as cot from singleincome";if(!filter.IsEmpty ())sql+=" where "+filter;
  5821. myset.Open (CRecordset::forwardOnly, sql);
  5822. myset.GetFieldValue ("cot", sql);
  5823. myset.Close();
  5824. int count=atol(sql);
  5825. int oldsize=List2array.GetSize ();
  5826. List2array.SetSize(oldsize+count , 1 );
  5827. CRstIncomeInput rsSt; rsSt.m_pDatabase=g_curdb; if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  5828. rsSt.Open();
  5829. int ii=0;
  5830. while(!rsSt.IsEOF())
  5831. {
  5832. List2array.ElementAt (oldsize+ii).RemoveAll ();
  5833. List2array.ElementAt (oldsize+ii).Add(rsSt.id) ;
  5834. List2array.ElementAt (oldsize+ii).Add(rsSt.name) ;
  5835. List2array.ElementAt (oldsize+ii).Add(rsSt.money) ;
  5836. List2array.ElementAt (oldsize+ii).Add(rsSt.date) ;
  5837. List2array.ElementAt (oldsize+ii).Add(rsSt.renyuan1) ;
  5838. List2array.ElementAt (oldsize+ii).Add(rsSt.renyuan2) ;
  5839. List2array.ElementAt (oldsize+ii).Add(rsSt.renyuan3) ;
  5840. List2array.ElementAt (oldsize+ii).Add(rsSt.bz) ;
  5841. List2array.ElementAt (oldsize+ii).Add(rsSt.sale2type) ;
  5842. ii++;
  5843. rsSt.MoveNext();if(List2array.GetSize ()<=ii)break;
  5844. }
  5845. rsSt.Close();List2array.SetSize(oldsize+ii , 1 );
  5846. }
  5847. filter="[dat]='"+strdate+"'";
  5848. {
  5849. CRecordset myset(g_curdb);
  5850. CString sql="select count(*) as cot from gudingfeiyong";if(!filter.IsEmpty ())sql+=" where "+filter;
  5851. myset.Open (CRecordset::forwardOnly, sql);
  5852. myset.GetFieldValue ("cot", sql);
  5853. myset.Close();
  5854. int count=atol(sql);
  5855. int oldsize=List3array.GetSize ();
  5856. List3array.SetSize(oldsize+count , 1 );
  5857. CRstPayOutInput rsSt; rsSt.m_pDatabase=g_curdb; if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  5858. rsSt.Open();
  5859. int ii=0;
  5860. while(!rsSt.IsEOF())
  5861. {
  5862. List3array.ElementAt (oldsize+ii).RemoveAll ();
  5863. List3array.ElementAt (oldsize+ii).Add(rsSt.id) ;
  5864. List3array.ElementAt (oldsize+ii).Add(rsSt.name) ;
  5865. List3array.ElementAt (oldsize+ii).Add(rsSt.money) ;
  5866. List3array.ElementAt (oldsize+ii).Add(rsSt.date) ;
  5867. List3array.ElementAt (oldsize+ii).Add(rsSt.renyuan1) ;
  5868. List3array.ElementAt (oldsize+ii).Add(rsSt.renyuan2) ;
  5869. List3array.ElementAt (oldsize+ii).Add(rsSt.bz) ;
  5870. ii++;
  5871. rsSt.MoveNext();if(List3array.GetSize ()<=ii)break;
  5872. }
  5873. rsSt.Close();List3array.SetSize(oldsize+ii , 1 );
  5874. }
  5875. filter="[date]='"+strdate+"'";
  5876. {
  5877. CRecordset myset(g_curdb);
  5878. CString sql="select count(*) as cot from dindanbukuan";if(!filter.IsEmpty ())sql+=" where "+filter;
  5879. myset.Open (CRecordset::forwardOnly, sql);
  5880. myset.GetFieldValue ("cot", sql);
  5881. myset.Close();
  5882. int count=atol(sql);
  5883. int oldsize=List11array.GetSize ();
  5884. List11array.SetSize(oldsize+count , 1 );
  5885. CRstBuKuan rsSt; rsSt.m_pDatabase=g_curdb; if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  5886. rsSt.Open();
  5887. int ii=0;
  5888. while(!rsSt.IsEOF())
  5889. {
  5890. List11array.ElementAt (oldsize+ii).RemoveAll ();
  5891. List11array.ElementAt (oldsize+ii).Add(rsSt.m_id) ;
  5892. List11array.ElementAt (oldsize+ii).Add(rsSt.m_ren) ;
  5893. List11array.ElementAt (oldsize+ii).Add(rsSt.m_money) ;
  5894. List11array.ElementAt (oldsize+ii).Add(rsSt.m_bz) ;
  5895. List11array.ElementAt (oldsize+ii).Add(rsSt.m_kind) ;
  5896. List11array.ElementAt (oldsize+ii).Add(rsSt.m_date) ;
  5897. List11array.ElementAt(oldsize + ii).Add(rsSt.paytype);
  5898. ii++;
  5899. rsSt.MoveNext();if(List11array.GetSize ()<=ii)break;
  5900. }
  5901. rsSt.Close();List11array.SetSize(oldsize+ii , 1 );
  5902. }
  5903. filter="[date]='"+strdate+"'";
  5904. {
  5905. CRecordset myset(g_curdb);
  5906. CString sql="select count(*) as cot from singleincomemoneyview";if(!filter.IsEmpty ())sql+=" where "+filter;
  5907. myset.Open (CRecordset::forwardOnly, sql);
  5908. myset.GetFieldValue ("cot", sql);
  5909. myset.Close();
  5910. int count=atol(sql);
  5911. int oldsize=other2salearray.GetSize ();
  5912. other2salearray.SetSize(oldsize+count , 1 );
  5913. CRstsingleincomemoneyview rsSt; rsSt.m_pDatabase=g_curdb;if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  5914. rsSt.Open();
  5915. int ii=0;
  5916. while(!rsSt.IsEOF())
  5917. {
  5918. other2salearray.ElementAt (oldsize+ii).RemoveAll ();
  5919. other2salearray.ElementAt (oldsize+ii).Add(rsSt.name) ;
  5920. other2salearray.ElementAt (oldsize+ii).Add(rsSt.renyuan1) ;
  5921. other2salearray.ElementAt (oldsize+ii).Add(rsSt.renyuan3) ;
  5922. other2salearray.ElementAt (oldsize+ii).Add(rsSt.sale2type) ;
  5923. other2salearray.ElementAt (oldsize+ii).Add(rsSt.money) ;
  5924. other2salearray.ElementAt (oldsize+ii).Add(rsSt.date) ;
  5925. other2salearray.ElementAt (oldsize+ii).Add(rsSt.clerk) ;
  5926. other2salearray.ElementAt (oldsize+ii).Add(rsSt.paytype) ;
  5927. other2salearray.ElementAt (oldsize+ii).Add(rsSt.autoid) ;
  5928. other2salearray.ElementAt (oldsize+ii).Add(rsSt.financecheck) ;
  5929. ii++;
  5930. rsSt.MoveNext();if(other2salearray.GetSize ()<=ii)break;
  5931. }
  5932. rsSt.Close();other2salearray.SetSize(oldsize+ii , 1 );
  5933. }
  5934. filter="[date]='"+strdate+"'";
  5935. {
  5936. CRecordset myset(g_curdb);
  5937. CString sql="select count(*) as cot from memberview"; if(!filter.IsEmpty ())sql+=" where "+filter;
  5938. myset.Open (CRecordset::forwardOnly, sql);
  5939. myset.GetFieldValue ("cot", sql);
  5940. myset.Close();
  5941. int count=atol(sql);
  5942. int oldsize=memberarray.GetSize ();
  5943. memberarray.SetSize(oldsize+count , 1 );
  5944. memberviewReg rsSt; rsSt.m_pDatabase=g_curdb;if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  5945. rsSt.Open();
  5946. DWORD ii=0;
  5947. while(!rsSt.IsEOF())
  5948. {
  5949. memberarray.ElementAt (oldsize+ii).RemoveAll ();
  5950. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_id) ;
  5951. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_memberno) ;
  5952. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_name) ;
  5953. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_money) ;
  5954. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_date) ;
  5955. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_clerk) ;
  5956. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_financecheck) ;
  5957. memberarray.ElementAt (oldsize+ii).Add(rsSt.m_moneytype) ;
  5958. ii++;
  5959. rsSt.MoveNext();if(memberarray.GetSize ()<=ii)break;
  5960. }
  5961. rsSt.Close();memberarray.SetSize(oldsize+ii , 1 );
  5962. }
  5963. }//
  5964. g_curdb=&g_db;
  5965. CString str;
  5966. int pos=0;
  5967. int dindanshu=0;
  5968. float income=0;
  5969. float incomedd=0;
  5970. float incomebk=0;
  5971. float incomehq=0;
  5972. float incomeqt=0;
  5973. float fStoredCardSpending = 0.0; // 储值卡扣款
  5974. float payout=0;
  5975. int i = 0;
  5976. for(/*int*/ i=0; i<List11array.GetSize (); i++)
  5977. {
  5978. str=List11array.ElementAt (i).ElementAt (2);
  5979. income+=atof(str);
  5980. // income2+=atof(str);
  5981. if(List11array.ElementAt (i).ElementAt (3)=="预约收款")
  5982. {
  5983. incomedd+=atof(str);
  5984. dindanshu++;
  5985. }
  5986. else if(List11array.ElementAt (i).ElementAt (3)=="预约补款")
  5987. {
  5988. incomebk+=atof(str);
  5989. }
  5990. else
  5991. {
  5992. incomehq+=atof(str);
  5993. }
  5994. #if JEFF_TEST_ON // 去除储值卡扣费;
  5995. if (List11array.ElementAt(i).ElementAt(6) == "储值卡扣款")
  5996. {
  5997. fStoredCardSpending += atof(str);
  5998. }
  5999. #endif
  6000. pos++;
  6001. }
  6002. for( i=0; i<List2array.GetSize (); i++)
  6003. {
  6004. str=List2array.ElementAt (i).ElementAt (2);
  6005. income+=atof(str);
  6006. /* if(List2array.ElementAt (i).ElementAt (8)!="")
  6007. {
  6008. income2+=atof(str);
  6009. }*/
  6010. if(List2array.ElementAt (i).ElementAt (8)=="")
  6011. {
  6012. incomeqt+=atof(str);
  6013. }
  6014. pos++;
  6015. }
  6016. for( i=0; i<List3array.GetSize (); i++)
  6017. {
  6018. str=List3array.ElementAt (i).ElementAt (2);
  6019. payout+=atof(str);
  6020. pos++;
  6021. }
  6022. for( i=0; i<other2salearray.GetSize (); i++)
  6023. {
  6024. str=other2salearray.ElementAt (i).ElementAt (4);
  6025. income+=atof(str);
  6026. incomehq+=atof(str);
  6027. pos++;
  6028. }
  6029. for( i=0; i<memberarray.GetSize (); i++)
  6030. {
  6031. str=memberarray.ElementAt (i).ElementAt (3);
  6032. income+=atof(str);
  6033. pos++;
  6034. }
  6035. CTime tm=CTime::GetCurrentTime ();
  6036. CString content=msgcompanyname+tm.Format ("%Y-%m-%d");
  6037. content+="财报:";
  6038. income -= fStoredCardSpending;
  6039. str.Format("%d", (int)(income)); // 去除储值卡扣款;
  6040. ::ConvertToPrice (str);
  6041. content+="收:"+str;
  6042. str.Format ("%d", (int)incomedd);
  6043. ::ConvertToPrice (str);
  6044. content+="定:"+str;
  6045. str.Format ("%d", (int)incomebk);
  6046. ::ConvertToPrice (str);
  6047. content+="补:"+str;
  6048. str.Format ("%d", (int)incomehq);
  6049. ::ConvertToPrice (str);
  6050. content+="后:"+str;
  6051. str.Format ("%d", (int)incomeqt);
  6052. ::ConvertToPrice (str);
  6053. content+="其它:"+str;
  6054. str.Format ("%d", (int)payout);
  6055. ::ConvertToPrice (str);
  6056. content+="支出:"+str;
  6057. str.Format ("%d", (int)(income-payout));
  6058. ::ConvertToPrice (str);
  6059. content+="净收:"+str;
  6060. str.Format ("%d", dindanshu);
  6061. content+="定单:"+str;
  6062. if(msgaccount!="")
  6063. {
  6064. if(atoi(balance)<200)
  6065. {
  6066. content+="您的余额小于两百条,请及时充值。联系电话4006067068";
  6067. }
  6068. else if(atoi(balance)<500)
  6069. {
  6070. content+="您的余额小于五百条,请及时充值。联系电话4006067068";
  6071. }
  6072. else if(atoi(balance)<800)
  6073. {
  6074. content+="您的余额小于八百条,请及时充值。联系电话4006067068";
  6075. }
  6076. else if(atoi(balance)<1000)
  6077. {
  6078. content+="您的余额小于一千条,请及时充值。联系电话4006067068";
  6079. }
  6080. }
  6081. int count=GetLengthEx(content)/MSG_LENGTH;
  6082. if(GetLengthEx(content)%MSG_LENGTH)
  6083. count++;
  6084. int phonenum=0;
  6085. str=msgphones;
  6086. pos=str.Find (",");
  6087. if(pos!=-1)
  6088. {
  6089. while(pos!=-1)
  6090. {
  6091. phonenum++;
  6092. str=str.Right (str.GetLength ()-pos-1);
  6093. pos=str.Find (",");
  6094. }
  6095. phonenum++;
  6096. }
  6097. else
  6098. phonenum=1;
  6099. count*=phonenum;
  6100. CString scount;
  6101. scount.Format ("%d", count);
  6102. timestamp=tm.Format ("%Y%m%d%H%M%S");
  6103. sql="insert into sendreg([phones],[content],[timestamp],[msgcount],[status],[issended],[isautosend],[ren]) values('"+msgphones+"','"+content+"','"+timestamp+"','"+scount+"','0','0','3','系统自动发送')";
  6104. MyExecuteSQL (&g_db, sql);
  6105. }
  6106. }
  6107. }
  6108. BOOL bcheck1=atoi(m_bak1);
  6109. BOOL bcheck2=atoi(m_bak2);
  6110. BOOL bcheck3=atoi(m_bak3);
  6111. BOOL bcheck4=atoi(m_bak4);
  6112. int hour;
  6113. hour=CTime::GetCurrentTime ().GetHour ();
  6114. // Jeff.这里不合理.如果条件不成立,那当天的数据就不会执行。存在一定安全问题。
  6115. if(atoi(m_baktime)<=hour)
  6116. {
  6117. CStdioFile fp;
  6118. if(fp.Open (g_mainpath+"\\log.txt", CFile::modeRead))
  6119. {
  6120. CString date;
  6121. fp.ReadString (date);
  6122. date.TrimRight ("\r\n");
  6123. if(date==CTime::GetCurrentTime ().Format ("%Y-%m-%d"))
  6124. {
  6125. fp.Close ();
  6126. return;
  6127. }
  6128. fp.Close ();
  6129. }
  6130. if(g_bConvertHisAll)
  6131. {
  6132. WriteLogin("转历史数据中, 备份退出");
  6133. return;
  6134. }
  6135. g_bakdate=CTime::GetCurrentTime ().Format ("%Y-%m-%d");
  6136. KillTimer(4);
  6137. WriteLogin("备份开始...");
  6138. AutoDelPhoto();
  6139. AutoDelBakPhoto();
  6140. LoadThumbImages2();
  6141. }
  6142. }
  6143. catch(...)
  6144. {
  6145. WriteLogin("出错在函数bakphoto中");
  6146. }
  6147. }
  6148. void CDBServerDlg::ShutDown() //Jeff:备份完毕后执行的关机函数;
  6149. {
  6150. try
  6151. {
  6152. g_curdb=&g_db;
  6153. CString m_bak6;
  6154. {
  6155. CRecordset myset(g_curdb);
  6156. CString sql="select * from [version]";
  6157. myset.Open (CRecordset::forwardOnly, sql);
  6158. myset.GetFieldValue ("bak6", m_bak6);
  6159. myset.Close();
  6160. }
  6161. OnServerStop(); // 停止服务;
  6162. // Jeff.关闭数据库连接,若关机前关闭了数据库的连接,则客户端进行订单无法实现数据库的操作;
  6163. // Jeff.在关机前,不能关闭数据库连接;
  6164. g_db.Close ();
  6165. for(int i=0;i<g_dbHistoryArray.GetSize (); i++)
  6166. {
  6167. g_dbHistoryArray.ElementAt (i)->Close ();
  6168. delete g_dbHistoryArray.ElementAt (i);
  6169. }
  6170. ReleaseBranchDB();
  6171. WriteLogin("备份完成");
  6172. while(m_bRunning)
  6173. {
  6174. ::Sleep (1000);
  6175. }
  6176. ////////////////
  6177. g_tisks=::GetTickCount()-g_tisks;
  6178. CString str;
  6179. str.Format ("耗时:%d分钟", g_tisks/60000);
  6180. CStdioFile fp;
  6181. fp.Open (g_mainpath+"\\log.txt", CFile::modeCreate|CFile::modeWrite);
  6182. CTime tm=CTime::GetCurrentTime ();
  6183. if(0)//tm.GetHour ()<5)
  6184. {
  6185. CTimeSpan sp(1, 0, 0, 0);
  6186. tm-=sp;
  6187. fp.WriteString (tm.Format ("%Y-%m-%d"));
  6188. fp.WriteString ("\r\n");
  6189. fp.WriteString (CTime::GetCurrentTime ().Format ("%Y-%m-%d %H:%M:%S"));
  6190. fp.WriteString (str);
  6191. }
  6192. else
  6193. {
  6194. fp.WriteString (g_bakdate);
  6195. fp.WriteString ("\r\n");
  6196. fp.WriteString (tm.Format ("%Y-%m-%d %H:%M:%S"));
  6197. fp.WriteString (str);
  6198. }
  6199. fp.WriteString ("\r\n");
  6200. fp.WriteString (g_bakinfo);
  6201. fp.WriteString ("\r\n");
  6202. fp.WriteString (g_bakphoto);
  6203. fp.Close ();
  6204. // OnButton3();
  6205. // Jeff.备份完成后自动关机;
  6206. if(atoi(m_bak6))
  6207. {
  6208. #if 1
  6209. // Jeff.关闭运行中的线程;
  6210. TerminateThread();
  6211. TerminateThread2();
  6212. // Jeff.关闭AutoRun.exe程序;
  6213. DWORD id=FindAppProcessID("AutoRun.exe");
  6214. if(id!=-1)
  6215. {
  6216. HANDLE ProcessHandle=OpenProcess(PROCESS_ALL_ACCESS,FALSE,id);
  6217. if(ProcessHandle)TerminateProcess(ProcessHandle,0);
  6218. }
  6219. // Jeff.移除托盘图标;
  6220. m_TrayIcon.RemoveIcon();
  6221. if(g_pSkinData)delete []g_pSkinData;g_pSkinData=NULL;
  6222. // Jeff.关闭计算机;
  6223. MyExitWindows();
  6224. #else // Jeff.开启定时关机功能;
  6225. SetTimer(11,60000,NULL);// 1分钟检测一次是否到达关机时间;
  6226. #endif
  6227. }
  6228. else//重启
  6229. {
  6230. TerminateThread();
  6231. TerminateThread2();
  6232. m_TrayIcon.RemoveIcon();
  6233. if(g_pSkinData)
  6234. delete []g_pSkinData;
  6235. g_pSkinData=NULL;
  6236. WriteLogin("备份完成,服务器重启");
  6237. CDialog::OnCancel ();
  6238. }
  6239. }
  6240. catch(...)
  6241. {
  6242. WriteLogin("出错在函数shutdown中");
  6243. }
  6244. }
  6245. void CDBServerDlg::MyExitWindows()
  6246. {
  6247. try
  6248. {
  6249. UINT t=EWX_SHUTDOWN|EWX_FORCE;
  6250. OSVERSIONINFO osv; //定义一个操作系统信息的结构体
  6251. osv.dwOSVersionInfoSize=sizeof OSVERSIONINFO;
  6252. GetVersionEx(&osv); //查询当前操作系统
  6253. if(osv.dwPlatformId==VER_PLATFORM_WIN32_NT) //判断是否是2000/NT
  6254. {
  6255. //下面为向操作系统获取权限操作
  6256. HANDLE hProcess,hToken;
  6257. TOKEN_PRIVILEGES Privileges;
  6258. LUID luid;
  6259. hProcess=GetCurrentProcess();
  6260. //下面为打开当前进程对话
  6261. OpenProcessToken(hProcess,TOKEN_ADJUST_PRIVILEGES,&hToken);
  6262. Privileges.PrivilegeCount=1;
  6263. LookupPrivilegeValue(NULL,SE_SHUTDOWN_NAME,&luid);
  6264. Privileges.Privileges[0].Luid=luid;
  6265. Privileges.Privileges[0].Attributes=SE_PRIVILEGE_ENABLED;
  6266. AdjustTokenPrivileges(hToken,FALSE,&Privileges,NULL,NULL,NULL);
  6267. ExitWindowsEx(t,0);
  6268. }
  6269. else
  6270. {
  6271. ExitWindowsEx(t,0);//调用ExitWindowsEx关闭机器。
  6272. PostQuitMessage(0);
  6273. }
  6274. }
  6275. catch(...)
  6276. {
  6277. WriteLogin("出错在函数exitwindows中");
  6278. }
  6279. }
  6280. void CDBServerDlg::OnAutorun()
  6281. {
  6282. // TODO: Add your command handler code here
  6283. g_bAutoRun=!g_bAutoRun;
  6284. CString version = _T ("Version 1.0");
  6285. AfxGetApp()->WriteProfileInt (version, "brun", g_bAutoRun);
  6286. TCHAR szKey[MAX_PATH];
  6287. HKEY hKey=0;
  6288. DWORD disp=0;
  6289. lstrcpy(szKey,"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run");
  6290. if(g_bAutoRun)
  6291. {
  6292. int lResult=RegCreateKeyEx(HKEY_LOCAL_MACHINE,szKey,0,NULL,REG_OPTION_VOLATILE, KEY_ALL_ACCESS,NULL,&hKey,&disp);
  6293. if(lResult==ERROR_SUCCESS)
  6294. {
  6295. TCHAR szDir[MAX_PATH];
  6296. ::GetModuleFileName (NULL, szDir, MAX_PATH);
  6297. lResult=RegSetValueEx(hKey,"YLGLDBSERVER",0,REG_SZ,(const unsigned char*)szDir,lstrlen(szDir));
  6298. RegCloseKey(hKey);
  6299. }
  6300. }
  6301. else
  6302. {
  6303. int lResult=RegCreateKeyEx(HKEY_LOCAL_MACHINE,szKey,0,NULL,REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS,NULL,&hKey,&disp);
  6304. if(lResult==ERROR_SUCCESS)
  6305. {
  6306. RegDeleteValue(hKey,"YLGLDBSERVER");
  6307. RegDeleteKey (hKey,"YLGLDBSERVER");
  6308. RegCloseKey(hKey);
  6309. }
  6310. }
  6311. }
  6312. void CDBServerDlg::GetFileDate()
  6313. {
  6314. CStringArray filesarray;
  6315. CStringArray filesarray2;
  6316. filesarray.Add ("AutoUpdate.exe");
  6317. filesarray.Add ("skin\\1.lia");
  6318. filesarray.Add ("skin\\2.lia");
  6319. filesarray.Add ("skin\\3.lia");
  6320. filesarray.Add ("skin\\4.lia");
  6321. filesarray.Add ("skin\\10.lia");
  6322. filesarray.Add ("skin\\logo.jpg");
  6323. filesarray.Add ("skin\\标题-选片.jpg");
  6324. filesarray.Add ("skin\\标题-看设计.jpg");
  6325. filesarray.Add ("图片\\欢迎.jpg");
  6326. filesarray.Add ("图片\\连接.jpg");
  6327. filesarray.Add ("图片\\标题.jpg");
  6328. filesarray.Add ("图片\\背景.jpg");
  6329. filesarray.Add ("图片-红色风格\\欢迎.jpg");
  6330. filesarray.Add ("图片-红色风格\\连接.jpg");
  6331. filesarray.Add ("图片-红色风格\\标题.jpg");
  6332. filesarray.Add ("图片-红色风格\\背景.jpg");
  6333. filesarray.Add ("图片-红色风格\\选片.jpg");
  6334. filesarray.Add ("图片-红色风格\\看设计.jpg");
  6335. filesarray.Add ("skin\\1-red.lia");
  6336. filesarray.Add ("skin\\2-red.lia");
  6337. filesarray.Add ("skin\\10-red.lia");
  6338. filesarray.Add ("skin\\6.lia");
  6339. filesarray.Add ("图片\\掌中宝.jpg");
  6340. filesarray.Add ("regsvr32.exe");
  6341. ///////////////
  6342. filesarray2.Add ("AutoUpdate.exe");
  6343. filesarray2.Add ("skin\\1.lia");
  6344. filesarray2.Add ("skin\\2.lia");
  6345. filesarray2.Add ("skin\\3.lia");
  6346. filesarray2.Add ("skin\\4.lia");
  6347. filesarray2.Add ("skin\\5.lia");
  6348. filesarray2.Add ("skin\\10.lia");
  6349. filesarray2.Add ("skin\\5-red.lia");
  6350. filesarray2.Add ("skin\\10-red.lia");
  6351. filesarray2.Add ("图片\\logo.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 ("图片\\背景.jpg");
  6360. filesarray2.Add ("图片-红色风格\\欢迎.jpg");
  6361. filesarray2.Add ("图片-红色风格\\连接.jpg");
  6362. filesarray2.Add ("图片-红色风格\\标题.jpg");
  6363. filesarray2.Add ("图片-红色风格\\背景.jpg");
  6364. filesarray2.Add ("skin\\6.lia");
  6365. filesarray2.Add ("图片\\掌中宝.jpg");
  6366. filesarray2.Add ("regsvr32.exe");
  6367. int i = 0;
  6368. for(/*int*/ i=0; i<filesarray.GetSize (); i++)
  6369. {
  6370. g_filedatearray.Add (GetModifyTime(g_mainpath+"\\系统文件\\"+filesarray.ElementAt (i)));
  6371. }
  6372. g_filedatearraynew.Copy(filesarray2);
  6373. for( i=0; i<filesarray2.GetSize (); i++)
  6374. {
  6375. g_filedatearraynew.Add (GetFileSize(g_mainpath+"\\系统文件\\"+filesarray2.ElementAt (i)));
  6376. }
  6377. }
  6378. //extern CString g_sdomain;
  6379. #ifdef ENTERPRISE_VERSION
  6380. CString g_bMain;
  6381. #endif
  6382. void CDBServerDlg::LoadBranchInfo()
  6383. {
  6384. #ifdef ENTERPRISE_VERSION
  6385. try
  6386. {
  6387. ReleaseBranchDB();
  6388. CArray<CStringArray, CStringArray>g_List1array;
  6389. {
  6390. MyLock lock("savebranchinfo");
  6391. CFile fp;
  6392. CString path=g_mainpath+"\\branchinfo.dat";
  6393. if(::PathFileExists (path)==0)
  6394. {
  6395. return;
  6396. }
  6397. fp.Open (path, CFile::modeRead);
  6398. DWORD leng=fp.GetLength ();
  6399. if(leng<sizeof(DWORD)*2)
  6400. {
  6401. fp.Close ();return;
  6402. }
  6403. DWORD flag;
  6404. fp.Seek(-sizeof(DWORD),CFile::end);
  6405. fp.Read (&flag, sizeof(DWORD));
  6406. if(flag!=889900)
  6407. {
  6408. fp.Close ();return;
  6409. }
  6410. fp.SeekToBegin ();
  6411. DWORD arraysize;
  6412. fp.Read (&arraysize, sizeof(DWORD));
  6413. if(arraysize>20)
  6414. {
  6415. fp.Close ();
  6416. return;
  6417. }
  6418. BYTE *pData=new BYTE[leng-sizeof(DWORD)];
  6419. fp.Read (pData,leng-sizeof(DWORD));
  6420. fp.Close ();
  6421. CMemFile memfile;
  6422. memfile.Attach (pData,leng-sizeof(DWORD));
  6423. CArchive ar(&memfile, CArchive::load);
  6424. g_List1array.SetSize(arraysize, 1);
  6425. for(int ii=0; ii<g_List1array.GetSize (); ii++)
  6426. {
  6427. g_List1array.ElementAt (ii).Serialize (ar);
  6428. }
  6429. ar.Close();
  6430. memfile.Detach ();
  6431. delete []pData;
  6432. }
  6433. if(g_List1array.GetSize()==0)return;
  6434. // SoftKey ytSoftKey;
  6435. // if(ytSoftKey.Ini()==0)
  6436. {
  6437. long value[8];
  6438. double f[8];
  6439. 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("");
  6440. //运行自定义函数
  6441. int ret=ytSoftKey.getdata(&value[0],&value[1],&value[2],&value[3],&value[4],&value[5],&value[6],&value[7],
  6442. &f[0],&f[1],&f[2],&f[3],&f[4],&f[5],&f[6],&f[7],
  6443. s0,s1,s2,s3,s4,s5,s6,s7);
  6444. if(ret!=0 && ret!=-43)
  6445. {
  6446. g_sdomain="";
  6447. }
  6448. else
  6449. g_sdomain=s1;
  6450. }
  6451. int i = 0;
  6452. CString str,str2,localname,rights;
  6453. for(/*int*/ i=0; i<g_List1array.GetSize (); i++)
  6454. {
  6455. if(g_sdomain==g_List1array.ElementAt (i).ElementAt (0))
  6456. {
  6457. if(g_List1array.ElementAt (i).GetSize ()>5)
  6458. rights=g_List1array.ElementAt (i).ElementAt (5);break;
  6459. }
  6460. }
  6461. for( i=0; i<g_List1array.GetSize (); i++)
  6462. {
  6463. CString branchname=g_List1array.ElementAt (i).ElementAt (1);
  6464. CString branchip=g_List1array.ElementAt (i).ElementAt (2);
  6465. CString domain=g_List1array.ElementAt (i).ElementAt (0);
  6466. CString dir=g_mainpath+"\\数据\\"+branchname;
  6467. if(g_sdomain==g_List1array.ElementAt (i).ElementAt (0))
  6468. {
  6469. localname=branchname;
  6470. g_bMain=g_List1array.ElementAt (i).ElementAt (3);
  6471. continue;
  6472. }
  6473. CString branchname2=","+branchname+",";
  6474. if(rights.Find (branchname2)==-1)continue;
  6475. #ifdef SQLSERVER_VERSION
  6476. if(1)//::PathFileExists (dir))
  6477. {
  6478. /////////////////////////
  6479. g_branchdbarray.Add (NULL);
  6480. g_branchnamearray.Add (branchname);
  6481. g_branchdb2array.Add (NULL);
  6482. g_branchname2array.Add (branchname);
  6483. g_branchiparray.Add (branchip);
  6484. g_branchdomainarray.Add (domain);
  6485. }
  6486. #endif
  6487. }
  6488. g_branchdbarray.Add (NULL);
  6489. g_branchnamearray.Add (localname);
  6490. g_branchiparray.Add ("xxx");
  6491. g_branchdomainarray.Add (g_sdomain);
  6492. }
  6493. catch(...)
  6494. {
  6495. }
  6496. #endif
  6497. }
  6498. void CDBServerDlg::ReleaseBranchDB()
  6499. {
  6500. #ifdef ENTERPRISE_VERSION
  6501. try
  6502. {
  6503. for(int i=0;i<g_branchdbarray.GetSize (); i++)
  6504. {
  6505. if(g_branchdbarray.ElementAt (i))
  6506. {
  6507. g_branchdbarray.ElementAt (i)->Close ();
  6508. delete g_branchdbarray.ElementAt (i);
  6509. }
  6510. }
  6511. g_branchdbarray.RemoveAll();
  6512. g_branchdb2array.RemoveAll();
  6513. g_branchnamearray.RemoveAll();
  6514. g_branchname2array.RemoveAll();
  6515. g_branchiparray.RemoveAll();
  6516. g_branchdomainarray.RemoveAll();
  6517. }
  6518. catch(...)
  6519. {
  6520. WriteLogin("ReleaseBranchDB出错");
  6521. }
  6522. #endif
  6523. }
  6524. //savebranchinfo
  6525. void CDBServerDlg::LoadBranchInfo2()
  6526. {
  6527. #ifdef ENTERPRISE_VERSION
  6528. try
  6529. {
  6530. ReleaseBranchDB();
  6531. CArray<CStringArray, CStringArray>g_List1array;
  6532. {
  6533. MyLock lock("savebranchinfo");
  6534. CFile fp;
  6535. CString path=g_mainpath+"\\branchinfo.dat";
  6536. if(::PathFileExists (path)==0)
  6537. {
  6538. return;
  6539. }
  6540. fp.Open (path, CFile::modeRead);
  6541. DWORD leng=fp.GetLength ();
  6542. if(leng<sizeof(DWORD)*2)
  6543. {
  6544. fp.Close ();return;
  6545. }
  6546. DWORD flag;
  6547. fp.Seek(-sizeof(DWORD),CFile::end);
  6548. fp.Read (&flag, sizeof(DWORD));
  6549. if(flag!=889900)
  6550. {
  6551. fp.Close ();return;
  6552. }
  6553. fp.SeekToBegin ();
  6554. DWORD arraysize;
  6555. fp.Read (&arraysize, sizeof(DWORD));
  6556. if(arraysize>20)
  6557. {
  6558. fp.Close ();
  6559. return;
  6560. }
  6561. BYTE *pData=new BYTE[leng-sizeof(DWORD)];
  6562. fp.Read (pData,leng-sizeof(DWORD));
  6563. fp.Close ();
  6564. CMemFile memfile;
  6565. memfile.Attach (pData,leng-sizeof(DWORD));
  6566. CArchive ar(&memfile, CArchive::load);
  6567. g_List1array.SetSize(arraysize, 1);
  6568. for(int ii=0; ii<g_List1array.GetSize (); ii++)
  6569. {
  6570. g_List1array.ElementAt (ii).Serialize (ar);
  6571. }
  6572. ar.Close();
  6573. memfile.Detach ();
  6574. delete []pData;
  6575. }
  6576. if(g_List1array.GetSize()==0)return;
  6577. // SoftKey ytSoftKey;
  6578. // if(ytSoftKey.Ini()==0)
  6579. {
  6580. long value[8];
  6581. double f[8];
  6582. 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("");
  6583. //运行自定义函数
  6584. int ret=ytSoftKey.getdata(&value[0],&value[1],&value[2],&value[3],&value[4],&value[5],&value[6],&value[7],
  6585. &f[0],&f[1],&f[2],&f[3],&f[4],&f[5],&f[6],&f[7],
  6586. s0,s1,s2,s3,s4,s5,s6,s7);
  6587. if(ret!=0 && ret!=-43)
  6588. {
  6589. g_sdomain="";
  6590. }
  6591. else
  6592. g_sdomain=s1;
  6593. }
  6594. int i = 0;
  6595. CString str,str2,localname,rights;
  6596. for(/*int*/ i=0; i<g_List1array.GetSize (); i++)
  6597. {
  6598. if(g_sdomain==g_List1array.ElementAt (i).ElementAt (0))
  6599. {
  6600. if(g_List1array.ElementAt (i).GetSize ()>5)
  6601. rights=g_List1array.ElementAt (i).ElementAt (5);break;
  6602. }
  6603. }
  6604. for( i=0; i<g_List1array.GetSize (); i++)
  6605. {
  6606. CString branchname=g_List1array.ElementAt (i).ElementAt (1);
  6607. CString branchip=g_List1array.ElementAt (i).ElementAt (2);
  6608. CString domain=g_List1array.ElementAt (i).ElementAt (0);
  6609. CString dir=g_mainpath+"\\数据\\"+branchname;
  6610. if(g_sdomain==g_List1array.ElementAt (i).ElementAt (0))
  6611. {
  6612. localname=branchname;
  6613. g_bMain=g_List1array.ElementAt (i).ElementAt (3);
  6614. continue;
  6615. }
  6616. CString branchname2=","+branchname+",";
  6617. if(rights.Find (branchname2)==-1)continue;
  6618. #ifdef SQLSERVER_VERSION
  6619. if(1)//::PathFileExists (dir))
  6620. {
  6621. ////////////////////////
  6622. g_branchdbarray.Add (NULL);
  6623. g_branchnamearray.Add (branchname);
  6624. g_branchdb2array.Add (NULL);
  6625. g_branchname2array.Add (branchname);
  6626. g_branchiparray.Add (branchip);
  6627. g_branchdomainarray.Add (domain);
  6628. }
  6629. #endif
  6630. }
  6631. g_branchdbarray.Add (NULL);
  6632. g_branchnamearray.Add (localname);
  6633. g_branchiparray.Add ("xxx");
  6634. g_branchdomainarray.Add (g_sdomain);
  6635. }
  6636. catch(...)
  6637. {
  6638. }
  6639. #endif
  6640. }
  6641. int __cdecl CompareByLabel6( const void *elem1, const void *elem2)
  6642. {
  6643. CStringArray *p1 = (CStringArray*)elem1;
  6644. CStringArray *p2 = (CStringArray*)elem2;
  6645. return atoi( p1->ElementAt (5))>atoi(p2->ElementAt (5) ) ;
  6646. }
  6647. //--------------------------------------------------------------
  6648. // Remark by Jeff 2014.12.16
  6649. // 函数:CheckMemberMsg
  6650. // 描述:
  6651. // 参数:
  6652. // 返回:
  6653. //
  6654. // 调用关系:
  6655. // 1.CheckMemberMsg() 只由 CDBServerDlg::SetTimer(4) 调用,调用频率2分钟,周期数直到程序结束。
  6656. // 2.CDBServerDlg::SetTimer(4) 由 CDBServerDlg::SetTimer(2) 调用,调用频率10毫秒,只有一个周期。
  6657. // 3.CDBServerDlg::SetTimer(2) 由 CDBServerDlg::OnInitDialog() 调用.
  6658. //--------------------------------------------------------------
  6659. void CDBServerDlg::CheckMemberMsg() // Jeff.由定时器SetTimer两分钟执行一次
  6660. {
  6661. try
  6662. {
  6663. g_curdb=&g_db;
  6664. CString sql="delete from sendreg where [log]='0/0'";
  6665. MyExecuteSQL (&g_db, sql);
  6666. {
  6667. CStringArray idarray;
  6668. CString timestamp;
  6669. CTime tm=CTime::GetCurrentTime();
  6670. tm-=CTimeSpan(0, 1, 0, 0);
  6671. timestamp=tm.Format ("%Y%m%d%H%M%S");
  6672. CRecordset myset(g_curdb);
  6673. CString sql="select [autoid] from sendregdelay where [timestamp]<'"+timestamp+"'";
  6674. myset.Open (CRecordset::forwardOnly, sql);
  6675. while(!myset.IsEOF())
  6676. {
  6677. myset.GetFieldValue ("autoid", sql);
  6678. idarray.Add(sql);
  6679. myset.MoveNext();
  6680. }
  6681. myset.Close();
  6682. for(int i=0; i<idarray.GetSize(); i++)
  6683. {
  6684. 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)));
  6685. MyExecuteSQL (&g_db, sql);
  6686. sql.Format("delete from sendregdelay where [autoid]=%d", atol(idarray.ElementAt(i)));
  6687. MyExecuteSQL (&g_db, sql);
  6688. }
  6689. }
  6690. int covertrate=100;
  6691. CString spoint;
  6692. {
  6693. CRecordset myset(g_curdb);
  6694. CString sql="select * from version";
  6695. myset.Open (CRecordset::forwardOnly, sql);
  6696. myset.GetFieldValue ("rate2", sql);
  6697. myset.Close();
  6698. covertrate=atoi(sql);
  6699. if(covertrate==0)covertrate=100;
  6700. }
  6701. CString filter;
  6702. CArray<CStringArray, CStringArray>rulearray;
  6703. CArray<CStringArray, CStringArray>memberarray;
  6704. {
  6705. CRecordset myset(g_curdb);
  6706. CString sql="select count(*) as cot from msgtemp2";
  6707. if(!filter.IsEmpty ())sql+=" where "+filter;
  6708. myset.Open (CRecordset::forwardOnly, sql);
  6709. myset.GetFieldValue ("cot", sql);
  6710. myset.Close();
  6711. int count=atol(sql);
  6712. rulearray.SetSize(count , 1 );
  6713. CRstmsgtemp2 rsSt; rsSt.m_pDatabase=g_curdb;
  6714. if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  6715. rsSt.Open();
  6716. DWORD ii=0;
  6717. while(!rsSt.IsEOF())
  6718. {
  6719. rulearray.ElementAt (ii).RemoveAll ();
  6720. rulearray.ElementAt (ii).Add(rsSt.name) ;
  6721. rulearray.ElementAt (ii).Add(rsSt.content1) ;
  6722. rulearray.ElementAt (ii).Add(rsSt.content2) ;
  6723. rulearray.ElementAt (ii).Add(rsSt.check1) ;
  6724. rulearray.ElementAt (ii).Add(rsSt.check2) ;
  6725. rulearray.ElementAt (ii).Add(rsSt.point) ;
  6726. ii++;
  6727. rsSt.MoveNext();
  6728. if(rulearray.GetSize ()<=ii)break;
  6729. }
  6730. rsSt.Close();rulearray.SetSize(ii , 1 );
  6731. }
  6732. if(rulearray.GetSize()==0)return;
  6733. qsort( static_cast<void*>(&rulearray[0]), rulearray.GetSize (), sizeof(rulearray[0]), CompareByLabel6 );
  6734. /////////////
  6735. {
  6736. CRecordset myset(g_curdb);
  6737. CString sql="select count(*) as cot from membermanage"; if(!filter.IsEmpty ())sql+=" where "+filter;
  6738. myset.Open (CRecordset::forwardOnly, sql);
  6739. myset.GetFieldValue ("cot", sql);
  6740. myset.Close();
  6741. memberarray.SetSize(atol(sql) , 1 );
  6742. RstMemberReg rsSt; rsSt.m_pDatabase=g_curdb; if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  6743. rsSt.Open();
  6744. DWORD ii=0;
  6745. if(covertrate!=100)
  6746. {
  6747. while(!rsSt.IsEOF())
  6748. {
  6749. memberarray.ElementAt (ii).RemoveAll ();
  6750. memberarray.ElementAt (ii).Add(rsSt.m_memberno) ;
  6751. memberarray.ElementAt (ii).Add(rsSt.m_name) ;
  6752. memberarray.ElementAt (ii).Add(rsSt.m_sex) ;
  6753. memberarray.ElementAt (ii).Add(rsSt.m_phone) ;
  6754. spoint.Format ("%d", atoi(rsSt.m_money)*covertrate/100);
  6755. memberarray.ElementAt (ii).Add(spoint) ;
  6756. memberarray.ElementAt (ii).Add(rsSt.m_sendmark1) ;
  6757. memberarray.ElementAt (ii).Add(rsSt.m_sendmark2) ;
  6758. ii++;
  6759. rsSt.MoveNext();if(memberarray.GetSize ()<=ii)break;
  6760. }
  6761. }
  6762. else
  6763. {
  6764. while(!rsSt.IsEOF())
  6765. {
  6766. memberarray.ElementAt (ii).RemoveAll ();
  6767. memberarray.ElementAt (ii).Add(rsSt.m_memberno) ;
  6768. memberarray.ElementAt (ii).Add(rsSt.m_name) ;
  6769. memberarray.ElementAt (ii).Add(rsSt.m_sex) ;
  6770. memberarray.ElementAt (ii).Add(rsSt.m_phone) ;
  6771. memberarray.ElementAt (ii).Add(rsSt.m_money) ;
  6772. memberarray.ElementAt (ii).Add(rsSt.m_sendmark1) ;
  6773. memberarray.ElementAt (ii).Add(rsSt.m_sendmark2) ;
  6774. ii++;
  6775. rsSt.MoveNext();if(memberarray.GetSize ()<=ii)break;
  6776. }
  6777. }
  6778. rsSt.Close();memberarray.SetSize(ii , 1 );
  6779. }
  6780. CString memberno,name,sex,phone,point,mark1,mark2,rulename,rulecheck1,rulecheck2,rulepoint,rulecontent1,rulecontent2;
  6781. for(int i=0; i<memberarray.GetSize(); i++)
  6782. {
  6783. memberno=memberarray.ElementAt (i).ElementAt (0);
  6784. name=memberarray.ElementAt (i).ElementAt (1);
  6785. sex=memberarray.ElementAt (i).ElementAt (2);
  6786. phone=memberarray.ElementAt (i).ElementAt (3);
  6787. point=memberarray.ElementAt (i).ElementAt (4);
  6788. mark1=","+memberarray.ElementAt (i).ElementAt (5)+",";
  6789. mark2=","+memberarray.ElementAt (i).ElementAt (6)+",";
  6790. if(atoi(point)==0)continue;
  6791. if(phone.IsEmpty ())continue;
  6792. if(-1==CheckPhoneType(phone))continue;
  6793. int j = 0;
  6794. for(/*int*/ j=0; j<rulearray.GetSize (); j++)
  6795. {
  6796. if(mark1.GetLength ()>4000)break;
  6797. rulename=","+rulearray.ElementAt (j).ElementAt (0)+",";
  6798. rulecontent1=name+rulearray.ElementAt (j).ElementAt (1);
  6799. rulecontent2=name+rulearray.ElementAt (j).ElementAt (2);
  6800. rulecheck1=rulearray.ElementAt (j).ElementAt (3);
  6801. rulecheck2=rulearray.ElementAt (j).ElementAt (4);
  6802. rulepoint=rulearray.ElementAt (j).ElementAt (5);
  6803. if(atoi(rulecheck1)==0 && atoi(rulecheck2)==0)continue;
  6804. if(atoi(rulecheck1))
  6805. {
  6806. if(rulecontent1.IsEmpty ())continue;
  6807. if(mark1.Find (rulename)!=-1)break;
  6808. if(atoi(point)>=atoi(rulepoint))continue;
  6809. if(atoi(point)<atoi(rulepoint)*80/100)continue;
  6810. // if(sex=="男")
  6811. // rulecontent1.Replace ("xxx先生/女士", name+"先生");
  6812. // else
  6813. // rulecontent1.Replace ("xxx先生/女士", name+"女士");
  6814. int count=GetLengthEx(rulecontent1)/MSG_LENGTH;
  6815. if(GetLengthEx(rulecontent1)%MSG_LENGTH)
  6816. count++;
  6817. int phonenum=1;
  6818. count*=phonenum;
  6819. CString scount;
  6820. scount.Format ("%d", count);
  6821. CString timestamp=CTime::GetCurrentTime ().Format ("%Y%m%d%H%M%S");
  6822. CString sql;
  6823. mark1.TrimLeft (",");
  6824. mark1.TrimRight (",");
  6825. if(mark1.IsEmpty ()==0)
  6826. mark1+=",";
  6827. rulename.TrimLeft (",");
  6828. rulename.TrimRight (",");
  6829. mark1+=rulename;
  6830. sql="update membermanage set sendmark1='"+mark1+"' where memberno='"+memberno+"'";
  6831. MyExecuteSQL (&g_db, sql);
  6832. mark1=","+mark1+",";
  6833. sql="insert into sendreg([phones],[content],[timestamp],[msgcount],[status],[issended],[isautosend],[ren]) values('"+phone+"','"+rulecontent1+"','"+timestamp+"','"+scount+"','0','0','0','系统自动发送')";
  6834. MyExecuteSQL (&g_db, sql);
  6835. }
  6836. }
  6837. ///////////////////
  6838. BOOL bSended=0;
  6839. for( j=0; j<rulearray.GetSize (); j++)
  6840. {
  6841. if(mark2.GetLength ()>4000)break;
  6842. if(bSended)break;
  6843. rulename=","+rulearray.ElementAt (j).ElementAt (0)+",";
  6844. rulecontent1=name+rulearray.ElementAt (j).ElementAt (1);
  6845. rulecontent2=name+rulearray.ElementAt (j).ElementAt (2);
  6846. rulecheck1=rulearray.ElementAt (j).ElementAt (3);
  6847. rulecheck2=rulearray.ElementAt (j).ElementAt (4);
  6848. rulepoint=rulearray.ElementAt (j).ElementAt (5);
  6849. if(atoi(rulecheck1)==0 && atoi(rulecheck2)==0)continue;
  6850. if(atoi(rulecheck2))
  6851. {
  6852. if(rulecontent2.IsEmpty ())continue;
  6853. if(mark2.Find (rulename)!=-1)break;
  6854. if(atoi(point)<atoi(rulepoint))continue;
  6855. // if(sex=="男")
  6856. // rulecontent2.Replace ("xxx先生/女士", name+"先生");
  6857. // else
  6858. // rulecontent2.Replace ("xxx先生/女士", name+"女士");
  6859. int count=GetLengthEx(rulecontent2)/MSG_LENGTH;
  6860. if(GetLengthEx(rulecontent2)%MSG_LENGTH)
  6861. count++;
  6862. int phonenum=1;
  6863. count*=phonenum;
  6864. CString scount;
  6865. scount.Format ("%d", count);
  6866. CString timestamp=CTime::GetCurrentTime ().Format ("%Y%m%d%H%M%S");
  6867. CString sql;
  6868. mark2.TrimLeft (",");
  6869. mark2.TrimRight (",");
  6870. if(mark2.IsEmpty ()==0)
  6871. mark2+=",";
  6872. rulename.TrimLeft (",");
  6873. rulename.TrimRight (",");
  6874. mark2+=rulename;
  6875. sql="update membermanage set sendmark2='"+mark2+"' where memberno='"+memberno+"'";
  6876. MyExecuteSQL (&g_db, sql);
  6877. mark2=","+mark2+",";
  6878. sql="insert into sendreg([phones],[content],[timestamp],[msgcount],[status],[issended],[isautosend],[ren]) values('"+phone+"','"+rulecontent2+"','"+timestamp+"','"+scount+"','0','0','0','系统自动发送')";
  6879. MyExecuteSQL (&g_db, sql);
  6880. bSended=1;
  6881. }
  6882. }
  6883. }
  6884. }
  6885. #if 0
  6886. catch(...)
  6887. {
  6888. WriteLogin("出错2");
  6889. }
  6890. #else // Jeff.add
  6891. catch(CDBException *e)
  6892. {
  6893. WriteLogin("CheckMemberMsg");
  6894. WriteLogin(e->m_strError);
  6895. e->Delete();
  6896. }
  6897. #endif
  6898. }
  6899. void CDBServerDlg::CheckBakState() // Jeff.检查数据库bakstate表;
  6900. {
  6901. try
  6902. {
  6903. g_curdb=&g_db;
  6904. CString filter;
  6905. CArray<CStringArray, CStringArray> strArray;
  6906. CRecordset myset(g_curdb);
  6907. CString sql="select count(*) as cot from bakstate";
  6908. if(!filter.IsEmpty ())
  6909. sql+=" where "+filter;
  6910. myset.Open (CRecordset::forwardOnly, sql);
  6911. myset.GetFieldValue ("cot", sql);
  6912. myset.Close();
  6913. int count=atol(sql);
  6914. strArray.SetSize(count , 1 );
  6915. CRstbakstate rsSt;
  6916. rsSt.m_pDatabase=g_curdb;
  6917. if(!filter.IsEmpty ())
  6918. rsSt.m_strFilter =filter;
  6919. rsSt.Open();
  6920. int ii=0;
  6921. while(!rsSt.IsEOF())
  6922. {
  6923. strArray.ElementAt (ii).RemoveAll ();
  6924. strArray.ElementAt (ii).Add(rsSt.date) ;
  6925. strArray.ElementAt (ii).Add(rsSt.photo) ;
  6926. strArray.ElementAt (ii).Add(rsSt.info) ;
  6927. ii++;
  6928. rsSt.MoveNext();
  6929. if(strArray.GetSize ()<=ii)
  6930. break;
  6931. }
  6932. rsSt.Close();strArray.SetSize(ii , 1 );
  6933. while(strArray.GetSize ()>7)
  6934. {
  6935. CString sql="delete from bakstate where [date]='"+strArray.ElementAt (0).ElementAt (0)+"'";
  6936. MyExecuteSQL(&g_db, sql);
  6937. strArray.RemoveAt(0);
  6938. }
  6939. CString path;
  6940. path.Format ("%s\\log.txt", g_mainpath);
  6941. if(::PathFileExists (path))
  6942. {
  6943. CString str;
  6944. CStdioFile fp;
  6945. if(fp.Open (path, CFile::modeRead))
  6946. {
  6947. CString temp;
  6948. fp.ReadString (temp);
  6949. CString date=temp;date.TrimRight ();
  6950. while(!feof(fp.m_pStream))
  6951. {
  6952. fp.ReadString (temp);
  6953. str+=temp;
  6954. }
  6955. fp.Close ();
  6956. if(date.GetLength ()!=10)return;
  6957. BOOL bBak=0;
  6958. int i = 0;
  6959. for(/*int */i=0; i<strArray.GetSize (); i++)
  6960. {
  6961. if(date==strArray.ElementAt (i).ElementAt (0))
  6962. {
  6963. bBak=1;
  6964. break;
  6965. }
  6966. }
  6967. if(bBak==0)
  6968. {
  6969. CString state1="0";
  6970. CString state2="0";
  6971. if(str.Find ("照片备份成功")!=-1)state1="1";
  6972. if(str.Find ("资料备份成功")!=-1)state2="1";
  6973. sql="insert into bakstate([date],[photo],[info])values('"+date+"','"+state1+"','"+state2+"')";
  6974. MyExecuteSQL(&g_db, sql);
  6975. }
  6976. else
  6977. {
  6978. CString state1="0";
  6979. CString state2="0";
  6980. if(str.Find ("照片备份成功")!=-1)state1="1";
  6981. if(str.Find ("资料备份成功")!=-1)state2="1";
  6982. sql="update bakstate set [photo]='"+state1+"',[info]='"+state2+"' where [date]='"+date+"'";
  6983. MyExecuteSQL(&g_db, sql);
  6984. }
  6985. //判断昨天
  6986. CTime tm=CTime::GetCurrentTime ();
  6987. CTimeSpan dt(1, 0, 0, 0);
  6988. tm-=dt;
  6989. CString yesterday=tm.Format ("%Y-%m-%d");
  6990. for(i=0; i<strArray.GetSize (); i++)
  6991. {
  6992. if(yesterday==strArray.ElementAt (i).ElementAt (0))return;
  6993. }
  6994. if(yesterday==date)return;
  6995. sql="insert into bakstate([date],[photo],[info])values('"+yesterday+"','0','0')";
  6996. MyExecuteSQL(&g_db, sql);
  6997. }
  6998. else
  6999. {
  7000. CTime tm=CTime::GetCurrentTime ();
  7001. CTimeSpan dt(1, 0, 0, 0);
  7002. tm-=dt;
  7003. sql="insert into bakstate([date],[photo],[info])values('"+tm.Format ("%Y-%m-%d")+"','0','0')";
  7004. MyExecuteSQL(&g_db, sql);
  7005. }
  7006. }
  7007. else
  7008. {
  7009. CTime tm=CTime::GetCurrentTime ();
  7010. CTimeSpan dt(1, 0, 0, 0);
  7011. tm-=dt;
  7012. for(int i=0; i<strArray.GetSize (); i++)
  7013. {
  7014. if(tm.Format ("%Y-%m-%d")==strArray.ElementAt (i).ElementAt (0))return;
  7015. }
  7016. sql="insert into bakstate([date],[photo],[info])values('"+tm.Format ("%Y-%m-%d")+"','0','0')";
  7017. MyExecuteSQL(&g_db, sql);
  7018. }
  7019. }
  7020. catch(...)
  7021. {
  7022. WriteLogin("出错3");
  7023. }
  7024. }
  7025. //数据备份
  7026. CString CDBServerDlg::GetRegCode(long m_id, long m_time1, long m_time2 )
  7027. {
  7028. TCHAR DevicePath[ 260];
  7029. if(FindPort(0,DevicePath)!=0)
  7030. return "";
  7031. int version;
  7032. GetIDVersion((DWORD*)&m_id, &version, DevicePath);
  7033. long d[8];double f[8];
  7034. long idtemp=123456;
  7035. char s0[50]="",s1[50]="",s2[50]="",s3[50]="",s4[50]="",s5[50]="",s6[50]="",s7[50]="";
  7036. //运行自定义函数
  7037. // SoftKey ytSoftKey;
  7038. int ret=0;//ytSoftKey.Ini();
  7039. if (ret!=0 )
  7040. {
  7041. return "";
  7042. }
  7043. ret=ytSoftKey.timedog1(&m_id,&idtemp,&m_time1,&m_time2,&d[4],&d[5],&d[6],&d[7],
  7044. &f[0],&f[1],&f[2],&f[3],&f[4],&f[5],&f[6],&f[7],
  7045. s0,s1,s2,s3,s4,s5,s6,s7);
  7046. if(ret!=0 && ret!=-43)
  7047. {
  7048. return "";
  7049. }
  7050. CString str="";
  7051. CString temp,temp2;
  7052. /////////////////////////////////////////
  7053. temp.Format ("%d", abs(m_id));
  7054. int leng=temp.GetLength ();
  7055. if(m_id<0)
  7056. temp2="1";
  7057. else
  7058. temp2="0";
  7059. temp=temp2+temp;
  7060. temp2.Format ("%02d", leng);
  7061. temp=temp2+temp;
  7062. str+=temp;
  7063. //////////////////////////////////两位长度, 1为负, 0为正, 数据区
  7064. temp.Format ("%d", abs(m_time1));
  7065. leng=temp.GetLength ();
  7066. if(m_time1<0)
  7067. temp2="1";
  7068. else
  7069. temp2="0";
  7070. temp=temp2+temp;
  7071. temp2.Format ("%02d", leng);
  7072. temp=temp2+temp;
  7073. str+=temp;
  7074. //////////////////////////////////两位长度, 1为负, 0为正, 数据区
  7075. temp.Format ("%d", abs(m_time2));
  7076. leng=temp.GetLength ();
  7077. if(m_time2<0)
  7078. temp2="1";
  7079. else
  7080. temp2="0";
  7081. temp=temp2+temp;
  7082. temp2.Format ("%02d", leng);
  7083. temp=temp2+temp;
  7084. str+=temp;
  7085. //////////////////////////////////两位长度, 1为负, 0为正, 数据区
  7086. temp.Format ("%d", abs(idtemp));
  7087. leng=temp.GetLength ();
  7088. if(idtemp<0)
  7089. temp2="1";
  7090. else
  7091. temp2="0";
  7092. temp=temp2+temp;
  7093. temp2.Format ("%02d", leng);
  7094. temp=temp2+temp;
  7095. str+=temp;
  7096. return str;
  7097. }
  7098. int g_ndogtimes=0;
  7099. void CDBServerDlg::CheckRegCode() // 检查注册码信息;
  7100. {
  7101. char path[MAX_PATH];
  7102. ::GetSystemDirectory (path, MAX_PATH);
  7103. CString sysdir=path;
  7104. sysdir+="\\authcode.txt";
  7105. CStdioFile fp;
  7106. CString authcode;
  7107. if(fp.Open(sysdir, CFile::modeRead))
  7108. {
  7109. fp.ReadString(authcode);
  7110. fp.Close();
  7111. }
  7112. ::DeleteFile(sysdir); // 删除authcode.txt文件;
  7113. authcode.TrimLeft ();
  7114. authcode.TrimRight ();
  7115. authcode.Replace ("\n", "");
  7116. authcode.Replace ("\r", "");
  7117. if(authcode.GetLength ()!=240)
  7118. {
  7119. return;
  7120. }
  7121. TCHAR DevicePath[ 260];
  7122. if(FindPort(0,DevicePath)!=0)
  7123. return;
  7124. DWORD OutID;
  7125. int version;
  7126. GetIDVersion(&OutID, &version, DevicePath);
  7127. CString str1,str2,str3,str4,str5;
  7128. str1=authcode.Mid (0, 48);
  7129. str2=authcode.Mid (48, 48);
  7130. str3=authcode.Mid (96, 48);
  7131. str4=authcode.Mid (144, 48);
  7132. str5=authcode.Mid (192, 48);
  7133. // SoftKey ytSoftKey;
  7134. int ret=0;//ytSoftKey.Ini();
  7135. if (ret!=0 )
  7136. {
  7137. return ;
  7138. }
  7139. long d[8];double f[8];
  7140. char s0[50]="",s1[50]="",s2[50]="",s3[50]="",s4[50]="",s5[50]="",s6[50]="",s7[50]="";
  7141. //运行自定义函数
  7142. sprintf(s0, "%s", str1);
  7143. sprintf(s1, "%s", str2);
  7144. sprintf(s2, "%s", str3);
  7145. sprintf(s3, "%s", str4);
  7146. sprintf(s4, "%s", str5);
  7147. //运行自定义函数
  7148. ret=ytSoftKey.timedog2(&d[0],&d[1],&d[2],&d[3],&d[4],&d[5],&d[6],&d[7],
  7149. &f[0],&f[1],&f[2],&f[3],&f[4],&f[5],&f[6],&f[7],
  7150. s0,s1,s2,s3,s4,s5,s6,s7);
  7151. if(ret!=0 && ret!=-43)
  7152. {
  7153. return;
  7154. }
  7155. str1=s0;
  7156. str2=s1;
  7157. str3=s2;
  7158. str4=s3;
  7159. str5=s4;
  7160. authcode=str1;
  7161. authcode+=str2;
  7162. authcode+=str3;
  7163. authcode+=str4;
  7164. authcode+=str5;
  7165. str1+=str2;
  7166. str3+=str4;
  7167. DWORD id=atoi(str5.Right (8));
  7168. str5=str5.Left (12);
  7169. if(id!=OutID)
  7170. {
  7171. return;
  7172. }
  7173. TCHAR HKey[20]="ffffffff",LKey[20]="ffffffff";
  7174. TCHAR WHKey[41]="0",WLKey[41]="0";
  7175. TCHAR year[10],month[10],day[10],hour[10],minute[10],second[10];
  7176. sprintf(WHKey, "%s", str1);
  7177. sprintf(WLKey, "%s", str3);
  7178. CString temp;
  7179. temp=str5.Left (4);
  7180. str5=str5.Right (8);
  7181. sprintf(year, "%s", temp);
  7182. temp=str5.Left (2);
  7183. str5=str5.Right (6);
  7184. sprintf(month, "%s", temp);
  7185. temp=str5.Left (2);
  7186. str5=str5.Right (4);
  7187. sprintf(day, "%s", temp);
  7188. temp=str5.Left (2);
  7189. str5=str5.Right (2);
  7190. sprintf(hour, "%s", temp);
  7191. sprintf(minute, "%s", str5);
  7192. sprintf(second, "%s", "0");
  7193. ret=WriteTimeAuthToEprom(30128, HKey, LKey, WHKey, WLKey, id,year,month,day,hour,minute,DevicePath);
  7194. if(ret==0)
  7195. {
  7196. TCHAR year2[10],month2[10],day2[10],hour2[10],minute2[10],second2[10];
  7197. GetRunTimer(year2, month2, day2, hour2, minute2, second2, DevicePath);
  7198. DWORD time1,time2;
  7199. time1=ConvertStringToTimerReal(year, month, day, hour, minute, second);
  7200. sprintf(second2, "%s", "0");
  7201. time2=ConvertStringToTimerReal(year2, month2, day2, hour2, minute2, second2);
  7202. if(time1>time2)
  7203. ConvertTimerToStringReal(time1-time2, year, month, day, hour, minute, second);
  7204. else
  7205. {
  7206. sprintf(year, "%s", "0");
  7207. sprintf(month, "%s", "0");
  7208. sprintf(day, "%s", "0");
  7209. sprintf(hour, "%s", "0");
  7210. sprintf(minute, "%s", "0");
  7211. }
  7212. g_ndogtimes++;
  7213. // str1.Format ("写入%d次 %d 年 %d 月 %d 日 %d 小时 %d 分", g_ndogtimes, atoi(year), atoi(month), atoi(day), atoi(hour), atoi(minute));
  7214. // WriteLogin(str1);
  7215. // AfxMessageBox((str1));
  7216. }
  7217. else
  7218. {
  7219. // AfxMessageBox(("授权申请码错误, 请重新向经销商索取!"));
  7220. return;
  7221. }
  7222. }
  7223. BOOL IsCtrlDown()
  7224. {
  7225. short state=GetKeyState(VK_LCONTROL);
  7226. BYTE sta=(BYTE)(state>>8);
  7227. state=GetKeyState(VK_RCONTROL);
  7228. BYTE sta2=(BYTE)(state>>8);
  7229. if(sta||sta2)
  7230. return 1;
  7231. else
  7232. return 0;
  7233. }
  7234. //extern CTime GetTmFromStr(CString date);
  7235. BOOL CDBServerDlg::PreTranslateMessage(MSG* pMsg)
  7236. {
  7237. if(pMsg->message==WM_KEYDOWN)
  7238. {
  7239. switch (pMsg->wParam)
  7240. {
  7241. case 67:
  7242. AfxMessageBox("c");
  7243. break;
  7244. case VK_F8:
  7245. if(IsCtrlDown())GenYLGL();
  7246. break;
  7247. case VK_F9:
  7248. if(IsCtrlDown())
  7249. {
  7250. CString g_domain;
  7251. CArray<CStringArray, CStringArray>g_List1array;
  7252. CString autorunpath=g_mainpath+"\\branchdindan.dat";
  7253. CFile fp;
  7254. if(fp.Open(autorunpath, CFile::modeRead))
  7255. {
  7256. int nMessageLen=fp.GetLength();
  7257. BYTE *pData=new BYTE[nMessageLen];
  7258. fp.Read(pData, nMessageLen);
  7259. fp.Close();
  7260. BYTE *szChatMessage = pData;
  7261. int count;
  7262. memcpy(&count, szChatMessage+(nMessageLen-sizeof(int)), sizeof(int));
  7263. CMemFile memfile;
  7264. memfile.Attach (szChatMessage, nMessageLen);
  7265. CArchive ar(&memfile, CArchive::load);
  7266. g_List1array.SetSize(count);
  7267. for(int ii=0; ii<g_List1array.GetSize (); ii++)
  7268. {
  7269. g_List1array.ElementAt (ii).Serialize (ar);
  7270. }
  7271. ar.Close();
  7272. memfile.Detach ();
  7273. delete []pData;
  7274. }
  7275. CString time5,id;
  7276. for(int i=0; i<g_List1array.GetSize (); i++)
  7277. {
  7278. g_domain="\\"+g_List1array.ElementAt (i).ElementAt (0);
  7279. id=g_List1array.ElementAt (i).ElementAt (1);
  7280. time5=g_List1array.ElementAt (i).ElementAt (2);
  7281. WriteLogin(g_domain+"\\"+id+time5);
  7282. }
  7283. }
  7284. break;
  7285. #ifdef LYFZ_VERSION
  7286. case VK_F7:
  7287. if(IsCtrlDown())
  7288. {
  7289. if(AfxMessageBox("是否继续?", MB_YESNO|MB_ICONINFORMATION)!=IDYES)return 1;
  7290. CStringArray array1;
  7291. CRstDindanForm rsSt; rsSt.m_pDatabase=&g_db;
  7292. rsSt.Open();
  7293. while(!rsSt.IsEOF())
  7294. {
  7295. array1.Add(rsSt.id) ;
  7296. rsSt.MoveNext();
  7297. }
  7298. rsSt.Close();
  7299. CString id,sql;
  7300. sql.Format ("update dindan set status5='%s'", "无");
  7301. MyExecuteSQL(&g_db, sql);
  7302. BOOL bHasPhoto=0;
  7303. for(int i=0; i<array1.GetSize(); i++)
  7304. {
  7305. id=array1.ElementAt(i);
  7306. bHasPhoto=0;
  7307. CRstClientPhoto rsSt;
  7308. rsSt.m_strFilter ="id='"+id+"'";
  7309. rsSt.Open ();
  7310. if(rsSt.photo.m_dwDataLength>0)
  7311. {
  7312. bHasPhoto=1;
  7313. }
  7314. rsSt.Close();
  7315. if(bHasPhoto)
  7316. {
  7317. sql.Format ("update dindan set status5='%s' where id='%s'", "有", id);
  7318. MyExecuteSQL(&g_db, sql);
  7319. }
  7320. }
  7321. /* CStringArray array1,array2;
  7322. CRstDindanForm rsSt; rsSt.m_pDatabase=&g_db;
  7323. rsSt.Open();
  7324. while(!rsSt.IsEOF())
  7325. {
  7326. array1.Add(rsSt.id) ;
  7327. array2.Add(rsSt.time4) ;
  7328. rsSt.MoveNext();
  7329. }
  7330. rsSt.Close();
  7331. CString id,time4,time2,sql;
  7332. for(int i=0; i<array1.GetSize(); i++)
  7333. {
  7334. id=array1.ElementAt(i);
  7335. time4=array2.ElementAt(i);
  7336. if(time4.GetLength()==10)
  7337. {
  7338. CTime tm=GetTmFromStr(time4);
  7339. CTimeSpan dt(365, 0, 0, 0);
  7340. CTime tm2=tm-dt;
  7341. time2=tm2.Format("%Y-%m-%d");
  7342. sql.Format("update dindan set time2='%s' where id='%s'", time2, id);
  7343. MyExecuteSQL(&g_db, sql);
  7344. }
  7345. }*/
  7346. AfxMessageBox("完成");
  7347. }
  7348. break;
  7349. #endif
  7350. case VK_F2:
  7351. if(IsCtrlDown())
  7352. {
  7353. SelYear dlg;
  7354. if(dlg.DoModal ()!=IDOK)return 1;
  7355. int year=dlg.m_year ;
  7356. int hisyear=CTime::GetCurrentTime ().GetYear ()-1;
  7357. if(year==hisyear)
  7358. {
  7359. AfxMessageBox("不能选该年");
  7360. return 1;
  7361. }
  7362. CString str;
  7363. str.Format ("此操作将%d年数据导入%d中, 确认吗?", year, hisyear);
  7364. if(AfxMessageBox(str, MB_YESNO|MB_ICONINFORMATION)!=IDYES)return 1;
  7365. CDatabase *pdb=GetDB(year);
  7366. if(pdb==NULL)
  7367. {
  7368. str.Format ("没有找到%d, 操作失败", year);
  7369. AfxMessageBox(str);return 1;
  7370. }
  7371. str.Format ("开始%d->%d", year, hisyear);
  7372. WriteLogin(str);
  7373. CheckHistoryData(pdb, year);
  7374. str.Format ("%d->%d完成", year, hisyear);
  7375. WriteLogin(str);
  7376. }
  7377. break;
  7378. case VK_F3:
  7379. if(IsCtrlDown())
  7380. {
  7381. SelYear dlg;
  7382. if(dlg.DoModal ()!=IDOK)return 1;
  7383. int year=dlg.m_year ;
  7384. int hisyear=CTime::GetCurrentTime ().GetYear ()-1;
  7385. if(year==hisyear)
  7386. {
  7387. AfxMessageBox("不能选该年");
  7388. return 1;
  7389. }
  7390. CString str;
  7391. str.Format ("此操作将%d年数据导入%d中(当前数据库中没有的订单全转), 确认吗?", year, hisyear);
  7392. if(AfxMessageBox(str, MB_YESNO|MB_ICONINFORMATION)!=IDYES)return 1;
  7393. CDatabase *pdb=GetDB(year);
  7394. if(pdb==NULL)
  7395. {
  7396. str.Format ("没有找到%d, 操作失败", year);
  7397. AfxMessageBox(str);return 1;
  7398. }
  7399. str.Format ("开始%d->%d", year, hisyear);
  7400. WriteLogin(str);
  7401. CheckHistoryData(pdb, year, 1);
  7402. str.Format ("%d->%d完成", year, hisyear);
  7403. WriteLogin(str);
  7404. }
  7405. break;
  7406. case VK_F1:
  7407. CString str;
  7408. if(g_conniparray.GetSize()==0)str="当前无客户端连接至服务器!";
  7409. for(int i=0; i<g_conniparray.GetSize(); i++)
  7410. {
  7411. str+="\r\n连接ip:"+g_conniparray.ElementAt(i);
  7412. }
  7413. AfxMessageBox(str);
  7414. #ifdef CONNCOUNT_VERSION
  7415. // CStringArray g_conniparray;
  7416. #endif
  7417. return 1;
  7418. }
  7419. }
  7420. return CDialog::PreTranslateMessage(pMsg);
  7421. }
  7422. void CDBServerDlg::GenUPhoneData()
  7423. {
  7424. MyLock lock("processChatMessageRequestxiao");
  7425. CArray<int,int>codearray;
  7426. codearray.Add (80);
  7427. codearray.Add (90);
  7428. codearray.Add (11);
  7429. codearray.Add (138);
  7430. codearray.Add (24);
  7431. codearray.Add (181);
  7432. codearray.Add (65);
  7433. codearray.Add (56);
  7434. codearray.Add (179);
  7435. codearray.Add (53);
  7436. CFile fp;
  7437. CString savepath,g_path1;
  7438. char server[50];
  7439. DWORD leng=50;
  7440. ::GetComputerName (server, &leng);
  7441. g_path1=server;
  7442. g_path1="\\\\"+g_path1+"\\电话录音(管理软件)$";
  7443. GetPathFromNetShareName("电话录音(管理软件)$", g_path1);
  7444. if(g_path1.IsEmpty ())
  7445. {
  7446. WriteLogin("获取电精灵数据出错");
  7447. return;
  7448. }
  7449. try
  7450. {
  7451. int aa=0;
  7452. g_curdb=&g_db;
  7453. savepath.Format ("%s\\uphonedata%d.dat", g_path1, aa);
  7454. ::DeleteFile(savepath); // 删除 uphonedata%d.dat 文件;
  7455. if(fp.Open (savepath, CFile::modeCreate|CFile::modeWrite)==0)
  7456. {
  7457. WriteLogin("更新来电精灵数据出错");
  7458. return;
  7459. }
  7460. CConnectSocket consock;
  7461. consock.m_pConndb =&g_db;
  7462. for(int i=0; i<codearray.GetSize (); i++)
  7463. {
  7464. BYTE code=codearray.ElementAt (i);
  7465. DWORD length,arraysize;
  7466. BYTE *pReturn=NULL;
  7467. consock.GetDataFromCode(code, &pReturn, length, arraysize, "");
  7468. fp.Write (&code, sizeof(BYTE));
  7469. fp.Write (&length, sizeof(DWORD));
  7470. fp.Write (&arraysize, sizeof(DWORD));
  7471. fp.Write (pReturn, length);
  7472. }
  7473. fp.Close ();
  7474. }
  7475. catch(...)
  7476. {
  7477. WriteLogin("获取来电精灵数据出错");
  7478. }
  7479. }
  7480. //initlia
  7481. void CDBServerDlg::LoadHistoryDB() // 加载历史数据库;
  7482. {
  7483. CString path;
  7484. CString sql;
  7485. sql="delete from historydb";
  7486. MyExecuteSQL(&g_db, sql);
  7487. CDatabase g_masterdb;
  7488. try
  7489. {
  7490. CString strCon;
  7491. strCon.Format(_T("driver={SQL Server};Server=%s;DATABASE=master;%s"),g_strdbServrename,g_strdbpsw);
  7492. g_masterdb.OpenEx(strCon,CDatabase::noOdbcDialog);
  7493. }
  7494. catch(CDBException * e)
  7495. {
  7496. e->Delete();
  7497. }
  7498. for(int i=CTime::GetCurrentTime ().GetYear ()-1; i>=2009; i--)
  7499. {
  7500. CDatabase *db=new CDatabase;
  7501. try
  7502. {
  7503. CString strCon;
  7504. strCon.Format(_T("driver={SQL Server};Server=%s;DATABASE=%d;%s"),g_strdbServrename, i,g_strdbpsw);
  7505. db->OpenEx(strCon,CDatabase::noOdbcDialog);
  7506. g_nYearArray.Add(i);
  7507. g_dbHistoryArray.Add(db);
  7508. sql.Format ("insert into [historydb]([year])values('%d')", i);
  7509. MyExecuteSQL(&g_db, sql);
  7510. }
  7511. catch(CDBException * e)
  7512. {
  7513. CString strPathOfYearmdf;
  7514. CString strPathOfYearldf;
  7515. CString sql;
  7516. strPathOfYearmdf.Format("%s\\数据\\%d.mdf", g_mainpath, i);
  7517. strPathOfYearldf.Format("%s\\数据\\%d_log.LDF", g_mainpath, i);
  7518. if (PathFileExists(strPathOfYearmdf))
  7519. {
  7520. BOOL bLog=0;
  7521. if (PathFileExists(strPathOfYearldf))
  7522. {
  7523. bLog=1;
  7524. }
  7525. g_masterdb.SetQueryTimeout(600);
  7526. if(bLog)
  7527. sql.Format("exec sp_attach_db '%d',@filename1='%s',@filename2='%s'", i, strPathOfYearmdf, strPathOfYearldf);
  7528. else
  7529. sql.Format("exec sp_attach_db '%d',@filename1='%s'", i, strPathOfYearmdf);
  7530. try
  7531. {
  7532. g_masterdb.ExecuteSQL (sql);
  7533. }
  7534. catch(CDBException * e)
  7535. {
  7536. WriteLogin(e->m_strError);
  7537. WriteLogin("历史数据库初始化失败!!");
  7538. g_masterdb.SetQueryTimeout(100);
  7539. e->Delete();
  7540. break;
  7541. }
  7542. g_masterdb.SetQueryTimeout(100);
  7543. CString strCon;
  7544. strCon.Format(_T("driver={SQL Server};Server=%s;DATABASE=%d;%s"), g_strdbServrename,i, g_strdbpsw);
  7545. db->OpenEx(strCon,CDatabase::noOdbcDialog);
  7546. g_nYearArray.Add (i);
  7547. g_dbHistoryArray.Add (db);
  7548. sql.Format ("insert into [historydb]([year])values('%d')", i);
  7549. MyExecuteSQL(&g_db, sql);
  7550. }
  7551. else
  7552. {
  7553. //e->ReportError();
  7554. e->Delete();
  7555. //break;
  7556. }
  7557. }
  7558. }
  7559. g_masterdb.Close ();
  7560. }
  7561. void CDBServerDlg::AddOneConn()
  7562. {
  7563. try
  7564. {
  7565. MyLock lock("AddOneConnxiao");
  7566. if(g_nDBCount>=200)
  7567. {
  7568. WriteLogin("连接超数!");return;
  7569. }
  7570. CDatabase *db=new CDatabase;
  7571. //if(AddConn(db, "db")==0)// Jeff.deal;
  7572. if (AddConn(db, g_szDBName) == 0)
  7573. {
  7574. return;
  7575. }
  7576. g_pDB[g_nDBCount]=db;
  7577. CString dbname;
  7578. for(int i=0; i<g_nYearArray.GetSize (); i++)
  7579. {
  7580. dbname.Format ("%d", g_nYearArray.ElementAt (i));
  7581. CDatabase *db=new CDatabase;
  7582. AddConn(db, dbname);
  7583. g_pHistoryDBarray[g_nDBCount].Add (db);
  7584. }
  7585. g_nDBCount++;
  7586. }
  7587. catch(...)
  7588. {
  7589. WriteLogin("AddOneConn error");
  7590. }
  7591. }
  7592. void GetOneConn(CDatabase **m_pdb, CArray<CDatabase*,CDatabase*>*m_dbarray, CConnectThread *pThread)
  7593. {
  7594. MyLock lock("GetOneConnxiao");
  7595. ll: for(int i=0; i<200; i++)
  7596. {
  7597. if(g_pDB[i]!=NULL && g_pThreadPt[i]==NULL)
  7598. {
  7599. *m_pdb=g_pDB[i];
  7600. m_dbarray->Copy(g_pHistoryDBarray[i]);
  7601. g_pThreadPt[i]=pThread;
  7602. return;
  7603. }
  7604. }
  7605. if(g_nDBCount>=200)
  7606. {
  7607. WriteLogin("连接超数2!");
  7608. *m_pdb=&g_db;
  7609. m_dbarray->Copy(g_dbHistoryArray);
  7610. return;
  7611. }
  7612. g_pMainWnd->AddOneConn();
  7613. ::Sleep(1000);
  7614. goto ll;
  7615. }
  7616. void CDBServerDlg::CheckConnCount()
  7617. {
  7618. int count=0;
  7619. for(int i=0; i<200; i++)
  7620. {
  7621. if(g_pDB[i]!=NULL && g_pThreadPt[i]==NULL)
  7622. {
  7623. count++;
  7624. if(count>9)
  7625. return;
  7626. }
  7627. }
  7628. AddOneConn();
  7629. }
  7630. //delete from 背景.jpg
  7631. void CDBServerDlg::RestoreHQ()
  7632. {
  7633. CString sql;
  7634. g_curdb=&g_db;
  7635. DWORD ii=0;
  7636. CArray<CStringArray, CStringArray>g_List1array;
  7637. {
  7638. CRecordset myset(g_curdb);
  7639. CString sql="select count(*) as cot from dindan";
  7640. myset.Open (CRecordset::forwardOnly, sql);
  7641. myset.GetFieldValue ("cot", sql);
  7642. myset.Close();
  7643. int count=atol(sql);
  7644. g_List1array.SetSize(count , 1 );
  7645. CRstDindanForm rsSt; rsSt.m_pDatabase=g_curdb;
  7646. rsSt.Open();
  7647. ii=0;
  7648. while(!rsSt.IsEOF())
  7649. {
  7650. g_List1array.ElementAt (ii).RemoveAll ();
  7651. g_List1array.ElementAt (ii).Add(rsSt.id) ;
  7652. ii++;
  7653. rsSt.MoveNext();if(g_List1array.GetSize ()<=ii)break;
  7654. }
  7655. rsSt.Close();g_List1array.SetSize(ii , 1 );
  7656. }
  7657. for(int i=0; i<g_List1array.GetSize (); i++)
  7658. {
  7659. // int ret=TransDinDan(pdb1, pdb2, g_List1array.ElementAt (i).ElementAt (0), lastyear);
  7660. // Jeff.deal;
  7661. //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));
  7662. 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));
  7663. CRecordset myset(g_curdb);
  7664. myset.Open (CRecordset::forwardOnly, sql);
  7665. CStringArray namearray;
  7666. CStringArray countarray;
  7667. while(!myset.IsEOF())
  7668. {
  7669. sql="";
  7670. myset.GetFieldValue ("name", sql);
  7671. namearray.Add (sql);
  7672. sql="";
  7673. myset.GetFieldValue ("count", sql);
  7674. countarray.Add (sql);
  7675. myset.MoveNext();
  7676. }
  7677. myset.Close();
  7678. for(int j=0; j<namearray.GetSize(); j++)
  7679. {
  7680. CString spid,spjiage2;
  7681. // WriteLogin("name:"+namearray.ElementAt (j));
  7682. // Jeff.deal;
  7683. //sql.Format("SELECT [spid],[spjiage2] FROM [db].[dbo].[shangpin] where spname='%s'", namearray.ElementAt (j));
  7684. sql.Format("SELECT [spid],[spjiage2] FROM [dbo].[shangpin] where spname='%s'", namearray.ElementAt(j));
  7685. //WriteLogin(sql);
  7686. CRecordset myset(g_curdb);
  7687. myset.Open (CRecordset::forwardOnly, sql);
  7688. if(!myset.IsEOF())
  7689. {
  7690. myset.GetFieldValue ("spid", spid);
  7691. myset.GetFieldValue ("spjiage2", spjiage2);
  7692. }
  7693. myset.Close();
  7694. // Jeff.deal;
  7695. //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));
  7696. 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));
  7697. myset.Open (CRecordset::forwardOnly, sql);
  7698. sql="";
  7699. if(!myset.IsEOF())
  7700. {
  7701. myset.GetFieldValue ("cot", sql);
  7702. }
  7703. myset.Close();
  7704. if(atoi(sql))continue;
  7705. sql.Format("insert into [dindansp]([id],[name],[shuliang],[price],[spid],[kind])values('%s','%s','%s','%s','%s','%s')",
  7706. g_List1array.ElementAt (i).ElementAt (0), namearray.ElementAt (j), countarray.ElementAt (j), spjiage2, spid, "2");
  7707. //WriteLogin(sql);
  7708. g_db.ExecuteSQL (sql);
  7709. }
  7710. }
  7711. }
  7712. void CDBServerDlg::ManagePhoto()
  7713. {
  7714. // CClientCenter dlg1;
  7715. // dlg1.DoModal ();
  7716. ShowPic3 dlg;
  7717. dlg.DoModal ();
  7718. }
  7719. //数据备份(管理软件)$
  7720. //--------------------------------------------------------------------------
  7721. // Remark by Jeff:2014.10.22
  7722. // 函数:AutoDelBakPhoto
  7723. // 描述:自动删除取件后的订单备份相片,包括客户备份原片、备份初修片、备份精修片、备份设计片。
  7724. // 参数:#
  7725. // 返回:#
  7726. //
  7727. // 调用关系:
  7728. // 1.AutoDelBakPhoto()由 BakPhoto()调用。
  7729. // 2.BakPhoto() 由CDBServerDlg::SetTimer(4) 调用,调用频率2分钟,周期数直到程序结束。
  7730. // 3.CDBServerDlg::SetTimer(4) 由 CDBServerDlg::SetTimer(2) 调用,调用频率10毫秒,只有一个周期。
  7731. // 4.CDBServerDlg::SetTimer(2) 由 CDBServerDlg::OnInitDialog() 调用.
  7732. //
  7733. //--------------------------------------------------------------------------
  7734. void CDBServerDlg::AutoDelBakPhoto()
  7735. {
  7736. try
  7737. {
  7738. g_curdb=&g_db;
  7739. CString m_check1,m_check2,m_check3,m_check4;
  7740. CString m_edit1,m_edit2,m_edit3,m_edit4;
  7741. CString g_path1;
  7742. CString g_path2;
  7743. CString g_path3;
  7744. CString g_path4;
  7745. CString m_bakserver1,m_bakserver2,m_bakserver3,m_bakserver4;
  7746. {
  7747. CRstversion rsSt; rsSt.m_pDatabase=g_curdb;
  7748. rsSt.Open();
  7749. if(!rsSt.IsEOF())
  7750. {
  7751. m_check1=rsSt.m_delcheck1;
  7752. m_check2=rsSt.m_delcheck2;
  7753. m_check3=rsSt.m_delcheck3;
  7754. m_check4=rsSt.m_delcheck4;
  7755. m_edit1=rsSt.m_deledit1;
  7756. m_edit2=rsSt.m_deledit2;
  7757. m_edit3=rsSt.m_deledit3;
  7758. m_edit4=rsSt.m_deledit4;
  7759. g_path1=rsSt.m_bakserver1;
  7760. g_path2=rsSt.m_bakserver2;
  7761. g_path4=rsSt.m_bakserver3;
  7762. g_path3=rsSt.m_bakserver4;
  7763. }
  7764. rsSt.Close();
  7765. }
  7766. BOOL bcheck1=atoi(m_check1);
  7767. BOOL bcheck2=atoi(m_check2);
  7768. BOOL bcheck3=atoi(m_check3);
  7769. BOOL bcheck4=atoi(m_check4);
  7770. if( !(bcheck1 || bcheck2 || bcheck3 || bcheck4) )
  7771. {
  7772. return;
  7773. }
  7774. int edit1=atoi(m_edit1);
  7775. int edit2=atoi(m_edit2);
  7776. int edit3=atoi(m_edit3);
  7777. int edit4=atoi(m_edit4);
  7778. //path
  7779. CStringArray patharray;
  7780. {
  7781. #ifdef CHILD_VERSION
  7782. if(g_path1.Find(":")==-1 && g_path1!="")
  7783. g_path1="\\\\"+g_path1+"\\客户原片备份(儿童管理软件)$";
  7784. if(1)//(localname.CompareNoCase (g_path1)==0 || CompareIP(localname, g_path1)==0) && CheckFolderFileExist("\\\\"+g_path1+"\\客户原片备份(儿童管理软件)$"))
  7785. GetPathFromNetShareName("客户原片备份(儿童管理软件)$", g_path1);
  7786. if(g_path2.Find(":")==-1&& g_path2!="")
  7787. g_path2="\\\\"+g_path2+"\\修好的片备份(儿童管理软件)$";
  7788. if(1)//((localname.CompareNoCase (g_path2)==0 || CompareIP(localname, g_path2)==0) && CheckFolderFileExist("\\\\"+g_path1+"\\修好的片备份(儿童管理软件)$"))
  7789. GetPathFromNetShareName("修好的片备份(儿童管理软件)$", g_path2);
  7790. if(g_path4.Find(":")==-1&& g_path4!="")
  7791. g_path4="\\\\"+g_path4+"\\精修好的片备份(儿童管理软件)$";
  7792. if(1)//((localname.CompareNoCase (g_path4)==0 || CompareIP(localname, g_path4)==0) && CheckFolderFileExist("\\\\"+g_path1+"\\精修好的片备份(儿童管理软件)$"))
  7793. GetPathFromNetShareName("精修好的片备份(儿童管理软件)$", g_path4);
  7794. if(g_path3.Find(":")==-1&& g_path3!="")
  7795. g_path3="\\\\"+g_path3+"\\设计好的片备份(儿童管理软件)$";
  7796. if(1)//((localname.CompareNoCase (g_path3)==0 || CompareIP(localname, g_path3)==0) && CheckFolderFileExist("\\\\"+g_path1+"\\设计好的片备份(儿童管理软件)$"))
  7797. GetPathFromNetShareName("设计好的片备份(儿童管理软件)$", g_path3);
  7798. #else
  7799. if(g_path1.Find(":")==-1&& g_path1!="")
  7800. g_path1="\\\\"+g_path1+"\\客户原片备份(管理软件)$";
  7801. if(1)//((localname.CompareNoCase (g_path1)==0 || CompareIP(localname, g_path1)==0) && CheckFolderFileExist("\\\\"+g_path1+"\\客户原片备份(管理软件)$"))
  7802. GetPathFromNetShareName("客户原片备份(管理软件)$", g_path1);
  7803. if(g_path2.Find(":")==-1&& g_path2!="")
  7804. g_path2="\\\\"+g_path2+"\\修好的片备份(管理软件)$";
  7805. if(1)//((localname.CompareNoCase (g_path2)==0 || CompareIP(localname, g_path2)==0) && CheckFolderFileExist("\\\\"+g_path1+"\\修好的片备份(管理软件)$"))
  7806. GetPathFromNetShareName("修好的片备份(管理软件)$", g_path2);
  7807. if(g_path4.Find(":")==-1&& g_path4!="")
  7808. g_path4="\\\\"+g_path4+"\\精修好的片备份(管理软件)$";
  7809. if(1)//((localname.CompareNoCase (g_path4)==0 || CompareIP(localname, g_path4)==0) && CheckFolderFileExist("\\\\"+g_path1+"\\精修好的片备份(管理软件)$"))
  7810. GetPathFromNetShareName("精修好的片备份(管理软件)$", g_path4);
  7811. if(g_path3.Find(":")==-1&& g_path3!="")
  7812. g_path3="\\\\"+g_path3+"\\设计好的片备份(管理软件)$";
  7813. if(1)//((localname.CompareNoCase (g_path3)==0 || CompareIP(localname, g_path3)==0) && CheckFolderFileExist("\\\\"+g_path1+"\\设计好的片备份(管理软件)$"))
  7814. GetPathFromNetShareName("设计好的片备份(管理软件)$", g_path3);
  7815. #endif
  7816. patharray.Add(g_path1) ;
  7817. patharray.Add(g_path2) ;
  7818. patharray.Add(g_path4) ;
  7819. patharray.Add(g_path3) ;
  7820. }
  7821. if(patharray.GetSize ()==0)return;
  7822. CArray<CDatabase*,CDatabase*>dbarray2;
  7823. dbarray2.Copy(g_dbHistoryArray);
  7824. dbarray2.InsertAt(0, &g_db);
  7825. WriteLogin("开始删除取件后的备份照片");
  7826. for(int n=0; n<min(3,dbarray2.GetSize ()); n++)
  7827. {
  7828. g_curdb=dbarray2.ElementAt (n);
  7829. DWORD ii=0;
  7830. CArray<CStringArray, CStringArray>g_List1array;
  7831. {
  7832. CString filter="status3='OK' and time5 is not null and time5<>''";
  7833. CRecordset myset(g_curdb);
  7834. CString sql="select count(*) as cot from dindan";if(!filter.IsEmpty ())sql+=" where "+filter;
  7835. myset.Open (CRecordset::forwardOnly, sql);
  7836. myset.GetFieldValue ("cot", sql);
  7837. myset.Close();
  7838. int count=atol(sql);
  7839. if(count==0)continue;
  7840. g_List1array.SetSize(count , 1 );
  7841. CRstDindanForm rsSt; rsSt.m_pDatabase=g_curdb; if(!filter.IsEmpty ())rsSt.m_strFilter =filter;
  7842. rsSt.Open();
  7843. ii=0;
  7844. while(!rsSt.IsEOF())
  7845. {
  7846. g_List1array.ElementAt (ii).RemoveAll ();
  7847. g_List1array.ElementAt (ii).Add(rsSt.id) ;
  7848. g_List1array.ElementAt (ii).Add(rsSt.time5) ;
  7849. ii++;
  7850. rsSt.MoveNext();if(g_List1array.GetSize ()<=ii)break;
  7851. }
  7852. rsSt.Close();
  7853. g_List1array.SetSize(ii , 1 );
  7854. CString time5,id;
  7855. CTime curtm=CTime::GetCurrentTime ();
  7856. CString strtime;
  7857. for(int i=0; i<g_List1array.GetSize (); i++)
  7858. {
  7859. id=g_List1array.ElementAt (i).ElementAt (0);
  7860. time5=g_List1array.ElementAt (i).ElementAt (1);
  7861. if(bcheck1)//原片
  7862. {
  7863. CTimeSpan sp(edit1*30, 0, 0, 0);
  7864. CTime tm=curtm-sp;
  7865. strtime=tm.Format ("%Y-%m-%d");
  7866. if(strtime>time5)
  7867. {
  7868. if(DelPhoto1(patharray.ElementAt (0),g_List1array.ElementAt (i).ElementAt (0)))
  7869. WriteLogin("原片备份"+ patharray.ElementAt (0)+"\\"+g_List1array.ElementAt (i).ElementAt (0) );
  7870. // DelPhoto1(patharray2.ElementAt (0),g_List1array.ElementAt (i).ElementAt (0));
  7871. }
  7872. }
  7873. if(bcheck2)
  7874. {
  7875. CTimeSpan sp(edit2*30, 0, 0, 0);
  7876. CTime tm=curtm-sp;
  7877. strtime=tm.Format ("%Y-%m-%d");
  7878. if(strtime>time5)
  7879. {
  7880. DelPhoto1(patharray.ElementAt (1),g_List1array.ElementAt (i).ElementAt (0));
  7881. // DelPhoto1(patharray2.ElementAt (2),g_List1array.ElementAt (i).ElementAt (0));
  7882. }
  7883. }
  7884. if(bcheck3)
  7885. {
  7886. CTimeSpan sp(edit3*30, 0, 0, 0);
  7887. CTime tm=curtm-sp;
  7888. strtime=tm.Format ("%Y-%m-%d");
  7889. if(strtime>time5)
  7890. {
  7891. DelPhoto1(patharray.ElementAt (2),g_List1array.ElementAt (i).ElementAt (0));
  7892. // DelPhoto1(patharray2.ElementAt (2),g_List1array.ElementAt (i).ElementAt (0));
  7893. }
  7894. }
  7895. if(bcheck4)
  7896. {
  7897. CTimeSpan sp(edit4*30, 0, 0, 0);
  7898. CTime tm=curtm-sp;
  7899. strtime=tm.Format ("%Y-%m-%d");
  7900. if(strtime>time5)
  7901. {
  7902. DelPhoto1(patharray.ElementAt (3),g_List1array.ElementAt (i).ElementAt (0));
  7903. }
  7904. }
  7905. }
  7906. }
  7907. }
  7908. g_curdb=&g_db;
  7909. #ifdef ENTERPRISE_VERSION
  7910. WriteLogin("本店查完,开始检查分店备份");
  7911. CString g_domain;
  7912. CArray<CStringArray, CStringArray>g_List1array;
  7913. CString autorunpath=g_mainpath+"\\branchdindan.dat";
  7914. CFile fp;
  7915. if(fp.Open(autorunpath, CFile::modeRead))
  7916. {
  7917. int nMessageLen=fp.GetLength();
  7918. BYTE *pData=new BYTE[nMessageLen];
  7919. fp.Read(pData, nMessageLen);
  7920. fp.Close();
  7921. BYTE *szChatMessage = pData;
  7922. int count;
  7923. memcpy(&count, szChatMessage+(nMessageLen-sizeof(int)), sizeof(int));
  7924. CMemFile memfile;
  7925. memfile.Attach (szChatMessage, nMessageLen);
  7926. CArchive ar(&memfile, CArchive::load);
  7927. g_List1array.SetSize(count);
  7928. for(int ii=0; ii<g_List1array.GetSize (); ii++)
  7929. {
  7930. g_List1array.ElementAt (ii).Serialize (ar);
  7931. }
  7932. ar.Close();
  7933. memfile.Detach ();
  7934. delete []pData;
  7935. }
  7936. CString time5,id;
  7937. CTime curtm=CTime::GetCurrentTime ();
  7938. CString strtime;
  7939. for(int i=0; i<g_List1array.GetSize (); i++)
  7940. {
  7941. g_domain="\\"+g_List1array.ElementAt (i).ElementAt (0);
  7942. if(g_domain.Find (".ly.com")==-1)continue;
  7943. id=g_List1array.ElementAt (i).ElementAt (1);
  7944. time5=g_List1array.ElementAt (i).ElementAt (2);
  7945. if(bcheck1)//原片
  7946. {
  7947. CTimeSpan sp(edit1*30, 0, 0, 0);
  7948. CTime tm=curtm-sp;
  7949. strtime=tm.Format ("%Y-%m-%d");
  7950. if(strtime>time5)
  7951. {
  7952. if(DelPhoto1(patharray.ElementAt (0)+g_domain,id))
  7953. WriteLogin("分店原片备份"+ patharray.ElementAt (0)+g_domain+"\\"+id );
  7954. }
  7955. }
  7956. if(bcheck2)
  7957. {
  7958. CTimeSpan sp(edit2*30, 0, 0, 0);
  7959. CTime tm=curtm-sp;
  7960. strtime=tm.Format ("%Y-%m-%d");
  7961. if(strtime>time5)
  7962. {
  7963. DelPhoto1(patharray.ElementAt (1)+g_domain,id);
  7964. // DelPhoto1(patharray2.ElementAt (2),id);
  7965. }
  7966. }
  7967. if(bcheck3)
  7968. {
  7969. CTimeSpan sp(edit3*30, 0, 0, 0);
  7970. CTime tm=curtm-sp;
  7971. strtime=tm.Format ("%Y-%m-%d");
  7972. if(strtime>time5)
  7973. {
  7974. DelPhoto1(patharray.ElementAt (2)+g_domain,id);
  7975. // DelPhoto1(patharray2.ElementAt (2),id);
  7976. }
  7977. }
  7978. if(bcheck4)
  7979. {
  7980. CTimeSpan sp(edit4*30, 0, 0, 0);
  7981. CTime tm=curtm-sp;
  7982. strtime=tm.Format ("%Y-%m-%d");
  7983. if(strtime>time5)
  7984. {
  7985. DelPhoto1(patharray.ElementAt (3)+g_domain,id);
  7986. }
  7987. }
  7988. }
  7989. g_curdb=&g_db;
  7990. #endif
  7991. WriteLogin("检查删除备份照片完成");
  7992. }
  7993. catch(...)
  7994. {
  7995. WriteLogin("出错在函数AutoDelBakPhoto中");
  7996. }
  7997. g_curdb=&g_db;
  7998. }
  7999. //10.lia
  8000. //----------------------------------------------------------------------------
  8001. // Remark by Jeff 2014.10.22
  8002. // 函数:GenYLGL
  8003. // 描述:调用本地客户端;
  8004. // 参数:#
  8005. // 返回:#
  8006. //
  8007. // 调用关系:
  8008. // 1.只由AutoDelPhoto()主动调用。
  8009. //
  8010. // 说明:传递genbranchdata给客户端,使客户端能够自动遍历branchinfo.dat里的分店信息,
  8011. // 客户端顺序连接所有分店并获取分店历史订单已完成取件的订单。最终将所有分店历史
  8012. // 订单已完成取件的送回服务端,保存在branchdindan.dat中.
  8013. //----------------------------------------------------------------------------
  8014. void CDBServerDlg::GenYLGL()
  8015. {
  8016. // 1.Jeff.删除文件,g_mainpath服务器DBServer.exe的目录;
  8017. CString autorunpath=g_mainpath+"\\YLGL.exe";
  8018. ::DeleteFile(autorunpath); // 删除YLGL.exe
  8019. WriteLogin("命令行启动:"+autorunpath);
  8020. // 2.重新生成YLGL.exe
  8021. CRstUpdate rsSt;
  8022. rsSt.m_pDatabase=&g_db;
  8023. rsSt.Open();
  8024. if(!rsSt.IsEOF())
  8025. {
  8026. CFile fp;
  8027. if(fp.Open(autorunpath, CFile::modeCreate|CFile::modeWrite))
  8028. {
  8029. void *pData=GlobalLock(rsSt.data.m_hData);
  8030. fp.Write(pData, rsSt.data.m_dwDataLength);
  8031. fp.Close();
  8032. GlobalUnlock(rsSt.data.m_hData);
  8033. }
  8034. }
  8035. rsSt.Close();
  8036. // 3.执行YLGL.exe
  8037. ShellExecute(NULL, _T("open"), autorunpath, "genbranchdata", NULL, SW_HIDE);
  8038. }
  8039. //105