Video no Youtube Se Gostou clique aqui para dar joinha
help1
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/...
Criando Select Cliente/Representante - WebDev22 16/... Aula 1116
Criando Abas - Tabelas Relacao Clientes - WebDev22 17/... - Aula 1117
Combox Tecnico/Status - WebDev22 18/... - Aula 1118
Ultimos Campos Atendimento - WebDev22 19/... Aula 1119
Gravar Atendimento - WebDev22 20/... Aula 1120
Deploy Sistema Chamado WebDev 22 21 / Aula 1121
Login - Pagina WebDev 22 22/... Aula 1122
Login Trocando Conexão - WebDev 22 23/... Aula 1123
Tabela Ancorar Coluna - WebDev 22 24/... Aula 1124
Na Aula de Hoje ,
Na Hora de Dar Login
Trocar a Conexão
In today's class,
At the Time of Login
Change the Connection
En la clase de hoy,
En el dar tiempo de sesión
Cambie la conexión
// TROCAR CONEXÃO AO FAZER LOGIN
// CHANGE CONNECTION BY MAKING LOGIN
// cambiar la conexión al inicio de sesión
IF EDT_SENHA="senha" THEN
BTN_ENTRAR..Visible=True
HCloseConnection(Matos_hyperfil_server)
Matos_hyperfil_server..Password = "SENHA_BANCO"
Matos_hyperfil_server..User ="admin"
Matos_hyperfil_server..Server = "localhost"
Matos_hyperfil_server..Provider = hAccessHFClientServer
Matos_hyperfil_server..Database = "base_nome"
Matos_hyperfil_server..CryptMethod = hCryptNo
IF HOpenConnection(Matos_hyperfil_server) = False THEN
Info("problema na conexao",HErrorInfo(hErrMessage))
END
END
// TROCAR CONEXÃO AO FAZER LOGIN COM COMENTARIO
// CHANGE CONNECTION BY MAKING LOGIN WITH COMMENT
// CONEXIÓN DE CAMBIO CON REGISTRO DE COMENTARIO
// COMO NÃO CRIEI TABELAS, PARA EMAILS, PARA CONTROLAR SENHAS DE ACESSO
// VOU FAZER ISSO MANUALMENTE, E EM FUTURAS AULAS, FAREMOS ISSO
//----------------------------------------------------------------------
// HOW I DID NOT CREATE TABLES, FOR EMAILS, TO CONTROL PASSWORDS OF ACCESS
// I WILL DO IT MANUALLY, AND IN FUTURE LESSONS, WE WILL DO IT
//----------------------------------------------------------------------
// CÓMO NO crean las tablas a los correos electrónicos PARA EL CONTROL DE ACCESO CONTRASEÑA
// Lo voy a hacer a mano, y las futuras clases, que la voluntad
//----------------------------------------------------------------------
IF EDT_SENHA="senha" THEN
// SE EDT SENHA FOR IGUAL A SENHA ENTÃO
// IF EDT PASSWORD IS THE PASSWORD
// CONTRASEÑA SE EDT PARA ENTONCES misma contraseña
//--------------------------------------------------------
// ESSA SENHA , FIQUE A VONTADE PARA ESCOLHER
// THIS PASSWORD, GIVE THE WILL TO CHOOSE
// Esta contraseña, suspender el albedrío para escoger
BTN_ENTRAR..Visible=True
// VAMOS MOSTRAR BOTAO ENTRAR, PARA ENTRAR NA PAGINA
// LET'S SHOW BOTTLE ENTER, TO ENTER THE PAGE
// Vamos a mostrar botón ENTER para entrar en la página
//--------------------------------------------------------
// VAMOS TROCAR A CONEXÃO DESSA SENHA , ESSE É O SEGREDO
// LET'S CHANGE THE CONNECTION OF THIS PASSWORD, THIS IS THE SECRET
// Vamos a cambiar el password Conexión QUE, este es el secreto
HCloseConnection(Matos_hyperfil_server)
// FECHANDO CONEXÃO DA MINHA CONEXÃO HYPERFILE SERVER
// CLOSING MY HYPERFILE SERVER CONNECTION
// CIERRE de mi conexión servidor de conexión HyperFile
Matos_hyperfil_server..Password = "SENHA_BANCO"
// AQUI ESTOU COLOCANDO A SENHA DO BANCO HYPERFILE
// HERE I AM PUTTING THE PASSWORD OF THE HYPERFILE BANK
// AQUÍ estoy poniendo BANCO PASS HyperFile
Matos_hyperfil_server..User ="admin"
// USUARIO DO BANCO HYPERFILE
// BANK HYPERFILE USER
// BANCO DE USUARIO HyperFile
Matos_hyperfil_server..Server = "localhost"
// AQUI COLOCO MEU SERVIDOR, COMO ESTOU DENTRO DO COULD , SERÁ LOCALHOST,
// CASO TIVESSE NUM DESKTOP,OU MOBILE, SE COLOCARIA O ENDERECO IP DO COULD
//--------------------------------------------------------
// HERE I PLACE MY SERVER, AS I AM INSIDE THE COULD, WILL BE LOCALHOST,
// IF YOU HAD A DESKTOP, OR MOBILE, YOU WOULD PLACE THE COULD IP ADDRESS
//--------------------------------------------------------
// Allí yacía mi servidor, ¿cómo podría yo estoy dentro, localhost,
// Caso había en escritorio o móvil, SI poner la dirección IP DE COULD
Matos_hyperfil_server..Provider = hAccessHFClientServer
// Matos_hyperfil_server..Provider=hAccessHF7//"HFSQL Classic (Multi-user or Single-user)"
// AQUI PODERIA OPTAR POR USAR CLIENTE SERVER OU CLASSIC
// NO MEU CASO VOU USAR CLIENTE SERVER
//--------------------------------------------------------
// HERE IT COULD OPT BY USING CLIENT SERVER OR CLASSIC
// IN MY CASE I WILL USE CUSTOMER SERVER
//--------------------------------------------------------
// Aquí podría elegir utilizar servidor de cliente o clásico
// En mi caso voy a utilizar cliente-servidor
Matos_hyperfil_server..Database = "base_nome"
// AQUI ESTOU TROCANDO O NOME DA BASE DE DADOS
// ENTAO EU POSSO TER VARIOS BASE NO MEU COULD E
// DEPEDENDO DO MEU CLIENTE, É SO TROCAR O NOME
//--------------------------------------------------------
// HERE I AM REPLACING THE NAME OF THE DATABASE
// ENTAO I CAN HAVE VARIOUS BASE IN MY COULD AND
// DEPENDING ON MY CUSTOMER, IS TO CHANGE THE NAME
//--------------------------------------------------------
// Here I Am cambiar el nombre de LA BASE DE DATOS
// ENTONCES puede tener BASE DE VARIAS EN MI y podría
// DEPENDIENDO Mi cliente es SO NOMBRE CAMBIO
Matos_hyperfil_server..CryptMethod = hCryptNo
IF HOpenConnection(Matos_hyperfil_server) = False THEN
// ESTOU ABRINDO A CONEXÃO , E CASO DE ERRO, VAI ENTRAR AQUI
// I AM OPENING THE CONNECTION, AND IN CASE OF ERROR, GO HERE
// Estoy abriendo la conexión y evento de error el usuario introduce aquí
Info("problema na conexao",HErrorInfo(hErrMessage))
// ESTOU MOSTRANDO A MENSAGEM DE ERRO
// I AM SHOWING THE ERROR MESSAGE
// AM demostración del mensaje ERROR
END
END
