2012-04-03 67 views
-4
這個PHP代碼

我找了vb.net相當於該功能的:我沒有PHP的經驗,但過這個代碼這顯然給你從谷歌圖像隨機圖像URL來什麼是在VB.net

function GetRandomImageURL($topic='', $min=0, $max=100) 
{ 
    // get random image from Google 
    if ($topic=='') $topic='image'; 
    $ofs=mt_rand($min, $max); 
    $geturl='http://www.google.ca/images?q=' . $topic . '&start=' . $ofs . '&gbv=1'; 
    $data=file_get_contents($geturl); 

    $f1='<div id="center_col">'; 
    $f2='<a href="/imgres?imgurl='; 
    $f3='&amp;imgrefurl='; 

    $pos1=strpos($data, $f1)+strlen($f1); 
    if ($pos1==FALSE) return FALSE; 
    $pos2=strpos($data, $f2, $pos1)+strlen($f2); 
    if ($pos2==FALSE) return FALSE; 
    $pos3=strpos($data, $f3, $pos2); 
    if ($pos3==FALSE) return FALSE; 
    return substr($data, $pos2, $pos3-$pos2); 
} 

回答

1

它主要是字符串操作,建立圖像url。它選擇在這條線上指數0100之間的僞隨機圖像

$ofs=mt_rand($min, $max); 

同樣可以與Random類在.net實現

Dim rnd As New Random() 
Dim ofs As Int = rnd.Next(min, max) 

我離開這個字符串操作到OP,但其可能更好的做法是使用StringBuilder課程,或者使用String.Format

值得考慮的是0100的界限是否過於謹慎。