Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Carcleo

Não consigo fazer upload de arquivos

Por , em ASP Clássico

Recommended Posts

Carcleo    4

Carcleo
Postado

Não consigo fazer upload de arquivosA pagina num faz nada.O que tem de errado no código abaixo?<%If Request.QueryString("action") = 1 Then' script de connection à la base non incluSet Upl = Server.CreateObject("SoftArtisans.FileUp")' on instancie Upl, l'objet d'upload, ici SA-FileUp NomFichier = Mid(upl.UserFilename, InstrRev(upl.UserFilename, "\") + 1)' on ne garde que le nom de fichierSQL = "SELECT * FROM usu_vez"RS.open SQL,Conn,2,3 ' on ouvre sa tableRS.addnewRS("nome") = ObjUpl.Form("nome")RS("email") = ObjUpl.Form("email")RS("texto") = ObjUpl.Form("texto")RS("imagem") = fotoRS.update' on crée un nouvel enregistrement avec dans le champs "Photo", le nom court du fichier+extensionUpl.form("foto").SaveAs Server.MapPath(".") & "../../portal/clube/f_socios" & RS("photo") Response.Write "Le fichier " & foto & " a été sauvegardé." ' on enregistre le fichier venant du champs "fichier" du formulaire dans le sous-répertoire upload' (rép déprotégé) du chemin actuel, sous son nom d'origineRS.Requery' on réexécute la requête pour prendre en compte cet ajout End IF%><html><head><title>Vivendo com cristo</title></head><body><%sNomForm = "form"'Recebe o nome do formulario principal da paginasNomCampo = "texto"' Recebe o nome do campo que vai armazernar as alterações no editorsValInicialCampo = ""'Receber o valor que vem do banco de dados para o editor%><form action="altera_usu_vez.asp?action=1" method=POST name="form" id="form" onsubmit="document.<%=sNomForm%>.<%=sNomCampo%>.value = Composition.document.body.innerHTML"><P><center><H2>Formulário de cadastro de Usuarios da Vez - Mural</H2></center><P><p><TABLE border=2 cellpadding=5 cellspacing=5 align=center width=100%><tr> <td colspan=2> <TABLE> <TR> <TD><font size=+1>Nome:</font></TD> <TD><INPUT TYPE="text" NAME="nome" VALUE="" SIZE=59 MAXLENGTH=100></TD> </TR> <TR> <TD><font size=+1>Email:</font></TD> <TD><INPUT TYPE="text" NAME="email" VALUE="" SIZE=59 MAXLENGTH=100></TD> </TR> <TR> <TD><font size=+1>Foto:</font></TD> <TD><input class="base_caixa" type="file" size="44" name="foto"></TD> </TR> </TR> <TR> <TD><font size=+1>Mensagem:</font></TD> <TD><!--#include file="../JSeditor/editor.asp" --></TD> </TR> </TABLE></font> </TD></tr></table><P><center><input type="submit" name="submit" value="enviar" onClick="return CriticaFormulario()"><input type="reset" value="Limpar Campos"> </center></FORM></body></html>

Compartilhar este post

Link para o post
Compartilhar em outros sites

Carcleo    4

Carcleo
Postado

Op's Acabei de testar na primeira linha do formulario colocar o termo enctype="multipart/form-data"mas deu erro tambem

Compartilhar este post

Link para o post
Compartilhar em outros sites

Carcleo    4

Carcleo
Postado

Pra ter uma ideia, fiz ate um pequeno script pra testar esta dando sequecia de classe invalida.test1.htm<HTML> <BODY BGCOLOR="#FFFFFF"> <FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="UploadScript1.asp"> <INPUT TYPE=FILE SIZE=60 NAME="FILE1"><INPUT TYPE=SUBMIT VALUE="Upload!"> </FORM> </BODY> </HTML> uploadscript1.asp<HTML> <BODY BGCOLOR="#FFFFFF"> <% Set Upload = Server.CreateObject("dundas.Upload.2") Count = Upload.Save("c:\inetpub\wwwroot\upload") %> <% = Count %> files uploaded. </BODY> </HTML> Erro:Informações técnicas (para a equipe de suporte)Tipo de erro:Objeto Server, ASP 0177 (0x800401F3)Seqüência de classe inválida /host/viveasp/portal/UploadScript1.asp, line 4Tipo de navegador: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322) Página: POST 6423 bytes to /host/viveasp/portal/UploadScript1.aspPOST Data:. . . Hora: sábado, 5 de mmmm de aaaa, 20:04:16 Obs. Dundas instalado na pasta inetpub

Compartilhar este post

Link para o post
Compartilhar em outros sites

dark0    0

dark0
Postado

Brother, este erro indicado aí, quer dizer que:Ou seu Servidor não dá suporte à esse componente, ou o componente nao foi instalado corretamente no servidor.Creio que nao seja nenhum problema com seu código. Pode até ser, mas o primeiro erro que tá dando é no componente do servidor.Abraços

Compartilhar este post

Link para o post
Compartilhar em outros sites

Kalahan Santhiago    0

Kalahan Santhiago
Postado

Pra ter uma ideia, fiz ate um pequeno script pra testar esta dando sequecia de classe invalida.uploadscript1.asp<HTML> <BODY BGCOLOR="#FFFFFF"> <% Set Upload = Server.CreateObject("dundas.Upload.2") Count = Upload.Save("c:\inetpub\wwwroot\upload") %> <% = Count %> files uploaded. </BODY> </HTML> Erro:Informações técnicas (para a equipe de suporte)Tipo de erro:Objeto Server, ASP 0177 (0x800401F3)Seqüência de classe inválida /host/viveasp/portal/UploadScript1.asp, line 4Obs. Dundas instalado na pasta inetpub

Cara, eu estava usando assim:
<HTML> <BODY BGCOLOR="#FFFFFF"> <% Set Upload = Server.CreateObject("Persits.Upload.1") Count = Upload.Save("c:\inetpub\wwwroot\upload") %> <% = Count %> files uploaded. </BODY> </HTML>
E estava dando o mesmo erro que você está tendo.Então eu utilizei o codigo que você postou logo acima e deu certo aqui no meu.
<% Set Upload = Server.CreateObject("dundas.Upload.2") Upload.Save(Server.Mappath("img/")) %>
Testa ai usando o codigo que eu estava usando, pode ser que de certo, talvez pela versão do componente, não sei ao certo.Não custa né, ve ai e posta depois.abraço

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito