人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

リンクチェックをしてくれるwindows のアプリ探しています。ID,URLのCSVファイルを読み込ませると、結果がCSV ID,URL,結果でかえってくるものが理想です。あるんでしょうか? バッチで、数百個のリンクチェックをしたいのです。ID付きを扱えるなら非常によいですが、あるんでしょうか?


●質問者: kaiketsu
●カテゴリ:インターネット ウェブ制作
✍キーワード:CSV URL Windows アプリ バッチ
○ 状態 :終了
└ 回答数 : 3/3件

▽最新の回答へ

1 ● rinqoo
●27ポイント

Website Explorerはいかがでしょうか?

リンクチェック機能も強力です。

http://www.interq.or.jp/engineer/umechan/webex/

ID,URLのCSVファイルを読み込ませる形ではありませんが同ドメイン内にリンクリストをHTML形式でアップして

それをWebsite Explorerのスタートページにすれば要望に近いことができると思います。


2 ● Committeeman
●27ポイント

いろいろありますけどIDまでは見当たらないですね

perl/phpで作ったほうがいいかもしれないですね

http://www.vector.co.jp/vpack/filearea/win/net/htmledit/link/


3 ● ardarim
●26ポイント

Excel VBAで簡単なものを作ってみましたが、やりたいことはこれであってますでしょうか?

ExcelでCSVを読み込ませて(A列がID、B列がURLになる)、マクロLinkCheckを実行すると、C列にURLのチェック結果(OK or リンク切れ)を記入します。

実行後は、ExcelでCSV形式に保存できます。

Sub LinkCheck()

 Dim r As Long
 
 r = 1
 Do While Cells(r, 2).Value <> ""
 If CheckUrlExistence(Cells(r, 2).Value) Then
 Cells(r, 3).Value = "OK"
 Else
 Cells(r, 3).Value = "リンク切れ"
 End If
 Cells(r, 3).Show
 r = r + 1
 Loop

End Sub

Function CheckUrlExistence(ByVal url As String) As Boolean

 Dim xmlhttp As Object
 
 On Error Resume Next
 Set xmlhttp = CreateObject("MSXML2.XMLHTTP")
 If Err.Number <> 0 Then
 Set xmlhttp = CreateObject("MSXML.XMLHTTPRequest")
 End If
 On Error GoTo 0
 
 On Error Resume Next
 xmlhttp.Open "GET", url, False
 xmlhttp.Send
 On Error GoTo 0
 
 If xmlhttp.Status < 200 Or xmlhttp.Status > 399 Then
 CheckUrlExistence = False
 Else
 CheckUrlExistence = True
 End If

 Set xmlhttp = Nothing
 
End Function

URLはダミー

http://q.hatena.ne.jp/1272978454

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ