DevProTalk

Forumi IT profesionalaca
web development, web design, e-business, SEO


Idite nazad   DevProTalk > Web development i web aplikacije > Code snippets
Beach Wedding Dresses - Looking for the Wedding Dress? Here, 1dress.co.uk stunning collection of beach wedding dresses is just what you are looking for.
charles wang

Code snippets Razmena snippets, funkcija, dodataka, algoritama,... pod uslovom je da ste vi autor ili imate dozvolu autora ili da navedete autora uz odgovarajucu licencu.

Odgovori
 
Alati teme Način prikaza
Staro 12. 09. 2010.   #1
webarto
expert
Grand Master
 
Avatar webarto
 
Datum učlanjenja: 11.04.2010
Poruke: 998
Hvala: 141
890 "Hvala" u 153 poruka
webarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished road
Default ViaMichelin PHP Class

PHP kôd:
class VM{
/**
 * ViaMichelin.com City2Hash PHP Class
 * @author Webarto.com
 * @copyright 2010
 * @website http://webarto.com/53/viamichelin-php-class
 */
    
    
public function generateLink($from$to){
    return 
'<a href="http://www.viamichelin.com/web/Itineraires?strStartLocid='.$this->getHash($from).'&amp;strDestLocid='.$this->getHash($to).'">Click here to get route from '.ucwords($from).' to '.ucwords($to).'</a>';   
    }
    
    private function 
getHash($city){
        
$city urlencode($city);
        
//cURL 4-5x faster than file_get_contents()
        
$ch curl_init();
        
curl_setopt($chCURLOPT_URL"http://www.viamichelin.com/vmw2/maf/dyn/controller/jseLocationFinder?strMerged=$city");
        
curl_setopt($chCURLOPT_RETURNTRANSFER1);
        
$data curl_exec($ch);
        
curl_close ($ch);
        
//Return hash from data
        
preg_match('/gf : \"(.*?)\"/'$data$bingo);
        if(!empty(
$bingo[1])) return $bingo[1];
    }

Pozivanjem funkcije...

PHP kôd:
$vm = new VM;
echo 
$vm->generateLink("beograd""novi sad"); //from city, to city 
Dobijemo...

<a href="http://www.viamichelin.com/web/Itineraires?strStartLocid=31NDIxOTMxMGNORFF1T0RBMU 56ST1jTWpBdU5EZzBNRFk9&strDestLocid=31NDIxZG0xMGNO RFV1TWpRM01qST1jTVRrdU9ESXlPRFE9">Click here to get route from Beograd to Novi Sad</a>

Odnosno KLIK

Odnosno

Nadam se da će pomoći nekome.

Homepage: http://webarto.com/53/viamichelin-php-class

Poslednja izmena od bluesman : 19. 09. 2010. u 22:10.
webarto je offline   Odgovorite uz citat
7 članova zahvaljuje webarto za poruku:
Staro 12. 09. 2010.   #2
zira
Vladan Zirojević
Grand Master
 
Datum učlanjenja: 09.06.2006
Lokacija: Beograd/Trebinje
Poruke: 903
Hvala: 106
183 "Hvala" u 82 poruka
zira ima spektakularnu auruzira ima spektakularnu auruzira ima spektakularnu auru
Pošaljite ICQ poruku za zira Pošaljite poruku preko Skype™ za zira
Default

Odlicno... steta sto ne radi dobro sa putarinom drumske mafije
__________________
Donesi.com SrediMe
zira je offline   Odgovorite uz citat
Staro 12. 09. 2010.   #3
webarto
expert
Grand Master
 
Avatar webarto
 
Datum učlanjenja: 11.04.2010
Poruke: 998
Hvala: 141
890 "Hvala" u 153 poruka
webarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished road
Default

Hehe, možda u nekoj drugoj verziji :P
webarto je offline   Odgovorite uz citat
Staro 19. 09. 2010.   #4
webarto
expert
Grand Master
 
Avatar webarto
 
Datum učlanjenja: 11.04.2010
Poruke: 998
Hvala: 141
890 "Hvala" u 153 poruka
webarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished road
Default

Možete li samo ukloniti ovog "lepotana", ovaj screenshot program je fail (overwriteovana slika). Hvala.
webarto je offline   Odgovorite uz citat
Staro 26. 11. 2010.   #5
webarto
expert
Grand Master
 
Avatar webarto
 
Datum učlanjenja: 11.04.2010
Poruke: 998
Hvala: 141
890 "Hvala" u 153 poruka
webarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished road
Default

Dodao sam opciju približnog računanja razdaljine između A i B na osnovu geo lokacije, kao i približno računanje puta (1/3 ukupne razdaljine), što više krivina, to je tačnije


PHP kôd:
$vm = new VM;
echo 
$vm->getDistance("beograd""novi sad"); 
Citat:
Distance between Beograd and Novi Sad is ~73.521 kilometers.
PHP kôd:
$vm = new VM;
echo 
$vm->getDistance("beograd""novi sad"true); 
Citat:
Distance between Beograd and Novi Sad is ~98.028 kilometers.
PHP kôd:
class VM{
/**
 * ViaMichelin.com City2Hash PHP Class (25.11.2010)
 * @author Webarto.com
 * @copyright 2010
 */
    
    
public function generateLink($from$to){
    return 
'<a href="http://www.viamichelin.com/web/Itineraires?strStartLocid='.$this->getHash($from).'&amp;strDestLocid='.$this->getHash($to).'">Click here to get route from '.ucwords($from).' to '.ucwords($to).'</a>';   
    }
    
    public function 
getDistance($from$to$road false){
        
$x $this->getLL($from);
        
$y $this->getLL($to);
        
$distance $this->distance($x[1], $x[0], $y[1], $y[0]);
        if(
$road == true){
            
$distance $distance + ($distance 3);
        }
        return 
"Distance between ".ucwords($from)." and ".ucwords($to)." is ~$distance kilometers.";
    }
    
    private function 
getHash($city){
        
$data $this->loadData($city);
        
preg_match('#gf : \"(.*?)\"#is'$data$bingo);
        if(!empty(
$bingo[1])) return $bingo[1];
    }
    
    private function 
getLL($city){
        
$data $this->loadData($city);
        
preg_match('#\{lon : (.*?), lat : (.*?)\}#is'$data$bingo);
        unset(
$bingo[0]);
        return 
$bingo;
    }
    
    private function 
loadData($city){
        
$city urlencode($city);
        
//cURL 4-5x faster than file_get_contents()
        
return $this->curl("http://www.viamichelin.com/vmw2/maf/dyn/controller/jseLocationFinder?strMerged=$city");
    }
    
    private function 
distance($lat1$lon1$lat2$lon2){ 
        
$theta $lon1 $lon2
        
$dist sin(deg2rad($lat1)) * sin(deg2rad($lat2)) +  cos(deg2rad($lat1)) * cos(deg2rad($lat2)) * cos(deg2rad($theta)); 
        
$dist acos($dist); 
        
$dist rad2deg($dist);
        
$miles $dist 60 1.1515;
        return 
round($miles 1.6093443);
    }
    
    
//cURL function
    
private function curl($url){
        
$ch curl_init();
        
curl_setopt($chCURLOPT_URL,$url);
        
curl_setopt($chCURLOPT_RETURNTRANSFER,1);
        return 
curl_exec($ch);
        
curl_close ($ch);
    }

Link: http://webarto.com/53/viamichelin-php-class
webarto je offline   Odgovorite uz citat
Staro 26. 11. 2010.   #6
MorenoArdohain
Knowledge base
Wrote a book
 
Avatar MorenoArdohain
 
Datum učlanjenja: 16.06.2005
Lokacija: Novi Sad
Poruke: 1.437
Hvala: 37
131 "Hvala" u 82 poruka
MorenoArdohain će postati "faca" uskoroMorenoArdohain će postati "faca" uskoro
Default

@webarto Ne mislis li da je dodavanje 1/3 razdaljine u najmanju ruku neozbiljno?

Zar ne dobijas tacnu razdaljinu putem njihovog API-ja? Na njihovom sajtu stoji da je razdaljina izmedju NS i BGD 87 km, sto je otprilike tacno.
__________________
Năo quero mais seguir um só caminho

Poslednja izmena od MorenoArdohain : 26. 11. 2010. u 12:59.
MorenoArdohain je offline   Odgovorite uz citat
Staro 26. 11. 2010.   #7
webarto
expert
Grand Master
 
Avatar webarto
 
Datum učlanjenja: 11.04.2010
Poruke: 998
Hvala: 141
890 "Hvala" u 153 poruka
webarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished road
Default

88km... naravno da jeste, kad bi išlo preko API, ali ne ide, API se plaća (za cijenu treba nazvati) i besplatan je prvih 45 dana, u tome je "problem".
webarto je offline   Odgovorite uz citat
Staro 04. 12. 2010.   #8
webarto
expert
Grand Master
 
Avatar webarto
 
Datum učlanjenja: 11.04.2010
Poruke: 998
Hvala: 141
890 "Hvala" u 153 poruka
webarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished roadwebarto is on a distinguished road
Default

Isprovociran koleginim postom (joke), napravih da bude kako i treba.

PHP kôd:
class VM{
/**
 * ViaMichelin.com PHP Class (4.12.2010)
 * @author Webarto.com
 * @copyright 2010
 */
    
    
public function generateLink($from$to){
    return 
'<a href="http://www.viamichelin.com/web/Itineraires?strStartLocid='.$this->getHash($from).'&amp;strDestLocid='.$this->getHash($to).'">Click here to get route from '.ucwords($from).' to '.ucwords($to).'</a>';   
    }

    public function 
getDistance($from$to){
        
$a $this->getHash($from);
        
$b $this->getHash($to);
        
$html $this->curl("http://www.viamichelin.com/web/Itineraires?strStartLocid=$a&strDestLocid=$b");
        
preg_match('#<span id="idResumeDistanceTotal">(.*?) km</span>#is'$html$bingo);
        return 
intval($bingo[1]);
    }

    public function 
getMap($from$to){
        
$a $this->getHash($from);
        
$b $this->getHash($to);
        
$html $this->curl("http://www.viamichelin.com/web/Itineraires?strStartLocid=$a&strDestLocid=$b");
        
preg_match('#"http://m1.viamichelin.com/mapsgene/dm/(.*?)"#is'$html$bingo);
        return 
"http://m1.viamichelin.com/mapsgene/dm/".$bingo[1];
    }

    private function 
getHash($city){
        
$data $this->loadData($city);
        
preg_match('#gf : \"(.*?)\"#is'$data$bingo);
        if(!empty(
$bingo[1])) return $bingo[1];
    }
    
    function 
getLL($city){
        
$data $this->loadData($city);
        
preg_match('#\{lon : (.*?), lat : (.*?)\}#is'$data$bingo);
        unset(
$bingo[0]);
        return 
$bingo;
    }
    
    private function 
loadData($city){
        
$city urlencode($city);
        return 
$this->curl("http://www.viamichelin.com/vmw2/maf/dyn/controller/jseLocationFinder?strMerged=$city");
    }

    private function 
curl($url){
        
$ch curl_init();
        
curl_setopt($chCURLOPT_URL$url);
        
curl_setopt($chCURLOPT_RETURNTRANSFER,1);
        return 
curl_exec($ch);
        
curl_close ($ch);
    }

PHP kôd:
$vm = new VM;

echo 
$vm->getDistance("beograd""novi sad"); // 87

echo $vm->getMap("beograd""novi sad"); // http://m1.viamichelin.com/mapsgene/dm/04LxfmB-n07biSPLE9YsjooDQn0fm2it7Bzh9tJi6BjxfebObLcqimOb9R-ZD5HiBV-bF3mwh4U4Ox4zTND4pQhwAjvr=Sx2HOJQ0piWtnDCMU5qMx3URFSRhQ83HRBQSJJ5vlHwmTxBWCsq=0Z-LoqvF2JQoqylZ-LzqyVU-Mzqy0I-9zq=U8o8zq=F5oIzcpFSmrMfg 
Funkcija getDistance vraća 87, što je stvarni broj kilometara, a getMap vraća source od mape, tipa...



Cheers.
webarto je offline   Odgovorite uz citat
Odgovori


Alati teme
Način prikaza

Pravila pisanja
Možete ne započinjati nove teme
Možete ne slati odgovore
Možete ne slati priloge
Možete ne izmeniti svoje poruke
vB kôd je Uključen
Smajliji su Uključen
[IMG] kod je Uključen
HTML kôd je Isključen
Pogledajte forum

Slične teme
Tema Početna poruka teme Forum Odgovori Poslednja poruka
define vs class constants bluesman PHP 2 21. 10. 2009. 19:53
World Class - Cyber Crime glaspodrinja.com e-Business 16 15. 12. 2006. 03:31
Browser Detection Class dinke PHP 13 02. 12. 2005. 15:51


Vreme je GMT +2. Trenutno vreme je 03:06.


Blogodak - Domaci blogovi na jednom mestu Caught in a web - web dev blog
Powered by vBulletin® Verzija 3.6.8
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Copyright © DevProTalk. All Rights Reserved.
Mišljenja, saveti, izjave, ponude ili druge informacije ili sadržaji nastali na Sajtu su vlasništvo onoga ko ih je kreirao, a ne DevProTalk.com, tako da ne morate da se oslanjate na njih.
Autori poruka su jedini odgovorni za ovakve sadržaje. DevProTalk.com ne garantuje tačnost, kompletnost ili upotrebnu vrednost informacija, stavova, saveta ili datih izjava. Ne postoje uslovi pod kojima bi mi bili odgovorni za štetu ili gubitak koji je posledica bilo čijeg oslanjanja na nepouzdane informacije, ili bilo kakve informacije nastale kroz komunikaciju između registrovanih članova.
Web sajt može sadržavati linkove na druge web sajtove na Internetu ili neke druge sadržaje. Ne kontrolišemo niti podržavamo te druge web sajtove, niti smo pregledali bilo kakve sadržaje na takvim sajtovima. Mi nećemo biti odgovorni za legalnost, tačnost ili prikladnost bilo kog sadržaja, oglasa, proizvoda, usluga ili informacije lociranim na ili distribuiranih kroz druge web sajtove, niti za bilo kakvu štetu nastalu kao posledica takvih informacija. DevProTalk.com drži i čuva druga prava vlasništva na web sajtu. Web sajt sadrže materijale zaštićene copyright-om, zaštitne znakove i druge informacije o pravu vlasništva ili softver. Članovi mogu poslatu informacije zaštićene pravima vlasništva njihovih nosilaca i ona ostaju zaštićena bez obzira da li su oni koji prenose te informacije to naveli ili ne. Osim informacija koje su u javnom vlasništvu ili za koje dobijete dozvolu, nemate pravo da kopirate, modifikujete ili na bilo koji način menjate, objavljujete, prenosite, distribuirate, izvršavate, prikazujete ili prodajte bilo koju informaciju zaštićenu pravima vlasništva. Slanjem informacija ili sadržaja na bilo koji deo DevProTalk.com, Vi automatski dozvoljavate i predstavljate garanciju da imate pravo da dozvolite DevProTalk.com ili članovima DevProTalk.com bespovratnu, kontinualnu, neograničenu, globalnu dozvolu da koriste, kopiraju, izvršavaju, prikazuju i distribuiraju takve informacije i sadržaje i da iz takvih sadžaja koriste bilo koji deo u bilo koje svrhe, kao i pravo i dozvolu da koriste gore navedene sadržaje. Svi zaštitni znakovi (trademarks), logotipi, oznake usluga, firme ili imena proizvoda koji se pominju na ovom web sajtu su vlasništvo kojim raspolažu njihovi vlasnici.