6

GoogleChromeには非常に多くのブックマークがあります。それらすべてをWindowsフォルダーに転送して、各ブックマークがWebサイトへのショートカットになるようにします（通常のアプリケーションのショートカットのリストと同じように、ショートカットのリストが必要です）。また、ブックマークの名前とアイコンを保持したいと思います。

目標を達成する方法を探しましたが、Chromeで手動 でリンクするか、ChromeブックマークマネージャーのブックマークからエクスポートされたHTMLファイルからフォルダーにリンクを手動でドラッグアンドドロップするだけでした。Create application shortcuts

簡単な解決策（AFAIK）がないので、別の方法でそれを達成することを考えました。

基本的に、私が持っているのはHTMLファイルです（内部のメニューの機能bookmarks.htmlによって作成されます。これはリンクの長いリストです（s）-私は250以上のブックマークを持っています。 Export bookmarks to HTML fileOrganizeBookmark Manager<a>

構造が既知であり、ファイル全体で同じであるため、正規表現でも可能ですが、おそらくXMLパーサーを使用して、ファイルから必要なデータを簡単に抽出できます。

...
<DT><A HREF="http://data.stackexchange.com/" ADD_DATE="1342120101" ICON="data:image/png;base64,iVBORw0......">Stack Exchange</A>
<DT><A HREF="http://www.istockphoto.com/" ADD_DATE="1285715116" ICON="data:image/png;base64,iVBORw0.......">Web Design</A>
<DT><A HREF="http://icons.mysitemyway.com/" ADD_DATE="1287435657" ICON="data:image/png;base64,iVBORw0........">Ico.etc</A>
<DT><A HREF="http://www.shutterstock.com/" ADD_DATE="1285715294" ICON="data:image/png;base64,iVBORw0.....">Shutterstock</A>
...

問題は、データ（URL、アイコン（base64）、名前）を取得し、そのデータを使用してWindowsURLショートカットを作成するスクリプトを作成する方法がわからないことです。カスタムショートカットを作成できるVBスクリプトはいくつか知っていますが、一度に複数（約300）のショートカットを作成することはできません。

4

2 に答える 2

4

うーん、便利なツールのようなものと組み合わせて、定期的に操作を行うだけで済みます。クロムからソースを正しく取得できるはずだと思いますが、とにかく、ここにあなたが求めていることを実行するスクリプトがあります。

Const ForReading = 1, ForWriting = 2, ForAppending = 8, CreateIfNeeded = true
outpath = "g:\script\shortcut\url2\"
Set objFSO = CreateObject("Scripting.FileSystemObject")
bookmarkfile = "bookmarks.html"
Set bookmarks = objFSO.OpenTextFile(bookmarkfile, ForReading)
Set regEx = New RegExp
regEx.Global = True
Set regEx2 = New RegExp
regEx2.Global = True
regEx2.Pattern = "[^a-zA-Z0-9-_.]"

regEx.Pattern = "<DT><A HREF=""(.*)"" ADD_DATE.*>(.*)</A>"
do until bookmarks.AtEndOfStream
  line = bookmarks.readline()
  if regEx.test(line) then
    shortcut = regEx.Replace(line,"$1")
    filename = trim(regEx.Replace(line,"$2"))
    filename = Regex2.Replace(filename, "_")
    filename = outpath & left(filename, 80) & ".url"
    wscript.echo filename
    'the following skips invalid filenames, you should add a routine to filter out invalid filename characters in your codeset
    on error resume next
    Set objFile = objFSO.OpenTextFile(filename, ForWriting, CreateIfNeeded)
    if err.number <> 0 then
      wscript.echo err.description
    end if
    objFile.write "[InternetShortcut]" & vbcrlf & "URL=" & shortcut
    objFile.close
  end if
loop
于 2012-08-20T21:12:37.520 に答える
-1

- これは本当にうまくいきます -

CHROME BOOKMARKS (私の GOOGLE BOOKMARKS にもこれを行いました) を単一の .html ファイルとしてエクスポートしました。これは、ブックマーク マネージャーの ORGANIZE | Chrome で実行できます。エクスポート ドロップダウン。次に、USER\Favorites フォルダーを開きました。私はIEを使用していないので、IEに付属するすべてのデフォルトリンクがありました。CHROME BOOKMARKS という新しいフォルダを作成しました。IE を開き、星型の FAVORITES ボタンをクリックしました。ADD TO FAVORITES メニューをプルダウンして、IMPORT AND EXPORT を選択しました。これにより、インポート ウィザードが起動しました。お気に入りをインポートしていることを伝え、それを Chrome がエクスポートした .html ファイルに向け (#1)、作成した CHROME BOOKMARKS フォルダーにインポートするように指示しました (#2)。

これにより、Chrome にあるブックマークごとに .url ファイルが作成されました。このファイルには、BOOKMARKS BAR と OTHER BOOKMARKS の両方が含まれていました。

Chrome で .URL ファイルがダブルクリックまたはドラッグ アンド ドロップで起動されることをテストして確認しました。

-この回答は、スーパーユーザーでの質問からのものです-

于 2016-06-17T09:32:32.410 に答える