Reddragon Posted October 19, 2014 Posted October 19, 2014 Product Name: Windows 7 Ultimate Version: 6.1 Service Pack 1 Product Name: Microsoft Office Professional Edition 2003 Version: 11.0.5614.0 How to extract the above texts so that i get the values of product name and version through a loop
BrewManNH Posted October 19, 2014 Posted October 19, 2014 Here's one way to do it, it takes the text and puts it into a 2D array, the first column is the product name, the second column is the version information. #include <Array.au3> $sString = "Product Name: Windows 7 Ultimate" & @CRLF & _ "Version: 6.1 Service Pack 1" & @CRLF & _ "Product Name: Microsoft Office Professional Edition 2003" & @CRLF & _ "Version: 11.0.5614.0" & @CRLF Global $aText[10][2] $aString = StringRegExp($sString, "Product Name: (.+)", 3) For $I = 0 To UBound($aString) - 1 $aText[$I][0] = $aString[$I] Next $aString = StringRegExp($sString, "Version: (.+)", 3) For $I = 0 To UBound($aString) - 1 $aText[$I][1] = $aString[$I] Next ReDim $aText[UBound($aString)][2] _ArrayDisplay($aText) Probably not the most elegant way of doing it, and I'm sure one of the RegEx gurus will come up with a better way of doing it, but it can at least give you some ideas. If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag GudeHow to ask questions the smart way! I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from. Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays. - ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script. - Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label. - _FileGetProperty - Retrieve the properties of a file - SciTE Toolbar - A toolbar demo for use with the SciTE editor - GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI. - Latin Square password generator
Moderators Solution Melba23 Posted October 19, 2014 Moderators Solution Posted October 19, 2014 Reddragon,I am not sure what you mean by "through a loop" - but this code will extract the required information: #include <MsgBoxConstants.au3> #include <String.au3> $sString = "Product Name: Windows 7 Ultimate" & @CRLF & _ "Version: 6.1 Service Pack 1" & @CRLF & _ "" & @CRLF & _ "" & @CRLF & _ "Product Name: Microsoft Office Professional Edition 2003" & @CRLF & _ "Version: 11.0.5614.0" $aProductName = _StringBetween($sString, "Product Name:", @CRLF) $aVersion = _StringBetween($sString, "Version:", @CRLF) MsgBox($MB_SYSTEMMODAL, "Return", $aProductName[0] & @CRLF & $aVersion[0])M23 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Spoiler ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area
mikell Posted October 19, 2014 Posted October 19, 2014 (edited) Without regex #include <Array.au3> $sString = "Product Name: Windows 7 Ultimate" & @CRLF & _ "Version: 6.1 Service Pack 1" & @CRLF & _ "Product Name: Microsoft Office Professional Edition 2003" & @CRLF & _ "Version: 11.0.5614.0" Local $aArray1 = StringSplit($sString, @crlf, 1), $aArray2, $aResult[$aArray1[0]][1] For $i = 1 To $aArray1[0] $aArray2 = StringSplit($aArray1[$i], ": ", 1) If $aArray2[0] > UBound($aResult, 2) Then ReDim $aResult[$aArray1[0]][$aArray2[0]] For $i2 = 1 To $aArray2[0] $aResult[$i-1][$i2-1] = $aArray2[$i2] Next Next _ArrayDisplay($aResult) Edited October 19, 2014 by mikell
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now