>You could try something like this:
>

>LOCAL loServer, loBackup
>
>loServer   = CREATEOBJECT('SQLDMO.SqlServer')
>loServer.Connect("MyServerName","MyUserName", "My password")
>
>loBackup = CREATEOBJECT('SQLDMO.Backup')
>WITH loBackup
>	.Database   		= "MyDatabaseName"
>	.Files      		= '[C:\Backups\BackupFileName]'
>	.Initialize 		=  .T.
>	.BackupSetName 		= "My Backup"
>	.BackupSetDescription = "Mt description"
>	.SQLBackup(loServer)
>ENDWITH
>

Thank you very much Zoran! Short and sweet.