Posso Criar pasta atraves da pag asp ?

Oi Caros,

Eu estou com um sistema que envia e-mail para outros usuários e há a possibilidade de adicionar imagem, ou algum tipo de arquivo para enviar.

Esse arquivo vai ficar armazenado numa pasta no sistema, vai ser tratado e quando for enviado o sistema busca nessa pasta e envia.

Consulta = "Select top 1 * from webmail order by codEnvio desc "
	set rs = CnS.execute(consulta)
 CodEnvio = rs("codEnvio")
	rs.close
	set rs = nothing

	If lStrAnexo <> "" then
 NoneArquivo = "Web"&CodEnvio&"."&extencao2
 Pasta = Server.MapPath("../../webmail")

	lStrPath = Pasta&"\"&year(now())&"\"&NoneArquivo

 Dim fso, MyFile
 Set fso = CreateObject("Scripting.FileSystemObject")

 Set MyFile = fso.CreateTextFile(lStrPath,True)
 lStrAnexo = BinaryToString(UploadRequest.Item("anexo").Item("Value"))
 MyFile.Write(lStrAnexo)
 MyFile.Close

 Set MyFile = Nothing
 Set fso = Nothing

 Else
 NoneArquivo =""
 End if

O sistema busca uma pasta com o nome igual ao ano que estamos.

No mês passado existia uma pasta "2008" e os arquivos ficam armazenados ali.

Minha dúvida é o seguinte, estamos no ano de 2009 logo o sistema vai buscar uma pasta "2009" se eu não criar no servidor vai dar erro.

Tem como se a pasta não existir o sistema criar a pasta que eu quero???

Desde já agradeço!