Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12148 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【12004】JavaScriptで記述されたWEBページの開き... やまたん 04/3/21(日) 22:22 質問
【12013】Re:JavaScriptで記述されたWEBページの開き... こうちゃん 04/3/22(月) 10:40 回答
【12052】Re:JavaScriptで記述されたWEBページの開... やまたん 04/3/23(火) 1:12 質問
【12053】Re:JavaScriptで記述されたWEBページの開... こうちゃん 04/3/23(火) 8:55 発言
【12103】Re:JavaScriptで記述されたWEBページの開... やまたん 04/3/23(火) 23:57 お礼
【12004】JavaScriptで記述されたWEBページの開き...
質問  やまたん  - 04/3/21(日) 22:22 -
引用なし
パスワード
   はじめまして。
過去ログを見たのですが、分からず質問させて頂きます。

JavaScriptで記述されたWEBページを開くにはどうすればいいのでしょうか？
具体的には、
a href="JavaScript:Win('12','ab')" TITLE="てすと"
でリンクが記述されているページを開きたいのですが、
　objIE.navigate "JavaScript:Win('12','ab')"
としただけでは開けません。
どのように記述をすればよいか教えて頂けないでしょうか？

ちなみに関数Winの内容は以下の通りです。

<script LANGUAGE="JavaScript">
<!--
　　　　function Win(a, b) {
　　　　　　　　subWin = window.open("http://www.test.co.jp" + "test=" + a + "/" + b);// subWin.focus();
　　　　}
//-->
</script>

EXCEL2002（SP-2）で実行しようと考えております。
参考となるページでも結構ですので、お知らせ頂けると助かります。
【12013】Re:JavaScriptで記述されたWEBページの開...
回答  こうちゃん E-MAIL  - 04/3/22(月) 10:40 -
引用なし
パスワード
   やまたんさん、こんにちは

>JavaScriptで記述されたWEBページを開くにはどうすればいいのでしょうか？
>具体的には、
>a href="JavaScript:Win('12','ab')" TITLE="てすと"
>でリンクが記述されているページを開きたいのですが、
>　objIE.navigate "JavaScript:Win('12','ab')"
>としただけでは開けません。
>どのように記述をすればよいか教えて頂けないでしょうか？
>
>ちなみに関数Winの内容は以下の通りです。
>
><script LANGUAGE="JavaScript">
><!--
>　　　　function Win(a, b) {
>　　　　　　　　subWin = window.open("http://www.test.co.jp" + "test=" + a + "/" + b);// subWin.focus();
>　　　　}
>//-->
></script>
>
>EXCEL2002（SP-2）で実行しようと考えております。
>参考となるページでも結構ですので、お知らせ頂けると助かります。

JavaScriptを実行する方法はわからないのですが、JavaScriptの関数の内容がわかっているのでしたら、VBA上でsubWin関数と同等のURLを作って、objIE.navigateに渡してやったのではいけませんか？

Dim subWinStr As String
Dim aa As String
Dim bb As String

aa = "12"
bb = "ab"

subWinStr = "http://www.test.co.jp" + " test=" + aa + "/" + bb

objIE.navigate subWinStr
【12052】Re:JavaScriptで記述されたWEBページの開...
質問  やまたん  - 04/3/23(火) 1:12 -
引用なし
パスワード
   こうちゃんさん、ご回答ありがとうございます。

実はJavaScriptで実行されるURLの部分が異なるページから
情報を収集したいがために質問させて頂きました。
ご指摘の方法は既に実行しているのですが、ページ数が多く
なるとソースを覗くのも大変なので直接JavaScriptを実行
できないかと考えたのです。

VBAでは、JavaScriptを実行させることはやはりできないの
でしょうか？

JavaScriptの関数の中のURLを簡単に抜き出せれば解決する
とも思ったのですが、どうやればいいのか思いつきません。


>JavaScriptを実行する方法はわからないのですが、JavaScriptの関数の内容がわかっているのでしたら、VBA上でsubWin関数と同等のURLを作って、objIE.navigateに渡してやったのではいけませんか？
>
>Dim subWinStr As String
>Dim aa As String
>Dim bb As String
>
>aa = "12"
>bb = "ab"
>
>subWinStr = "http://www.test.co.jp" + " test=" + aa + "/" + bb
>
>objIE.navigate subWinStr
【12053】Re:JavaScriptで記述されたWEBページの開...
発言  こうちゃん E-MAIL  - 04/3/23(火) 8:55 -
引用なし
パスワード
   やまたんさん、こんにちは

>実はJavaScriptで実行されるURLの部分が異なるページから
>情報を収集したいがために質問させて頂きました。
>ご指摘の方法は既に実行しているのですが、ページ数が多く
>なるとソースを覗くのも大変なので直接JavaScriptを実行
>できないかと考えたのです。
>
>VBAでは、JavaScriptを実行させることはやはりできないの
>でしょうか？
>
>JavaScriptの関数の中のURLを簡単に抜き出せれば解決する
>とも思ったのですが、どうやればいいのか思いつきません。

あぁ、そういうことでしたら、お力になれません。
やまたんさんがお尋ねのことができてしまったら、Webサイト側からしたら大変ですよね。
私はこんな場合は、コツコツとソースみて自力でURL作るか（もちろんVBAで）、VBAでソースを読んで解析するか、結果としてのURLの規則性を読んでプログラミングします。

おやくに立てずにごめんなさい、他のかたのレスをおまちください。
【12103】Re:JavaScriptで記述されたWEBページの開...
お礼  やまたん  - 04/3/23(火) 23:57 -
引用なし
パスワード
   こうちゃんさん、こんばんは

ご回答ありがとうございます。
VBAでIEを操作するのは最近WEBを見て勉強している最中なのですが、
質問している内容は技術的にできない、もしくはあり得ない話なのかも
しれませんね。

もう少し調べて出来なければ別の方法を考えることにします。

どうもありがとうございました。

>やまたんさんがお尋ねのことができてしまったら、Webサイト側からしたら大変ですよね。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12148 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free