quinta-feira, 2 de abril de 2015

WindevMobile - SQLConnectWS WM(19) e Apache (Windows) - Willian Fernando

WindevMobile - SQLConnectWS WM(19) e Apache (Windows) - Willian Fernando

Pdf da Explicação SqlConnectWs Por Willian Fernando

 SqlConnectWs - http://doc.pcsoft.fr/en-US

 


























Pane - MyWindow..Plane=3 = WIN_menu_financeiro_matos..Plane=1

Pane

WIN_menu_financeiro_matos..Plane=1

MyWindow..Plane=3


Diretorio Lista Arquivos

Diretorio Lista Arquivos

Delete Arquivo

Delete Arquivo

Alterar a Foto no forum Oficial Windev

VIDEO SOBRE ALTERAR FOTO


http://forum.pcsoft.fr/pt-BR/





Windev Exemplo Adriano/Angelo





Tabelas Exemplos

Tabelas Exemplos



Windev20 - Saiba como Criar uma plania em 3 minutos


Windev20 - Saiba como Criar uma plania em 3 minutos






---------------------------------------------------------------------------------------------------------------
Excel - ler Excel e Grava Tabela e Lista
Excel - Ler e Exportar Para Txt
Excel - Excel e Array
Excel - Ler Tabela e Coloca Excel
Excel - Como Criar Planilha 3 Minutos - Windev 20
----------------------------------------------------------------------------------------------------------------

Excel Le e Gravar Array Numero Crescente

Excel Le e Gravar Array Numero Crescente

Idarquivoexcel is int
nUmerolinhas is int
Listanumeros is array of 0 int
jogo_num is int
Idarquivoexcel = xlsOpen("D:\aleva\LOTO\loto.xls")
IF Idarquivoexcel<>-1 THEN
    nUmerolinhas=xlsNbRow(Idarquivoexcel)
ELSE
    Error(ErrorInfo())
END
i is int = 0
FOR i = 3 TO nUmerolinhas
    ArrayDeleteAll(Listanumeros)
    FOR c = 1 TO 20
        ArrayAddLine(Listanumeros,xlsData(Idarquivoexcel,i,c))   
    END   
    ArraySort(Listanumeros,asAscending)
    jogo_num=xlsData(Idarquivoexcel,i,1)
    HReadSeekFirst(resultado,resultado.numero_jogo,jogo_num)
    IF HFound(resultado) THEN
    ELSE
        HAdd(resultado)   
    END
    resultado.num_01=Listanumeros[1]
    HModify(resultado)
END
// caso eu quisesse fazer um loop no array de numeros
//    FOR x =1 to ArrayCount(Listanumeros)
//        Info(Listanumeros[x])
//    END

---------------------------------------------------------------------------------------------------------------
Excel - ler Excel e Grava Tabela e Lista
Excel - Ler e Exportar Para Txt
Excel - Excel e Array
Excel - Ler Tabela e Coloca Excel
Excel - Como Criar Planilha 3 Minutos - Windev 20
----------------------------------------------------------------------------------------------------------------

Excel Ler Linha/Coluna

Excel Ler Linha/Coluna

Idarquivoexcel is int
nUmerolinhas is int

Idarquivoexcel = xlsOpen("D:\aleva\LOTO\loto.xls")
IF Idarquivoexcel<>-1 THEN
    nUmerolinhas=xlsNbRow(Idarquivoexcel)
    Info(nUmerolinhas)
   
ELSE
    Error(ErrorInfo())
END
i is int = 0
FOR i = 3 TO nUmerolinhas
    Info(xlsData(Idarquivoexcel,i,1))
    Info(xlsData(Idarquivoexcel,i,2))
END

---------------------------------------------------------------------------------------------------------------
Excel - ler Excel e Grava Tabela e Lista
Excel - Ler e Exportar Para Txt
Excel - Excel e Array
Excel - Ler Tabela e Coloca Excel
Excel - Como Criar Planilha 3 Minutos - Windev 20
----------------------------------------------------------------------------------------------------------------

Excel

Excel


---------------------------------------------------------------------------------------------------------------
Excel - ler Excel e Grava Tabela e Lista
Excel - Ler e Exportar Para Txt
Excel - Excel e Array
Excel - Ler Tabela e Coloca Excel
Excel - Como Criar Planilha 3 Minutos - Windev 20
----------------------------------------------------------------------------------------------------------------

Windev Tabela Excel

Windev Tabela Excel

Fonte :Video Aula Pedrosao
Aula 112
  Quase no final do video

---------------------------------------------------------------------------------------------------------------
Excel - ler Excel e Grava Tabela e Lista
Excel - Ler e Exportar Para Txt
Excel - Excel e Array
Excel - Ler Tabela e Coloca Excel
Excel - Como Criar Planilha 3 Minutos - Windev 20
----------------------------------------------------------------------------------------------------------------

Windev - Le Excel , Monta e Mostra Tabela e Lista

Assista ao Video Sobre Windev Le Excel Monta e mostra Tabela e Lista




---------------------------------------------------------------------------------------------------------------
Excel - ler Excel e Grava Tabela e Lista
Excel - Ler e Exportar Para Txt
Excel - Excel e Array
Excel - Ler Tabela e Coloca Excel
Excel - Como Criar Planilha 3 Minutos - Windev 20
----------------------------------------------------------------------------------------------------------------











----------------------------------------------------------------------------------------------------------------------
//--------------------------------------
// Excel Ler e Mostrar Tabela          
// Excel Read and Show Table
// Lire et Excel Voir les tableaux
// Excel Leer y Mostrar tabla
//--------------------------------------
CAM_NoName1..Visible=False
_nome_arquivo_excel is int
    // nUmero_linhas
    // number lines
    // Nombre de lignes
    // Las rectas numéricas
nUmero_linhas is int
_nome_arquivo_excel = xlsOpen("D:\amarildo\MAURICIO_PEREIRA\Lista Clientes.xls")
    // Aqui estou abrindo o Arquivo Excel
    // Here I am opening Excel File
    // Ici, je suis l'ouverture du fichier Excel
    // Aquí estoy abriendo Archivo Excel
nUmero_linhas=xlsNbRow(_nome_arquivo_excel)
i is int = 3
    // Aqui eu verifico quantas linhas existe na planilha excel
    // Here I check how many rows exist in excel spreadsheet
    // Ici, je vérifie le nombre de lignes existent dans excel
    // Aquí puedo comprobar cuántas filas existen en hoja de cálculo Excel
FOR i = 3 TO nUmero_linhas
    // comeco a ler o excel na linha 3 onde eu encontro informacoes e vou ate o numero final de linhas
    // beginning to read excel in line 3 where I find informations and I will until the end number
    //                                                    of lines
    // commençant à lire exceller à la ligne 3 où je trouve des informations et je vais jusqu'à
    //                                                    ce que le numéro de fin de lignes
    // empezando a leer excel en la línea 3 donde encuentro informaciones y lo haré hasta que el
    //                                                           número final de las líneas
    TableAddLine(TABLE_excel,xlsData(_nome_arquivo_excel,i,1,Vrai), ...
                               xlsData(_nome_arquivo_excel,i,2,Vrai), ...
                               xlsData(_nome_arquivo_excel,i,3,Vrai), ...
                               xlsData(_nome_arquivo_excel,i,4,Vrai))
END

CAM_NoName1..Visible=True
----------------------------------------------------------------------------------------------------------------------

Teste

Teste
teste