Split data to the datagrids according text

Question

1.00/5 (1 vote)

See more:

Hi, can you help me please? I have this crazy string from string output = myProcess.StandardOutput.ReadToEnd(); (output is a label now) which I need parse to the datagrids, and remove duplicite rows.

I need split output text to the 4 columns 
Application
DBID
Status
Runmode

and 

When Application start with: mng insert this row to the first datagrid
When Application start with: svc insert this row to the second datagrid

and where is Status: APP_STATUS_RUNNING row will be green.


string:
Application: ws_cp_ixnsrv_mm DBID: 845 Status: APP_STATUS_STOPPED Runmode: EXITED Application: mng_dbserver_p DBID: 469 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: ird_dap DBID: 470 Status: APP_STATUS_UNKNOWN Runmode: EXITED Application: mng_dap DBID: 471 Status: APP_STATUS_UNKNOWN Runmode: EXITED Application: mng_messagesrv_p DBID: 472 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: mng_scs_p DBID: 473 Status: EXITED Error Application: pulse_collector_02 DBID: 827 Status: APP_STATUS_RUNNING Runmode: BACKUP Application: was_tomcat_1 DBID: 829 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: svc_nss_p DBID: 850 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: svc_nss_b DBID: 851 Status: APP_STATUS_STOPPED Runmode: EXITED Error

Thank you for some advice.

What I have tried:

Process myProcess = new Process();

            myProcess.StartInfo.FileName = @"S:\\Program Files\\GCTI\\SCServer_1\\mlcmd.exe";
            // REM    myProcess.StartInfo.Arguments = "-help"
            myProcess.StartInfo.Arguments = "-cshost  -csport  -csappname   -csuser  -cspassword  -scshost  -getallappstatus";

          
            myProcess.StartInfo.UseShellExecute = false;
            myProcess.StartInfo.CreateNoWindow = true;
            myProcess.StartInfo.RedirectStandardInput = true;
            myProcess.StartInfo.RedirectStandardOutput = true;
            myProcess.StartInfo.RedirectStandardError = true;
            string message = "Simple MessageBox";

            try
    {
                myProcess.Start();
     }
    catch
  {
                Response.Write("<script>alert('Chyba');</script>");
            }

            string output = myProcess.StandardOutput.ReadToEnd();
            Label2.Text = output;
            Label2.Visible = false;

            string StandardError = myProcess.StandardError.ReadToEnd();
            Label3.Text = StandardError;

Posted 1-Jul-21 18:37pm

Member 15251555

Updated 5-Jul-21 2:44am

Add a Solution

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Ralf Meier · Answer 1 · 2021-07-01T19:28:00

Solution 1

That is a standard programming exercise ...
I would do the following :
- split your source-string by the delimiter ' ' - [space]
- now you get an array with all partial elements
- the 1st element now is your categorie, the 2nd the entry for the category, the 3rd again the categorie ... and so on

I think that is not a problem to code it ...

Posted 1-Jul-21 19:28pm

Ralf Meier

Comments

Member 15251555 2-Jul-21 5:03am

Hi, can you help me with code please?

Ralf Meier 2-Jul-21 5:41am

Excuse me ... what part of my description is unclear for you ?
Don't you know how to handle the SPLIT-Function ? Or to handle Array-Elements ?

Member 15251555 2-Jul-21 7:40am

maybe both.can you kick me somehow? :)

Ralf Meier 3-Jul-21 2:44am

No ... sorry ... give it a try - it's easier as you think.
If you have some code which makes problems you are invited to come back and ask something ... but not "please write the code for me" ...

Maciej Los · Answer 2 · 2021-07-05T02:44:00

Take a look at your input string (has been changed into rows in helping analyze process):

Application: ws_cp_ixnsrv_mm DBID: 845 Status: APP_STATUS_STOPPED Runmode: EXITED
Application: mng_dbserver_p DBID: 469 Status: APP_STATUS_RUNNING Runmode: PRIMARY
Application: ird_dap DBID: 470 Status: APP_STATUS_UNKNOWN Runmode: EXITED
Application: mng_dap DBID: 471 Status: APP_STATUS_UNKNOWN Runmode: EXITED
Application: mng_messagesrv_p DBID: 472 Status: APP_STATUS_RUNNING Runmode: PRIMARY
Application: mng_scs_p DBID: 473 Status: EXITED Error  <- incomplete data: does NOT contain [APP_STATUS] header!!!
Application: pulse_collector_02 DBID: 827 Status: APP_STATUS_RUNNING Runmode: BACKUP
Application: was_tomcat_1 DBID: 829 Status: APP_STATUS_RUNNING Runmode: PRIMARY
Application: svc_nss_p DBID: 850 Status: APP_STATUS_RUNNING Runmode: PRIMARY
Application: svc_nss_b DBID: 851 Status: APP_STATUS_STOPPED Runmode: EXITED Error

If every "record" would have the same number of headers, it would be very easy to split data:

VB

Dim inputString As String = "Application: ws_cp_ixnsrv_mm DBID: 845 Status: APP_STATUS_STOPPED Runmode: EXITED Application: mng_dbserver_p DBID: 469 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: ird_dap DBID: 470 Status: APP_STATUS_UNKNOWN Runmode: EXITED Application: mng_dap DBID: 471 Status: APP_STATUS_UNKNOWN Runmode: EXITED Application: mng_messagesrv_p DBID: 472 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: mng_scs_p DBID: 473 Status: EXITED Error Application: pulse_collector_02 DBID: 827 Status: APP_STATUS_RUNNING Runmode: BACKUP Application: was_tomcat_1 DBID: 829 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: svc_nss_p DBID: 850 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: svc_nss_b DBID: 851 Status: APP_STATUS_STOPPED Runmode: EXITED Error"
Dim cols As String() = {"Application: ", "DBID: ", "Status: ", "Runmode: "}
Dim result = initialString.Split(cols, StringSplitOptions.RemoveEmptyEntries)

As an inputString does contain incomplete data, you need to write custom method, for eaxmple:

VB

Dim dt As DataTable = New DataTable() 'declare and initilize a datatable object
Dim cols As String() = {"Application: ", "DBID: ", "Status: ", "Runmode: "} 'define columns
dt.Columns.AddRange(cols.Select(Function(c) New DataCOlumn(c.Replace(": ", ""), Type.GetType("System.String"))).ToArray()) 'add columns
'input string
Dim inputString As String = "Application: ws_cp_ixnsrv_mm DBID: 845 Status: APP_STATUS_STOPPED Runmode: EXITED Application: mng_dbserver_p DBID: 469 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: ird_dap DBID: 470 Status: APP_STATUS_UNKNOWN Runmode: EXITED Application: mng_dap DBID: 471 Status: APP_STATUS_UNKNOWN Runmode: EXITED Application: mng_messagesrv_p DBID: 472 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: mng_scs_p DBID: 473 Status: EXITED Error Application: pulse_collector_02 DBID: 827 Status: APP_STATUS_RUNNING Runmode: BACKUP Application: was_tomcat_1 DBID: 829 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: svc_nss_p DBID: 850 Status: APP_STATUS_RUNNING Runmode: PRIMARY Application: svc_nss_b DBID: 851 Status: APP_STATUS_STOPPED Runmode: EXITED Error"
'split string by "Application: " to get "rows"
Dim records = inputString.Split(New String(){"Application: "}, StringSplitOptions.RemoveEmptyEntries) _
	.Select(Function(a) String.Concat("Application: ", a).Split(cols, StringSplitOptions.RemoveEmptyEntries)) _
	.ToList()
	
Dim r As Regex = New Regex("\d{3,}") 'needed to recognize [DBID]
Dim j As Integer = 0
For Each parts As String() In records
	Dim dr As DataRow = dt.NewRow()
	For i As Integer = 0 To parts.Length -1
		If parts(i).ToLower().Equals(parts(i), StringComparison.Ordinal) And parts(i).Contains("_") Then 
			j = 0
		Else
			If parts(i).ToUpper().Equals(parts(i), StringComparison.Ordinal) And parts(i).Contains("_")  Then
				j = 2
			Else
				If r.IsMatch(parts(i)) Then
					j = 1
				Else
					j = 3
				End If
			End If
		End If
		dr(j) = parts(i)
	Next i
	dt.Rows.Add(dr)
Next parts
'bind data
DataGridView1.DataSource = dt