Sub CreateReport(connection,  _
				 newReportName, _
				 newCategory, _
				 newSQLQuery)			 

	' Create the new report object. 
	Set newReport = connection.Get("SMS_Report").SpawnInstance_

	' Populate the SMS_Report properties.
	newReport.Name = newReportName
	newReport.Category = newCategory
	newReport.SQLQuery =  newSQLQuery
		
	' Save the new report and properties.
	newReport.Put_ 

	' Output new report name.
	Wscript.Echo "Created new report: " & newReportName			
								
End Sub

public void CreateReport(WqlConnectionManager connection, 
						 string newReportName, 
						 string newCategory, 
						 string newSQLQuery)
{ 	
	try
	{
		// Create new report object.
		IResultObject newReport = connection.CreateInstance("SMS_Report");

		// Populate new report properties.
		newReport["Name"].StringValue = newReportName;
		newReport["Category"].StringValue = newCategory;
		newReport["SQLQuery"].StringValue = newSQLQuery;
	
		// Save new report and new report properties.
		newReport.Put();

		// Output new report name.
		Console.WriteLine("Created report" + newReport["Name"].StringValue);
}
	catch (SmsException ex)
	{
		Console.WriteLine("Failed to create report. Error: " + ex.Message);
		throw;
}
}