php - Showing link of which random swf was opened -

-

i'm new php , seems i'm asking code in reality want know how implement link along random selector.

my code:

<?php $imglist=''; //$img_folder variable holds path swf files. // see dont forget "/" @ end $img_folder = "../files/flash/"; mt_srand((double)microtime()*1000); //use directory class $imgs = dir($img_folder); //read files directory, ad them list while ($file = $imgs->read()) { if (preg_match("/\.swf$/i", $file)) $imglist .= "$file "; } closedir($imgs->handle); //put images array $imglist = explode(" ", $imglist); $no = sizeof($imglist)-2; //generate random number between 0 , number of images $random = mt_rand(0, $no); $image = $imglist[$random]; //display random swf echo '<embed src="'.$img_folder.$image.'" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="650" height="450"></embed>'; ?>

this grabs random flash file site's directory. since won't affect url bar, won't able send (which unintentional security feature). want them able send link or possibly direct click download.

also, thinking of random generator, make left , right arrow can scroll through .swf's in chosen directory, if possible.

the site www.nsgaming.us , it's 'random' button under text logo.

what asking reading parameters url people can link friends swf embed, can using $_get

look @ example coded.

    $swfs = array(); $swf_location = '../files/flash/';  if($handle = opendir($swf_location)) {     while(false !== ($entry = readdir($handle))) {         if(strtolower(pathinfo($path, pathinfo_extension)) == 'swf') {             $swfs[] = $entry;         }     }     closedir($handle); }  if(isset($_get['swf']) && in_array($_get['swf'], $swfs)) {     $swf = $_get['swf']; } else {     $swf = $swfs[rand(0, count($swfs))]; }  echo '<embed src="' . $swf_location . $swf . '" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="650" height="450"></embed><br />send friend: <input type="text" value="http://yourwebsite.com/thisfilesname.php?swf=' . $swf . '" length="55">';

you're previous script messy , did lot of useless stuff, secure , faster


Comments

Post a Comment

Popular posts from this blog

c++ - Creating new partition disk winapi -

-
i'am trying create new partition , mount volume new, thought createfile let me this, code : lpctstr lpfilename=l"\\\\.\\device\\harddisk0\\partition3"; handle handl=createfile( lpfilename, generic_read | generic_write, file_share_read | file_share_write, null, create_always, file_attribute_normal, null ); if (handl==invalid_handle_value) { qdebug()<<"handl invalid"<<" error"<<getlasterror();} bool success = definedosdevice(ddd_raw_target_path,l"i:",l"\\device\\harddisk0\\partition3"); if(!success) qdebug()<<" definedosdevice failed "<<getlasterror(); bflag = getvolumenameforvolumemountpoint( l"i:\\", // input volume mount point or directory /** u in dir
Read more

Android Prevent Bluetooth Pairing Dialog -

-
i'm developing internal application uses bluetooth printing. want bluetooth pairing occur without user input. have managed working trapping android.bluetooth.device.action.pairing_request broadcast. in broadcast receiver call setpin method, , pairing works ok, bluetoothpairingdialog displayed second or two, disappears - see link below. https://github.com/android/platform_packages_apps_settings/blob/master/src/com/android/settings/bluetooth/bluetoothpairingdialog.java since broadcast non-ordered, can't call abortbroadcast() , , wondering if there other way prevent pairing dialog appearing. can hook window manager in way? i haven't been able come way without modifying sdk. if you're oem, it's easy (i'm on 4.3): in packages/apps/settings/androidmanifest.xml, comment intent filter pairing dialog: <activity android:name=".bluetooth.bluetoothpairingdialog" android:label="@string/bluetooth_pairing_request"
Read more

VBA function to include CDATA -

-
i have following function include cdata: function cdatasection() dim objdom domdocument dim objkmlrootelement ikmldomelement dim objkmlelement ikmldomelement dim cdata ikmldomcdatasection set objdom = new domdocument set objkmlrootelement = objdom.createelement("balloonstyle") objdom.appendchild objkmlrootelement set objkmlelement = objdom.createelement("text") objkmlrootelement.appendchild objkmlelement set cdata = objdom.createcdatasection("text") cdata.data = "<![cdata[<b>latitude = $[latitude]</b>?]]>;" end function when run above, getting error "user defined data type not found" function. yes ripster says find library reference. vba window tools>references for list of relevant references see... http://msdn.microsoft.com/en-us/library/windows/desktop/ms763701%28v=vs.85%29.aspx however, if have hard time tracking down reference, replace dim sta
Read more