中国DOS联盟

请教一个vbs问题

我想编一个vbs脚本，功能是在 C:\Documents and Settings\user\ 下建立一个xml的配置文件。现在存在2个问题

1. 因为user不确定，所以需要用 %homepath% 定位目录，在vbs中如何用
2. 另外就是如何创建一个 xml文件，同时写入内容。内容中包括有 " <>,.!? 空格 " 等符号


请高手指点，谢谢

获取系统特殊目录方法：
Set WshShell=Wscript.CreateObject("Wscript.Shell") Set WshSysEnv=WshShell.Environment("Process") strFolder=WshSysEnv.Item("USERPROFILE") Wsh.Echo strFolder

创建文本方法：
Set objFSO = CreateObject("Scripting.FileSystemObject") Set f = objFSO.CreateTextFile("......", True) f.WriteLine "........"

谢谢，系统目录可以取了

写文本文件这个好像不行，
因为 xml 文件格式是这样的，包含各种字符。 writeline 只能写普通文本

<?xml version="1.0" encoding="UTF-8" ?>
<records>
<address filename="h01.xml" name="h01">
<ip address="192.168.1.1"/>
<email address=""/>
</address>
</records>

MsgBox "<?xml version=""1.0"" encoding=""UTF-8"" ?>" & vbCrLf & "<records>" & vbCrLf & "<address filename=""h01.xml"" name=""h01"">" & vbCrLf & "<ip address=""192.168.1.1""/>" & vbCrLf & "<email address=""""/>" & vbCrLf & "</address>" & vbCrLf & "</records>"

楼上已提示：双引号是VBS特殊符号，附加的要加多一个双引号转义。
Set WshShell=Wscript.CreateObject("Wscript.Shell") Set WshSysEnv=WshShell.Environment("Process") strFolder=WshSysEnv.Item("USERPROFILE") Set fso=CreateObject("Scripting.FileSystemObject") Set f=fso.CreateTextFile(strFolder&"\h01.xml",ture) f.WriteLine("<?xml version=""1.0"" encoding=""UTF-8"" ?>") f.WriteLine("<records>") f.WriteLine(" <address fname=""h01.xml"" name=""h01"">") f.WriteLine(" <ip address=""192.168.1.1""/>") f.WriteLine(" <email address=""""/>") f.WriteLine(" </address>") f.WriteLine("</records>") f.Close

多谢指点