PC SOFT

FOROS PROFESIONALES
WINDEV, WEBDEV y WINDEV Mobile

Inicio | Mensajes recientes | Conéctese... |  | Español FR
Inicio → WINDEV 25 → Aula 1048 - WebDev22 14/... - Upload Imagen
Aula 1048 - WebDev22 14/... - Upload Imagen
Iniciado por amarildo, 26,ene. 2017 07:54 - 1 respuesta
#1
Miembro registrado
535 mensajes
Popularité : +14 (14 votes)
Publicado el 26,enero 2017 - 07:54
// Vou Mostrar como Fazer um Upload de uma Imagen

//=======================================
// Clic (Onclick) De Btn_ExecutaMostraFoto (navigateur )
UploadStart(UPL_Upload_Foto)
//---------------------------------------
// Acionar Ajax
// Clic de Btn_ExecutaMostraFoto (Serveuer)
IMG_Imagen=SAI_Foto
//=======================================

// A chaque modification de la liste des fichier sélectionnés dans Upl_Upload_foto(navigateur)
IF UPL_Upload_Foto..Occurrence<>0 THEN
SAI_Foto=UPL_Upload_Foto
ExecuteProcess(BTN_ExecutaMostraFoto,trtClic)
END
//---------------------------------------
// Réception des fichier uploadés de Upl_Upload_foto (Server)
//Acionar Ajax
//Se upload foto for diferente de 0
IF UPL_Upload_Foto..Occurrence<>0 THEN
UploadCopieFichier(UPL_Upload_Foto,"","",1)
END
//=======================================

//Clic de Btn_RemoverImagen
IMG_Imagen=""
//=======================================

//Clic de Btn_Valider (Serveuer)
// Lecture des informations saisies
PageToFile()
//Caso Não Gravar Imagen
sites_uteis.imagen=IMG_Imagen
//Caso Não Gravar Imagen
HSave(sites_uteis)
IF PreviousPage()<>"" THEN
PageDisplay(PreviousPage)
ELSE
//PageDisplay(PAGE_Accueil)
END


http://windevdesenvolvimento.blogspot.com.br/2017/01/aula-1048-webdev22-14-upload-imagen.html

Mensaje modificado, 26,enero 2017 - 07:55
#2
Miembro registrado
3.661 mensajes
Popularité : +175 (223 votes)
Publicado el 09,febrero 2017 - 10:58
:merci:

--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/
→ Volver a WINDEV 25