i creating text file , copying pre-generated excel data it. working fine. output following:
mgssp:imsi= 40211xxxx ; mgssp:imsi= 40211xxxx ; mgssp:imsi= 40211xxxx ; ... i want rid of blank spaces after = , before ;. desire output should like:
mgssp:imsi=40211xxxx; mgssp:imsi=40211xxxx; mgssp:imsi=40211xxxx; ... i using following code:
if my.computer.filesystem.fileexists("c:\temp\mgssp_script.txt") dim proc process = process.start("notepad.exe", "c:\temp\mgssp_script.txt") system.threading.thread.sleep(250) sendkeys.send("^v") else dim file system.io.filestream file = system.io.file.create("c:\temp\mgssp_script.txt") file.close() dim proc process = process.start("notepad.exe", "c:\temp\mgssp_script.txt") system.threading.thread.sleep(250) sendkeys.send("^v") file.close() end if
you can clipboard data program using clipboard class in system.windows.forms namespace.
if not winforms application, have add reference system.windows.forms , include imports statement in code: imports system.windows.forms.
also, code uses regex class in system.text.regularexpressions have import well.
this code clipboard data program, replace spaces, , set changed string clipboard.
dim clipboardldata string if clipboard.containstext() clipboardldata = clipboard.gettext() dim re regex = new regex("=\s+") ' = , spaces after clipboardldata = re.replace(clipboardldata, "=") re = new regex("\s+;") ' spaces before ; clipboardldata = re.replace(clipboardldata, ";") clipboard.settext(clipboardldata) end if after can keep using code have open notepad application.
Comments
Post a Comment