MCTS Self-Paced °V½m®M¥ó (´úÅç 70 536)¡G Microsoft ?.NET Framework 2.0 ¡X À³¥Îµ{¦¡¶}µo°ò¦µù¸Ñ©M§ó¥¿²Ä 3

' VB
Private Shared Sub WriteSettings()
End Sub

// C#
private static void WriteSettings()
{};

8. Insert the following code into the method:

' VB
Private Shared Sub WriteSettings()

	Try

		Dim LabSection As ConfigurationSection
		Dim config As _
			System.Configuration.Configuration = _
			ConfigurationManager.OpenExeConfiguration( _
			ConfigurationUserLevel.None)
		If config.Sections("LabSection") Is Nothing Then
			LabSection = New ConfigurationSection()
			config.Sections.Add("LabSection", ConfigurationSection)
			customSection.SectionInformation.ForceSave = True
			config.Save(ConfigurationSaveMode.Full)
		End If

		Catch ex As ApplicationException
			Console.WriteLine(ex.ToString())
	End Try
End Sub

// C#
try
	{
	ConfigurationSection LabSection;

	// Get the current configuration file.
	System.Configuration.Configuration config =
		ConfigurationManager.
		OpenExeConfiguration(ConfigurationUserLevel.None);

	if (config.Sections["LabSection"] == null)
		{
		customSection = new ConfigurationSection();
		config.Sections.Add("LabSection", ConfigurationSection);
		customSection.SectionInformation.ForceSave = true;
		config.Save(ConfigurationSaveMode.Full);
		}
	}
catch (ApplicationException ex)
	{
	Console.WriteLine(ex.ToString());
	}

' VB
Private Shared Sub WriteSettings()
End Sub

// C#
private static void WriteSettings()
{};

Create a new public class called CustomSection, as shown here:

' VB
Public Class CustomSection
	Inherits ConfigurationSection
End Class

//C#
public class CustomSection : ConfigurationSection
{
	public CustomSection()
	{ }
}

8. Insert the following code into the method:

' VB
Try
	Dim customSection As CustomSection
	Dim config As _
	System.Configuration.Configuration = _
	ConfigurationManager.OpenExeConfiguration( _
	ConfigurationUserLevel.None)
	If config.Sections("LabSection") Is Nothing Then
		customSection = New CustomSection()
		config.Sections.Add("LabSection", customSection)
		customSection.SectionInformation.ForceSave = True
		config.Save(ConfigurationSaveMode.Full)
	End If
Catch ex As ApplicationException
	Console.WriteLine(ex.ToString())
End Try

// C#
try
	{
	CustomSection customSection;

	// Get the current configuration file.
	System.Configuration.Configuration config =
		ConfigurationManager.
		OpenExeConfiguration(ConfigurationUserLevel.None);

	if (config.Sections["LabSection"] == null)
		{
		customSection = new CustomSection();
		config.Sections.Add("LabSection", customSection);
		customSection.SectionInformation.ForceSave = true;
		config.Save(ConfigurationSaveMode.Full);
		}
	}
catch (ApplicationException ex)
	{
	Console.WriteLine(ex.ToString());
	}

<add name="DemoApp" value="2" />

<add name="DemoApp.Switch" value="Information"/>

' VB
Trace.Listeners.Clear()
Dim MyLog as New EventLog("Chapter10", "localhost", "Chapter10Demo")
Trace.AutoFlush = True
Dim MyListener as EventLogTraceListener = new EventLogTraceListener(MyLog)
Trace.WriteLine("This is a test")

// C#
EventLog MyLog = new EventLog("Chapter10", "localhost", "Chapter10Demo");
Trace.AutoFlush = true;
EventLogTraceListener MyListener = new EventLogTraceListener(MyLog);
Trace.WriteLine("This is a test");

' VB
Trace.Listeners.Clear()
Dim MyLog as New EventLog("Chapter10", "localhost", "Chapter10Demo")
Trace.AutoFlush = True
Dim MyListener as EventLogTraceListener = new EventLogTraceListener(MyLog)
Trace.Listeners.Add(MyListener)
Trace.WriteLine("This is a test")

// C#
EventLog MyLog = new EventLog("Chapter10", "localhost", "Chapter10Demo");
Trace.AutoFlush = true;
EventLogTraceListener MyListener = new EventLogTraceListener(MyLog);
Trace.Listeners.Add(MyListener);
Trace.WriteLine("This is a test");

Info.FileName = this.tbProcessName.Text

Info.FileName = Me.tbProcessName.Text

String FileName = "C:\ProcessStartDemo.exe"

Dim FileName As String = "C:\ProcessStartDemo.exe"

' VB
Dim SecurePassword As New SecureString
For i As Int32 = 0 To Me.tbPassword.Text.Length - 1
	SecurePassword.AppendChar(Convert.ToChar(Me.tbPassword.Text(i)))
Next
Process.Start(Me.tbUserName.Text, Me.tbUserName.Text, SecurePassword, Me.tbDomain.Text)

// C#
SecureString SecurePassword = new SecureString();
for (Int32 i = 0; i < this.tbPassword.Text.Length; i++)
{
	SecurePassword.AppendChar(Convert.ToChar(this.tbPassword.Text[i]));
}
Process.Start(this.tbUserName.Text, this.tbPassword.Text, SecurePassword , this.tbDomain.Text);

' VB
Dim SecurePassword As New SecureString
For i As Int32 = 0 To Me.tbPassword.Text.Length - 1
	SecurePassword.AppendChar(Convert.ToChar(Me.tbPassword.Text(i)))
Next
Process.Start(Me.tbFileName.Text, Me.tbUserName.Text, SecurePassword, Me.tbDomain.Text)

// C#
SecureString SecurePassword = new SecureString();
for (Int32 i = 0; i < this.tbPassword.Text.Length; i++)
{
	SecurePassword.AppendChar(Convert.ToChar(this.tbPassword.Text[i]));
}
Process.Start(this.tbFileName.Text, this.tbUserName.Text, SecurePassword,
    this.tbDomain.Text);

if (this.tbUsername.Text != String.Empty)

if (this.tbUserName.Text != String.Empty)

if (Convert.ToBoolean(DemoManager[IP_Address]) == true)

if (Convert.ToBoolean(DemoManager[IP_Enabled]) == true)

Using System.Diagnostics;
Imports System.Management;

using System.Diagnostics;
using System.Management;