Aula 1048 - WebDev22 14/... - Upload Imagen

---

---

---

Video no Youtube Se Gostou clique aqui para dar joinha

---

http://doc.windev.com/en-US/?1000018815&name=upload_functions
http://doc.windev.com/en-US/?3012023&name=uploadcopiefichier_fonction
http://doc.windev.com/en-US/?1000018793&name=UploadLance
http://doc.windev.com/en-US/?3013031&name=executeprocess_function

---

// 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
=========================================================================

---

Primeira Pagina - WebDev - 001/...
Instalação Primeira Pagina , Instalar Conexao 10 WebDev 22 - 002/...
Criando Zoning/Menu/Modelo Pagina - Webdev 22 - 003/...
Arrumando webDev Servidor Was 10 Conexões no Could - WebDev22 - 004/...
Cadastro de Sites uteis - WebDev22 - 005/...
Configurar botoes/Aba Sites Uteis - WebDev22 - 006/...
Planos - Como Configurar - Bandeau défilant - WebDev22 - 007/...
Html/Css/JavaScript - Composant Web - WebDev22 - 008/...
Pagina Link - Entrar Pagina - WebDev22 - 009
Jquery - Explode - WebDev22 - 010
Jquery - Muda cor/esconde/delay/mostra/muda texto - WebDev22 - 011
Jquery - Cor Background/Imagen/Visibilidade- Diversos 2 - WebDev22 - 012 
Imagen Zoom - WebDev22 - 013
Upload Imagen - WebDev22 14/...
Planos / Criar Pagina - WebDev22 15/...

---

---

---

---

---

---

Aula 1047 - Dicas 15/... - Clone Tabela - Meses com Varios Anos -

---

---

---

Video no Youtube Se Gostou clique aqui para dar joinha

---

---

Help1

---

Backup e Restore Projeto Windev - 001
Dicionario e Supecontrole - 002
Cd - CdEject CdList - Abre e Lista CD - 003
Dicionario e SuperControle - 004
Cnpj - Formatar com Pontos Barra Ifen - 005
Controlfindhighlight - Pesquizar Palavras entre edts - 006
Som - Emitir - Beep - 007
Valor Minimo e Maximo - MinValue / MaxValue - Dicas - 008
Vazio - Empty - Ver se combox,tabela,ou etc Esta Vazio - 009 - Dicas
Pdf - Ler Pdf com Active X - 010
Baixar Titulos Contas Receber - Dica - 011 
Saldo Anterior Caixa - Como Calcular - Dica - 012
Anos - Mostrar Anos Pagamentos Recebimentos - Dica - 013
Mes Por Extenso - MonthNumberInAlpha - Dicas - 014
Clone Tabela - Meses com Varios Anos - Dicas - 015
Tecla Atalho - Control + Alt + Espaco - WinDev - dicas - 016/...

---

---

Aula 1047 - Dicas 15/... - Clone Tabela - Meses com Varios Anos -

// Nessa aula vou ensinar como fazer uma tabela com meses, e no
// Lado varios anos de valores acumulados

// Qry_clone_dados_ano_dup_rec
// Select com Valores Acumulados por Anos

SELECT
    LEFT(duplicata_receber.data_vencimento,4) AS ano,   
    SUBSTR(duplicata_receber.data_vencimento,5,2) AS mes,   
    SUM(duplicata_receber.valor_titulo) AS sum_valor_titulo,   
    duplicata_receber.id_empresa AS id_empresa
FROM
    duplicata_receber
WHERE
    LEFT(duplicata_receber.data_vencimento,4) IN ({Param_ano})
    AND    duplicata_receber.id_empresa = {Param_id_empresa}
GROUP BY
    LEFT(duplicata_receber.data_vencimento,4),   
    SUBSTR(duplicata_receber.data_vencimento,5,2),   
    duplicata_receber.id_empresa
ORDER BY
    ano ASC,   
    mes ASC
   
// Qry_Clone_Dup_Receber
// Mostra Somente os anos

SELECT DISTINCT
LEFT(duplicata_receber.data_pagamento,4) AS ano
FROM duplicata_receber
WHERE  duplicata_receber.id_empresa={PARAM_ID_EMPRESA}
ORDER BY ano ASC

//Codigo da Janela
//Recebimentos
//Ver os Anos que Existem

QRY_Clone_Dup_Receber.PARAM_ID_EMPRESA=gnEmpresaCodigo // Que Sera igual a 1
TableDisplay(TABLE_QRY_Clone_Dup_Receber,taReExecuteQuery) // Vou Mostrar conteudo Tabela
   

---

---

---

---