Post by abelgambini » 02 Aug 2022, 20:46
Hola! agradeceria si me explican como buscar un archivo .txt y reemplazar determinadas palabras por otras por ejemplo "Z-0.000500" por "100" y luego guardarlo
consegui este codigo en la web, pero no logro que reemplace las palabras, gracias por su ayuda!
Code: Select all
SendMode, Input
; -- Win + p -> Select all text + replace whole word only
#p::
Search := "Z-0.000500"
Replace := "100"
Gosub, CheckKeysPressed
Send, ^a
Gosub, SelectToClip
Clipboard := RegExReplace(Clipboard, "i)\b" Search "\b", Replace)
Send, ^v
Return
SelectToClip:
Clipboard := ""
Send, ^c
ClipWait, 0
If ErrorLevel
Exit
Sleep, 50
Return
CheckKeysPressed:
While GetKeyState("Ctrl","P") || GetKeyState("LWin","P") || GetKeyState("RWin","P") || GetKeyState("Shift","P") || GetKeyState("Alt","P")
Sleep, 25
Return
Hola! agradeceria si me explican como buscar un archivo .txt y reemplazar determinadas palabras por otras por ejemplo "Z-0.000500" por "100" y luego guardarlo
consegui este codigo en la web, pero no logro que reemplace las palabras, gracias por su ayuda!
[Code] SendMode, Input
; -- Win + p -> Select all text + replace whole word only
#p::
Search := "Z-0.000500"
Replace := "100"
Gosub, CheckKeysPressed
Send, ^a
Gosub, SelectToClip
Clipboard := RegExReplace(Clipboard, "i)\b" Search "\b", Replace)
Send, ^v
Return
SelectToClip:
Clipboard := ""
Send, ^c
ClipWait, 0
If ErrorLevel
Exit
Sleep, 50
Return
CheckKeysPressed:
While GetKeyState("Ctrl","P") || GetKeyState("LWin","P") || GetKeyState("RWin","P") || GetKeyState("Shift","P") || GetKeyState("Alt","P")
Sleep, 25
Return [/Code]