Get
		Return templatehost_
	End Get
	Set
		Try
			Dim fio As New System.IO.FileInfo(value)
			Interaction.MsgBox(fio.FullName.ToString())
			templatehost_ = fio.FullName
			AxShockwaveFlash1.Movie = fio.FullName
			AxShockwaveFlash1.Base = fio.DirectoryName
		Catch generatedExceptionName As Exception
			templatehost_ = String.Empty()
		End Try
	End Set
End Property