Sub CreatePackage(connection, newPackageName, newPackageDescription, newPackageSourceFlag, newPackageSourcePath)

	' Create the new package object. 
	Set newPackage = connection.Get("SMS_Package").SpawnInstance_

	' Populate the new package properties.
	newPackage.Name = newPackageName
	newPackage.Description = newPackageDescription
	newPackage.PkgSourceFlag = newPackageSourceFlag
	newPackage.PkgSourcePath = newPackageSourcePath

	' Save the package.
	newPackage.Put_

	' Output the new package name.
	wscript.echo "Created package: "  & newPackageDescription

End Sub

public void CreatePackage(WqlConnectionManager connection, string newPackageName, string newPackageDescription, int newPackageSourceFlag, string newPackageSourcePath)
{
	try
	{
		// Create new package object.
		IResultObject newPackage = connection.CreateInstance("SMS_Package");

		// Populate new package properties.
		newPackage["Name"].StringValue = newPackageName;
		newPackage["Description"].StringValue = newPackageDescription;
		newPackage["PkgSourceFlag"].IntegerValue = newPackageSourceFlag;
		newPackage["PkgSourcePath"].StringValue = newPackageSourcePath;

		// Save new package and new package properties.
		newPackage.Put();

		// Output new package name.
		Console.WriteLine("Created package" + newPackageName);
}

	catch (SmsException ex)
	{
		Console.WriteLine("Failed to create package. Error: " + ex.Message);
		throw;
}
}