Official Ruby FAQの中に「What is a destructive method?」という項目が用意されていました。日本語版の訳は見つかりませんでした。
The plain version creates a copy of the receiver, makes its change to it, and returns the copy. The “bang” version (with the !) modifies the receiver in place.
Note that you can make non-destructive text by using xor ink which complements the background so that reshowing the text crases it while restoring what was
underneath.
今週から、「Associate Tag：●●●●●●」アカウントでAPIを叩くと
「Error! RequestThrottled」とのエラーが出るようになりました。
「 You are submitting requests too quickly. Please retry your requests at a
slower rate.」とありますが、多くてもアクセスは１時間に数回です。
また、ネットで調べると、規約改定により、30日間、売り上げが無いとAPIが使えなくなり、その時も上記エラーが出る。とありました。
上記のエラーはこれに該当するものでしょうか？
また、ほかに原因となりそうな点がございましたらご教示いただけると幸いです。
よろしくお願い申し上げます。
amazonカスタマーサービスから返ってきたのは
Amazon.co.jpアソシエイト・プログラムにお問い合わせいただき、ありがとうございます。
下記メッセージが表示される状態はAPIのサーバーに複数の同時アクセスがあり、先着順で接続処理が行われ、その中で接続出来なかった方に表示されるものとなります。
---------------------------------------------------------------------
You are submitting requests too quickly. Please retry your requests at a
slower rate.
---------------------------------------------------------------------
つまり、お客様以外にも多数のお客様がPA-APIのリクエストを試みている場合は上記メッセージは出やすくなるかと存じます。
1日のリクエスト可能数をご理解の上、上記メッセージが返却・表示された場合は、再度リクエストを送信いただきますようお願いいたします。
アソシエイト・プログラムをご利用いただき、ありがとうございます。
カスタマーサービスからのお知らせ
Amazon.co.jpアソシエイト・プログラムにお問い合わせいただき、ありがとうございます。
下記メッセージが表示される状態はAPIのサーバーに複数の同時アクセスがあり、先着順で接続処理が行われ、その中で接続出来なかった方に表示されるものとなります。
---------------------------------------------------------------------
You are submitting requests too quickly. Please retry your requests at a
slower rate.
---------------------------------------------------------------------
つまり、お客様以外にも多数のお客様がPA-APIのリクエストを試みている場合は上記メッセージは出やすくなるかと存じます。
1日のリクエスト可能数をご理解の上、上記メッセージが返却・表示された場合は、再度リクエストを送信いただきますようお願いいたします。
Dim isbn As String
Dim ans As String
Dim doc As New XmlScraping
isbn = InputBox("ISBN-10を入力ください", "")
ans = "https://www.amazon.co.jp/dp/" & isbn
If ans <> "" Then
doc.gotoPage ans
End If
Worksheets("tool").Select
numberTitles = doc.css(".content ul li").count
Cells(1, 1) = "タイトル"
Cells(1, 2) = doc.css("#productTitle").index(0).text
Cells(2, 1) = "画像URL"
Cells(2, 2) = doc.css("#img-canvas").index(0).html
Cells(3, 1) = "価格"
Cells(3, 2) = doc.css(".a-color-price").index(0).text
Cells(3, 2) = Replace(Cells(3, 2), "￥", "")
Cells(3, 2) = Replace(Cells(3, 2), "\", "")
For i = 1 To numberTitles - 1
If InStr(doc.css(".content ul li").index(i).text, "出版社") > 0 Then
Cells(5, 2) = doc.css(".content ul li").index(i).text
Cells(5, 2) = Replace(Cells(5, 2), "出版社: ", "")
Cells(5, 1) = "出版社"
ElseIf InStr(doc.css(".content ul li").index(i).text, "ISBN-10") > 0 Then
Cells(6, 2) = doc.css(".content ul li").index(i).text
Cells(6, 2).NumberFormatLocal = "@"
Cells(6, 2) = Replace(Cells(6, 2), "ISBN-10: ", "")
Cells(6, 1) = "amazonコード"
End If
Next i
後は、正規表現で必要な値を取り出していく。例えば以下。
Dim x As String
Dim regx As RegExp
Dim m As Match
Dim ms As MatchCollection
Set regx = New RegExp
regx.Pattern = "https:\/\/images-.{2}\.ssl-images-amazon\.com\/images\/.*\.jpg"
regx.Global = True
Set ms = regx.Execute(Cells(2, 2))
For Each m In ms
Cells(2, 2) = m
Next
Set regx = Nothing
Cells(2, 2) = Replace(Cells(2, 2), "https://images-fe.ssl-images-amazon.com/images/I/", "")
同じようにISBNを使って楽天の該当商品まで行き、値を取って正規表現で綺麗にしてあげればOK。
ans2 = "https://books.rakuten.co.jp/search?sitem=" & Cells(6, 2)
If ans2 <> "" Then
doc2.gotoPage ans2
End If
Cells(7, 2) = doc2.css(".rbcomp__item-list__item__image").index(0).html
Dim x2 As String
Dim regx2 As RegExp
Dim m2 As Match
Dim ms2 As MatchCollection
Set regx2 = New RegExp
regx2.Pattern = "https:\/\/books\.rakuten\.co\.jp\/rb\/.{8}\/"
regx2.Global = True
Set ms2 = regx2.Execute(Cells(7, 2))
For Each m2 In ms2
Cells(7, 2) = m2
Next
Cells(7, 2) = Replace(Cells(7, 2), "https://books.rakuten.co.jp/", "")
Set regx2 = Nothing
//if(isset($options['query'])){$value=$options['query'];if(is_array($value)){$value=http_build_query($value,null,'&',PHP_QUERY_RFC3986);//この行に問題あり}if(!is_string($value)){thrownew\InvalidArgumentException('query must be a string or array');}$modify['query']=$value;unset($options['query']);}
$composer require --dev beyondcode/laravel-dump-server
Using version ^1.4 for beyondcode/laravel-dump-server
./composer.json has been updated
Loading composer repositories with package information
Updating dependencies (including require-dev)
Nothing to install or update
Package zendframework/zend-code is abandoned, you should avoid using it. Use laminas/laminas-code instead.
Package zendframework/zend-eventmanager is abandoned, you should avoid using it. Use laminas/laminas-eventmanager instead.
Generating optimized autoload files
>Illuminate\Foundation\ComposerScripts::postAutoloadDump
>@php artisan package:discover --ansi
In Connection.php line 32:
Argument 1 passed to Symfony\Component\VarDumper\Server\Connection::__const
ruct() must be of the type string, null given, called in /work/backend/vend
or/beyondcode/laravel-dump-server/src/DumpServerServiceProvider.php on line
49
Script @php artisan package:discover --ansi handling the post-autoload-dump event returned with error code 1
Installation failed, reverting ./composer.json to its original content.
void setup() {
// put your setup code here, to run once:
pinMode(33,OUTPUT);
}
void loop() {
// put your main code here, to run repeatedly:
digitalWrite(33,HIGH);
delay(500);
digitalWrite(33,LOW);
delay(500);
}
