Prikazi cijelu temu 02.04.2015 11:43
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Lokacija:Ohrid Makedonija


Predmet:Re: Prihodi i rashodi
Moze toa da se izvede samo e malku komplicirano.
Jas vo eden program imav nesto slicno za resavajne i go resiv na sledniov nacin.
Vo makedonija broevite doagaat se formatirani vaka.
Dokolku brojot e od stara lokalna centrala doaga vo format 000000 ili ako e mnogu stara centrala e 00000
znaci imame 6 i 5 brojki (ova vazi samo za lokalni centrali od fiksen operator)
Kaj mene resenieto za ovaj tip na broevi bese
select case Len(Tel_Beroj)
case 5
me.Broj = format (Tel_broj,"00-000")
case 6
me.Broj= format (Tel_broj,"000-000")
end select
e sega imame i megugradski broevi koi se so 9 brojki od koi prvite tri se prefix za gradot a ostanatite 6 se brojot od telefonot so isklucok na glavniot grad(Skopje)kade sto samo prvite dve projki se prefix za gradot a ostanatite se brojot so toa sto ako programot raboti vo glavniot grad odnosno na centralite od glavniot grad vazi gornata funccija so toa sto imame :
case 7
me.Broj= format (Tel_broj,"000-0000")
Ova e samo primer kako jas go resiv ova kaj mene ima tuka uste Selec Case bidejki mora prvo da se odredi dali brojot e lokalen megugradski ili povik od druga drzava , potoa imame funkcija dali toj broj e od fiksen ili mobilen operator a moze da bide i internet broj i na kraj na osnova na site ovie proverki mozime da napravime formatirajne na brojot.
Jas poveketo informacii za broevite gi sobrav od internet odnosno od operatorite os sekoja drzava za koja sto mislev deka ke mi treba.
Nemam ovde primer od toj program inaku ke stavev nekoe gotovo resenie ova sto go napisav e samo po sekavajne kako go resavav problemot.
Kaj mene se rabotese za Taxi kompanija koja sekojdnevno prima 200-300 telefonski povici od razni mesta i broevi vklucuvajki lokalni megugradski ,stranski i drugi broevi.