請教VB中replace() 的問題

您尚未
登入
註冊
忘記密碼
搜尋
贊助
廣告
簡訊
論命
娛樂
求助
最近
- 二輪專區
- 烹飪
- －最近瀏覽－
- 烤漆是回原..
- 蒜香干貝
首頁

MyChat 數位男女

»
程式設計

手機版

地圖

簡體

您是第 3573 個閱讀者

可列印版加為IE收藏收藏主題上一主題 | 下一主題

『星』

級別: 路人甲

▼

[求助] 請教VB中replace() 的問題

各位VB高手
我想利用VBS來修改從registry拿出來的file path

例如
"001e6700"="C:\MyOldPath\abc.txt"
"001e6701"="C:\MyOldPath2\abcd.txt"
"001e6702"="C:\MyOldPath3\abcde.txt"
變 ..

訪客只能看到部份內容，免費加入會員或由臉書 Google 可以看到全部內容


x0 [樓主] From：香港網上行 \| Posted：2008-03-18 21:12 \|

overing

級別: 初露鋒芒

x55

▲ ▼

傳回的字串 = Replace(來源字串, 尋找的字串, 取代成字串[, 開始位置, 取代幾組])
複製程式

Dim str1 As String, str2 As String
str1 = "AbcdefgAbcdefg"
str2 = Replace(str1, "bcd", "123")
Debug.Print str2 '印出 "A123efgA123efg"

Zippy G2 600W Intel C2Q Q9550 Gigabyte GA-X48-DQ6 Gigabyte GV-NX96T512H-B G-skill pi 1100MHz 2Gx4 ACARD ANS-9010 32GB (Windows7 10sec boot!!) WD 150GB(WD1500ADFD)/640GB(6400AASK)
x0 [1 樓] From：未知地址 \| Posted：2008-03-18 22:48 \|

Freelife

級別: 初露鋒芒

x60

▲ ▼

找到"MyOldPath"的起始位置後，再往下找"\"的位置，
把這中間的字串移除，再放進你要的~
只是手續多了一點，還是可以達到你想要的效果~


x0 [2 樓] From：臺灣中華HiNet \| Posted：2008-03-19 08:33 \|

『星』

級別: 路人甲

▲ ▼

下面是引用Freelife於2008-03-19 08:33發表的 :
找到"MyOldPath"的起始位置後，再往下找"\"的位置，
把這中間的字串移除，再放進你要的~
只是手續多了一點，還是可以達到你想要的效果~

謝謝你們的回答, 但是問題就出在"MyOldPath"這裡了
MyOldPath是未知的, 不同user放進不同地方, 可能是C:\abc\, 又可能是C:\aaa\b, 又或是D:\cba\def 等等......
所以才傷腦筋
現在正研究Regular Expression..


x0 [3 樓] From：香港和記電訊 \| Posted：2008-03-19 08:57 \|

overing

級別: 初露鋒芒

x55

▲ ▼

這個另一篇有人有問類似問題
可以用執行期間環境常數 App.Path
來取得執行檔所在的目錄位置
可以用來當相對位置使用...

http://bbs.mychat.to/read.php?tid=691355

Zippy G2 600W Intel C2Q Q9550 Gigabyte GA-X48-DQ6 Gigabyte GV-NX96T512H-B G-skill pi 1100MHz 2Gx4 ACARD ANS-9010 32GB (Windows7 10sec boot!!) WD 150GB(WD1500ADFD)/640GB(6400AASK)
x0 [4 樓] From：未知地址 \| Posted：2008-03-19 12:38 \|

三仙

以馬內利

級別: 版主

版區: 程式設計

x17

x370

▲

從registry拿出file path
我記得要用 api
的 RegOpenKeyEx
和 RegCloseKey
和 RegQueryValueEx
請查一下msdn api的用法

挖出答案的難度，取決提問的深度！
x0 [5 樓] From：臺灣中華HiNet \| Posted：2008-04-08 05:48 \|



MyChat 數位男女 » 程式設計

Powered by PHPWind v1.3.6 Copyright © 2003-04 PHPWind	Processed in 0.014103 second(s),query:16 Gzip disabled 本站由瀛睿律師事務所擔任常年法律顧問 \| 免責聲明 \| 本網站已依台灣網站內容分級規定處理 \| 連絡我們 \| 訪客留言