Alguém poderia me ajudar????
Criei um formulário e minha cliente pediu q inserir um campo com upload no formulário, só q não sei como fazer isso inserindo neste script, alguém pode me ajudar?
<%
sch = "http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig = Server.CreateObject("CDO.Configuration")
cdoConfig.Fields.Item(sch & "sendusing") = 2
cdoConfig.Fields.Item(sch & "smtpauthenticate") = 1
cdoConfig.Fields.Item(sch & "smtpserver") = "smtp.teste.com.br"
cdoConfig.Fields.Item(sch & "smtpserverport") = 25
cdoConfig.Fields.Item(sch & "smtpconnectiontimeout") = 30
cdoConfig.Fields.Item(sch & "sendusername") = "rh@teste.com.br" 'conta@seu_dominio
cdoConfig.Fields.Item(sch & "sendpassword") = "TESTE"
cdoConfig.fields.update
Set cdoMessage = Server.CreateObject("CDO.Message")
Set cdoMessage.Configuration = cdoConfig
cdoMessage.From = "rh@testecom.br" 'ENDEREÇO DE E-MAIL QUE SERÁ EXIBIDO NO FROM DA MENSAGEM
cdoMessage.To = "rh@teste.com.br" 'ex: conta@seu_dominio, conta@uol.com.br, conta@hotmail
cdoMessage.Subject = "Curriculo"
cdoMessage.ReplyTo = Request("memail")
strBody = "Dados <br> <br>" & _
"NOME:"& Request("mnome")& "<br>" & _
"NASCIMENTO:"& Request("mnascimento")& "<br>" & _
"IDADE:"& Request("midade")& "<br>" & _
"SEXO:"& Request("msexo")& "<br>" & _
"ENDERECO:"& Request("mendereco")& "<br>" & _
"NUMERO:"& Request("mnumero")& "<br>" & _
"COMPLEMENTO:"& Request("mcomplemento")& "<br>" & _
"BAIRRO:"& Request("mbairro")& "<br>" & _
"CIDADE:"& Request("mcidade")& "<br>" & _
"TEL_COMERCIAL:"& Request("mtel_comercial")& "<br>" & _
"CELULAR:"& Request("mcelular")& "<br>" & _
"TEL_RECADOS:"& Request("mtel_recados")& "<br>" & _
"EMAIL:"& Request("memail")& "<br>" & _
"CNH:"& Request("mcnh")& "<br>" & _
"CIVIL:"& Request("mcivil")& "<br>" & _
"ALTURA:"& Request("maltura")& "<br>" & _
"MANEQUIM:"& Request("mmanequim")& "<br>" & _
"CABELOS:"& Request("mcabelos")& "<br>" & _
"OLHOS:"& Request("molhos")& "<br>" & _
"CALCADO:"& Request("mcalcados")& "<br>" & _
"PESO:"& Request("mpeso")& "<br>" & _
"TATUAGEM:"& Request("mtatuagem")& "<br>" & _
"OLHOS:"& Request("molhos")& "<br>" & _
"PIERCING:"& Request("mpiercing")& "<br>" & _
"ESCOLARIDADE:"& Request("mescolaridade")& "<br>" & _
"CURSO:"& Request("mcurso")& "<br>" & _
"IDIOMAS:"& Request("midiomas")& "<br>" & _
"NIVEL:"& Request("mnivel")& "<br>" & _
"DIAS:"& Request("mdias")& "<br>" & _
"HORARIO:"& Request("mhorario")& "<br>" & _
"SERVICOS:"& Request("mservico")& "<br>" & _
"EXP_COMERCIAL:"& Request("mexp_comercial")& "<br>" & _
"EXP_PROMOCIONAL:"& Request("mexp_promocional")& "<br>" & _
"OBSERVACOES:"& Request("mobservacoes")& "<br>" & _
"FOTO:"& Request("Arquivo1")
strBody = strBody & "."
cdoMessage.HTMLBody = strBody
cdoMessage.Send
Set cdoMessage = Nothing
Set cdoConfig = Nothing
response.redirect "trabalhe.htm"
%>
