用VBS脚本替换文件中的字符
最近忙着搞实施，搭建Xampp环境时，由于默认的常用端口不安全，很容易被人扫描。所以出于安全考虑，所以都要去配置文件中修改端口。每安装一个客户都要这样，觉得很麻烦，就用VBS写了一个脚本，初步功能很简单。代码如下：
1 Set fso=Wscript.CreateObject("Scripting.FileSystemObject") 2 3 '打开配置文件 4 set httpd_conf=fso.opentextfile("C:\xampp\apache\conf\httpd.conf") 5 set my_ini=fso.opentextfile("C:\xampp\mysql\bin\my.ini") 6 7 '找到要的替换字符 8 http_port=replace(httpd_conf.readall,"80", "替换后的字符") 9 mysql_port=replace(my_ini.readall,"3306", "替换后的字符") 10 11 '关闭配置文件 12 httpd_conf.close 13 my_ini.close 14 15 '以写的方式打开配置文件 16 set http=fso.opentextfile("C:\xampp\apache\conf\httpd.conf",2,true) 17 set mysql=fso.opentextfile("C:\xampp\mysql\bin\my.ini",2,true) 18 19 '写入替换的字符 20 http.write http_port 21 mysql.write mysql_port 22 23 Wscript.quit
