SQLの窓

2009年10月04日


VBS : XMLファイルのテキストノードの値の更新

概要
ターゲットは、TOMCAT6 のアプリケーションディレクトリの設定ファイルで、
配置されたディレクトリから MDB の実際のパスを更新します
' オブジェクト作成
Set Fso = CreateObject("Scripting.FileSystemObject")
Set objXML = CreateObject("Msxml2.DOMDocument.3.0")

' カレントディレクトリ
strCurDir = WScript.ScriptFullName
Set obj = Fso.GetFile( strCurDir )
Set obj = obj.ParentFolder
strCurDir = obj.Path

' XML を読み込み
objXML.load( strCurDir & "\webapp\WEB-INF\web.xml" )

' 全体の表示
MsgBox( objXML.xml )

Set ParamName = objXML.getElementsByTagName("param-name")
Set ParamValue = objXML.getElementsByTagName("param-value")

For I = 0 to ParamName.length - 1
	if ParamName.item(I).firstChild.nodeValue = "ConnectionUrl" then
		' 置き換え
		ParamValue.item(I).firstChild.nodeValue = strCurDir & "\販売管理B.mdb"
		Exit For
	end if
Next

' XML を保存
objXML.save( strCurDir & "\webapp\WEB-INF\web.xml" )

MsgBox の結果

Xmldata
<?xml version="1.0" encoding="Shift_JIS"?>
<web-app>
	<context-param>
		<param-name>DriverName</param-name>
		<param-value>sun.jdbc.odbc.JdbcOdbcDriver</param-value>
	</context-param>
	<context-param>
		<param-name>ConnectionUrl</param-name>
		<param-value>更新対象</param-value>
	</context-param>
	<context-param>
		<param-name>ConnectionDbname</param-name>
		<param-value></param-value>
	</context-param>
	<context-param>
		<param-name>ConnectionUser</param-name>
		<param-value></param-value>
	</context-param>
	<context-param>
		<param-name>ConnectionPass</param-name>
		<param-value></param-value>
	</context-param>
</web-app>

関連する記事
Java : WEB 上の XML データの内容を取得する
Java : ODBC への動的接続


タグ:VBScript xml DOM
posted by lightbox at 2009-10-04 19:31 | VBScript | このブログの読者になる | 更新情報をチェックする
バッチ処理

Microsoft Office
container 終わり

フリーフォントで簡単ロゴ作成
フリーフォントでボタン素材作成
フリーフォントで吹き出し画像作成
フリーフォントではんこ画像作成
ほぼ自由に利用できるフリーフォント
フリーフォントの書体見本とサンプル
画像を大きく見る為のウインドウを開くボタンの作成

Android SDK ポケットリファレンス
改訂版 Webデザイナーのための jQuery入門
今すぐ使えるかんたん ホームページ HTML&CSS入門
CSS ドロップシャドウの参考デモ
Google Hosted Libraries
cdnjs
BUTTONS (CSS でボタン)
イラストAC
ぱくたそ
写真素材 足成
フリーフォント一覧
utf8 文字ツール
右サイド 終わり
base 終わり