Bible | Movies | Books | People | Hot Topics | Holidays | Humor | Gallery | Sanctuary | Sermons | Prayer | Quizzes | Communities | God | FAQ | Links
|
|
You are invited to use our search engine to find cook books to help prepare that delicious Thanksgiving meal. Note how many there are! We have not ranked or rated any of these books. But we find it fascinating to see what's in print now. Note that you can also change the key words in the box below and look for books on any topic you are interested in exploring. Enjoy!
\n"; } } //for all parameters see if the user has overruled it or use the default foreach ($Adefault as $i=>$d) { $$i=isset($_GET[$i])?$_GET[$i]:$d; if ($jaap) echo $tab."$i = '".$$i."' \n"; } //this is a test for someone: if ($jb) { $operation ='SellerListingSearch'; $show_array=1; } //use which servers? //$norserver=$Aserver[$locale]['nor']; //$xmlserver=$Aserver[$locale]['xml']; //20090817: this is no longer used it seems: //$dev_token='D2WMCOIPS9D14E'; //you can replace this with your own developer token after you have changed the script a lot //get one from http://associates.amazon.com/exec/panama/associates/join/developer/application.html //see: //http://forums.prospero.com/n/mb/message.asp?webtag=am-assocdevxml&msg=378.1&ctx=0 //this is the data that is used to form the request for AWS //this is the part that is search specific if ($jb) { //this is a test for someone $parameters=array( 'Operation' =>$operation , 'SellerId' =>'A23I0F0MWQH94Z' , // 'Keywords' =>urlencode($search) , // 'SearchIndex' =>$searchindex , //Books for example. // "$searchparameter"=>$searchparameterdata , 'ItemPage' =>$page , //which page? // 'Service' =>'AWSECommerceService' , //this makes it version 4 // 'SubscriptionId' =>$subscriptionid , //is this correct? // 'AWSAccessKeyId' =>$awsaccesskeyid , //is this correct? 'AssociateTag' =>$Aassociates_id[$locale], // 'ResponseGroup' =>'Medium' , //Small, Medium or Large 'ResponseGroup' =>'SellerListing' , //Small, Medium, Large or SellerListing ); } else { $parameters=array( 'Operation' =>$operation , 'Keywords' =>urlencode($search) , 'SearchIndex' =>$searchindex , //Books for example. "$searchparameter"=>$searchparameterdata , 'ItemPage' =>$page , //which page? // 'Service' =>'AWSECommerceService' , //this makes it version 4 // 'SubscriptionId' =>$subscriptionid , //is this correct? // 'AWSAccessKeyId' =>$awsaccesskeyid , //is this correct? 'AssociateTag' =>$Aassociates_id[$locale], 'ResponseGroup' =>'Medium' , //Small, Medium, Large or SellerListing ); } $A=aws_request($parameters); //do the AWS request via cache and decode the XML //debug: if ($jaap) { echo $tab." \n"; echo $tab." \n"; print_r ($A); echo $tab."\n"; //echo $tab." \n"; //echo $tab." \n"; //var_dump ($A); //echo $tab."\n"; //echo $tab." \n"; //echo $tab." \n"; //var_export ($A); //echo $tab."\n"; echo $tab." \n"; print_array($A); echo $tab." \n"; } $Amicrotime['XML'][1]=getmicrotime(); //time after XML decoding //debug: show the array or object //you can easily use this debugging tool by adding '&show_array=1' to the URL of this script if ($show_array) { //show the array for debugging? print_array($A,$tab); //show the complete array } //show the stuff $Amicrotime['show'][0]=getmicrotime(); //time before showing stuff echo $tab." ".xu('searching for')." '$searchparameterdata'\n"; //you can change the h2's to h1's //20090827/old code: //if ($e=$error_msg) { // switch ($Aerror[$e]) { // case 'print': // echo $tab."$e\n"; // break; // default: // echo $tab.xu('Amazon returned the error').': '.$e." \n"; // echo $tab." \n"; // echo $tab.xu('please add this error message to the '). // "". // xl('database').". \n"; // break; // } //} //$jaap=true; //actually show the products: //echo $A->Items->Request->IsValid; if (isset($A->Error)) { $c=$A->Error->Code; $e=$A->Error->Message; echo $tab."Amazon error: $c: $e \n"; } else if ($A->Items->Request->IsValid!='True') { $c=$A->Items->Request->Errors->Error->Code; $e=$A->Items->Request->Errors->Error->Message; echo $tab."Amazon error: $c: $e \n"; } else { print_products($A,$tab); } //print all the products function print_products($A,$tab='') { global $jaap; global $language; global $locale; global $operation; global $page; global $search; global $searchparameter; global $searchparameterdata; switch ($operation) { case 'SellerListingSearch': die("sorry but SellerListingSearch doesn't work yet"); $items =$A['SellerListingSearchResponse']['SellerListings']; $subnode='SellerListing'; break; default: // $items=$A['ItemSearchResponse']['Items']; //old // $subnode='Item'; // break; if ($jaap) { echo $tab."in print_products(): \n"; echo $tab."A: \n"; print_array($A,$tab=''); } $items =$A ->Items; // $items_sub=$items->Item; $aitems=(array)$items; //it is very strange that this and the next line works and not the outcommented line before this one $items_sub=$aitems['Item']; if ($jaap) { echo $tab."items: \n"; echo $tab." \n";
print_r($items);
echo $tab."\n";
echo $tab."items:\n"; print_array($items,$tab=''); echo $tab."items->Item: \n"; echo $tab." \n";
print_r($items->Item);
echo $tab."\n";
echo $tab."items->Item:\n"; print_array($items->Item,$tab=''); echo $tab."items_sub: \n"; echo $tab." \n";
print_r($items_sub);
echo $tab."\n";
echo $tab."items_sub:\n"; print_array($items_sub,$tab=''); } break; } $npro=$items->TotalResults; $npag=$items->TotalPages; echo $tab."".xu('number of products').": $npro \n"; echo $tab."".xu('page').' '.($page).' '.xl('of').' '.((int)$npag)." \n"; echo $tab."\n"; echo $tab." \n"; echo $tab.xu('page:')."\n"; echo $tab.make_link_to_page(1,1)."\n"; echo $tab.make_link_to_page(2,2)."\n"; if ($page>=2) { echo $tab.make_link_to_page($page-1,'<')."\n"; } if ($page')."\n"; } echo $tab.make_link_to_page($npag,$npag)."\n"; } } //print one Amazon product //version 4 function print_product($E,$tab) { //global $Aassociates_id; //global $dev_token; //global $f_rich; //do you want 15% or 5%? (only for discounted books), 20090624: I don't know if this is still relevant global $jaap; global $locale; //global $norserver; if ($E) { if ($jaap) echo $tab."print_product() \n"; $url=$E->DetailPageURL; if ($jaap) echo $tab."url=$url \n"; $E2A=(array)$E; $url=$E2A['DetailPageURL']; if ($jaap) echo $tab."url=$url \n"; if ($jaap) print_array($E2A); //print_array($E); //rebuild the URL if you want 15% instead of 5%: //20090804/wjvg: changed this: // $url=($f_rich /*and $mode=='books' and $locale=='us'*/)?"$norserver/exec/obidos/ASIN/".$E['ASIN'].'/ref=nosim/'.$Aassociates_id[$locale].'?dev-t='.$dev_token:$E['url']; //$url=($f_rich /*and $mode=='books' and $locale=='us'*/)?"$norserver/exec/obidos/ASIN/".$E['ASIN'].'/'.$Aassociates_id[$locale]:$E['url']; echo $tab. " | |||||
| \n";
if ($d=$E->MediumImage) {
$iu=$d->URL;
$ih=$d->Height;
$iw=$d->Width;
echo $tab. " | \n";
echo $tab. " \n";
if ($d=$E->ItemAttributes->Title) {
echo $tab. " $d \n"; } if (is_array($dd=$E->ItemAttributes->Author)) { echo $tab. " ".xl('by').": "; foreach ($dd as $i=>$d) { if ($i) echo ', '; //echo $tab."$d"; } echo " \n"; } else if ($d=$dd) { echo $tab. " ".xl('by').": $d \n"; } $dm=$E->ItemAttributes->Publisher; $dr=$E->ItemAttributes->PublicationDate; if ($dm or $dr) { echo $tab. " "; if ($dm) { echo xl('publisher').": $dm"; } if ($dm and $dr) echo ', '; if ($dr) { echo xl('published').": $dr"; } echo " \n"; } if ($asin=$E->ASIN) { echo $tab. " ASIN: $asin \n"; } if ($ean=$E->ItemAttributes->EAN) { echo $tab." EAN: $ean \n"; } //$da=$E->Reviews->AvgCustomerRating; //not in Medium Set? $da=false; //don't show $ds=$E->SalesRank; if ($da or $ds) { echo $tab. " "; if ($ds) echo xl('sales rank').": $ds"; if ($da and $ds) echo ", "; if ($da) echo $tab.xl('customer rating').": ".(($da-1)*25)."%"; echo " \n"; } $do=$E->OfferSummary->LowestNewPrice ->FormattedPrice; $du=$E->OfferSummary->LowestUsedPrice->FormattedPrice; if ($do or $du) { echo $tab. " ".xl('price').": "; if ($do) echo "$do (".xl('new').")"; if ($do and $du) echo ", "; if ($du) echo "$du (".xl('used').")"; echo " \n"; } echo $tab. " | \n";
if ($EditorialReviews=$E->EditorialReviews and
$EditorialReview=$EditorialReviews->EditorialReview and
$Content=$EditorialReview->Content) {
echo $tab. " \n"; echo $tab. " $Content\n"; echo $tab. " | \n"; } echo $tab. "||||
| $i | \n"; // print_r($d); if (is_string($d)) { // echo $tab." STRING\n"; // print_r($d); // echo $tab."".htmlentities($d)." | \n";
echo $tab." ".htmlentities($d)." | \n"; } else if (is_array($d)) { // echo $tab." ARRAY or OBJECT\n"; echo $tab."\n"; print_array($d,$tab.' '); echo $tab." | \n"; } else if (is_object($d)) { // echo $tab." ARRAY or OBJECT\n"; echo $tab."object:\n"; print_array((array)$d,$tab.' '); echo $tab." | \n"; } else { // echo $tab." ELSE\n"; // print_r($d); // echo $tab."".htmlentities($d)." | \n";
echo $tab." ".htmlentities($d)." | \n"; } echo $tab."
\n"; } } function getmicrotime() { list($us,$s)=explode(' ',microtime()); return (float)$us+(float)$s; } if ($f_user_search) { //the next section adds a search box for the users echo $tab. "
\n"; echo $tab. "\n"; //end of the search box section } //phpinfo(); $Amicrotime['show' ][1]=getmicrotime(); //time after showing $Amicrotime['total'][1]=getmicrotime(); //time at end //The next part is to show if the script isn't overburdoning your server. (The time waiting for Amazon isn't burdoning your server). You can remove the next part if you like: echo $tab."
\n"; //echo("Time used for time-consuming parts:
\n"); echo $tab."Time used:
\n"; foreach ($Amicrotime as $i=>$d) { //if ($d[1]>$d[0]) { printf($tab."- %.2f s %s
\n",$d[1]-$d[0],$i); //} } //20091129/wjvg: you may remove these lines or move them to an about section of your site: echo $tab."
\n"; echo $tab."This script is GPL'ed and can be downloaded from this page.
\n"; echo " \n"; echo "\n"; //end
|
|
| Charles Henderson |
You are invited to join our Forum
and discuss any issues
pertaining to faith or the search for it.
Your comments are published here instantly.
CrossCurrents
Forum
(To see the current list of topics your browser must allow Active Content)
| CrossCurrents |
| Recent Discussions |
Please take a moment to let us know you
were here!
Just send us an email to subscribe to our free newsletter.
For those who prefer a form: Click here to subscribe.
If you want to talk with someone in person, please feel free to call 917-439-2305
The Rev. Charles P. Henderson is a Presbyterian minister and
Executive Director of
CrossCurrents.
He is the author of God and Science (John Knox Press, 1986).
A revised and expanded version of the book is appearing here.
God and Science (Hypertext Edition,
2005).
He is also editor of a new book, featuring articles by world class scientists and theologians, and illustrating the leading views on the relationship between science and religion:
Faith, Science and the Future (CrossCurrents Press, 2007).
Charles also tracks the boundry between the virtual and the real at his blog: Next World Design, focusing on the mediation of art, science and spirituality in the metaverse.
For more information about Charles Henderson.Subscribe to the GodWeb Site Feed
