Maxスクリプトってネットから
テキストを取得できるのでしょうかね
とおもったので、
調べてみたら、マニュアルからこんなのが出てきた
マニュアルは
<<Internet Explorer の ActiveX コントロール>>
で、調べれば出てくると思う
まるコピだけど
コメント文だけついかしてみた
なんと、一応読み込もうと思えば
読み込むのである
この場合は、webサイトの<title>タグ(htmlソース)のテキスト内容を
取得し、テキストオブジェクトに適応するという内容
なるほどね
[as3]
rollout rWebpage “Web page”
(
local txtObj
–Maxのwindowサイズを取得
local vpsz = getViewSize()
–アクティブXコントロールを設定
activeXControl ax “http://www.sakaiden.com/” height:(vpsz.y-50) width:(vpsz.x-200) align:#center
–テキストを生成
fn checkTextObject =
(
–テキストオブジェクトが無いならば
if $text01 == undefined then
(
–テキストを生成
txtObj = text text:”” name:”text01″
–押し出しモディファイア追加
addModifier txtObj (extrude amount:10)
–テキストのワイヤーカラーを決定
txtObj.wirecolor = red
)else ( txtObj = $text01 )–if end
)–end
–開いた時にテキスト生成を実行
on rWebpage open do ( checkTextObject() )
–アクティブXコントロールのタイトルが変わったら
on ax TitleChange txt do
(
–テキストを生成
checkTextObject()
–タイトルに http: が含まれていなければ
if not (matchPattern txt pattern:”http:”) then
(
–テキストオブジェクトのテキストに変化があるか?
if txtObj.text != text then
(
–一端プリント
print txt;
–テキストを代入
txtObj.text = txt;
–全オブジェクトを対象にズーム
max tool zoomextents all;
)–if end
)–if end
)–end
)–end rollout
–ロールアウト作成周り
fWebPage = newRolloutFloater “Web page” rWebpage.vpsz.x rWebpage.vpsz.y
addRollout rWebPage fWebPage
registerViewWindow fWebPage
showProperties rWebpage.ax
[/as3]
まだ、試していないけど
これならば、特定のタグの内容も取ってこれるのだろうか??
ほかにも、こちらの方法がネットから文字列を持ってこれそう
Maxスクリプトマニュアルでこちらの記事をごらんアレ
<< DotNet を使用した簡単な Web ブラウザの作成>>
<< HyperLink>>
<<拡張ビューポートとしてのインターネット ブラウザ コントロールにおける Excel スプレッドシート>>
<<MAXScript ロールアウト内の ActiveX コントロール>>
エクセルなんかも読み込めるみたいだし、
ほかにも、ウェブからドロップアンドドラッグするような事も出来るみたい
特にテキストを読み込むならば
DotNetを使用した・・・の方がプロパティが多かった
これがあれば、スクリプト内を更新せずとも
webから文字列を取得して、半自動でテキスト内容が更新可能だぞ
たとえば・・・・
ツールの説明とか、
ツールのバージョンチェックとか
ツールを開いたときに、バージョンチェックをかけ
バージョンが低かった場合は、更新を促すメッセージを流すとか
まぁ、色々と使えるわけだな
今度もう少し実験してみよう
サンプルをマルパクだけどどうぞ
Pingback: その他 ネットから直接アップデートできるのかな « sakaiden