GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV
,
WEBDEV
e
WINDEV Mobile
Inicio
|
Mensagens recentes
|
Conecte-se...
|
Disconnect
|
Português
Inicio
→
WINDEV 25
→
Novo exemplo SQLConnectws para usar numa comunicação entre Windev Mobile e PostgreSQL
Novo exemplo SQLConnectws para usar numa comunicação entre Windev Mobile e PostgreSQL
Iniciado por Boller, jan., 05 2024 4:32 PM - Sem resposta
Conecte-se…
Boller
#1
Membro registado
3.659 mensagems
Popularité : +175 (223 votes)
Publicado em janeiro, 05 2024 - 4:32 PM
Aqui está o código que eu criei
:
// Outro exemplo de código usando SqlConnectWS no Windev Mobile
// Suponha que o arquivo se chama PRODUTO e os itens são CODIGO, DESCRICAO e PRECO
// Definir uma variável para armazenar o identificador da conexão
v
Conexao
is int
// Estabelecer a conexão com o banco de dados via Webservice
v
Conexao
=
SQLConnectWS
(
"http://MeuServidor/WDSOAPDB_WEB/"
, ...
"Banco de Dados PostgreSQL"
,
"usuario"
,
"senha"
,
"MeuBanco"
,
"ODBC"
)
// Verificar se a conexão foi bem sucedida
IF
v
Conexao
<
>
0
THEN
// A conexão foi bem sucedida
// Definir uma variável para armazenar o código do produto
v
Codigo
is int
// Atribuir um valor à variável
v
Codigo
=
123
// Adicionar um novo registro ao arquivo PRODUTO
SQLExec
(
"INSERT INTO PRODUTO (CODIGO, DESCRICAO, PRECO) VALUES ("
+ ...
v
Codigo
+
", 'Caneta', 1.50)"
,
"ResInsercao"
)
// Modificar o registro adicionado
SQLExec
(
"UPDATE PRODUTO SET PRECO = 1.75 WHERE CODIGO = "
+
v
Codigo
,
"ResModificacao"
)
// Excluir o registro modificado
SQLExec
(
"DELETE FROM PRODUTO WHERE CODIGO = "
+
v
Codigo
,
"ResExclusao"
)
// Buscar o registro excluído
SQLExec
(
"SELECT * FROM PRODUTO WHERE CODIGO = "
+
v
Codigo
,
"ResBusca"
)
// Verificar se o registro foi excluído
IF
SQLNbRow
(
"ResBusca"
) =
0
THEN
// Mostrar uma mensagem de confirmação
Info
(
"Registro excluído com sucesso"
)
ELSE
// Mostrar uma mensagem de erro
Error
(
"Registro não foi excluído"
)
END
// Fechar a conexão com o banco de dados
SQLDisconnect
(
)
ELSE
// A conexão falhou: mostrar uma mensagem de erro
SQLInfo
(
)
Error
(
"A conexão com o banco de dados falhou."
+
CR
+ ...
"Código do erro: "
+
SQL.Error
+
CR
+
SQL.MesError
)
END
Espero que isso ajude
. ?
?
Se você quiser ver mais exemplos
de
código usando
SQLConnectWS
,
você pode consultar os seguintes links
:
Select com expressão
“
diferente
de
”
com duas condições
:
Um exemplo
de
como usar o comando
SQLExec
para fazer uma consulta com o operador NOT
IN
.
aula
6214
windev mobile
SQLConnectWS
conexao base
de
dados externa mysql instalacao xampp ODBC MyS
:
Um vídeo que mostra como configurar o Webservice e o ODBC para conectar o Windev Mobile a um banco
de
dados MySQL
.
aula
6215
windev mobile
SQLConnectWS
criando banco e tabela e inserindo dados
:
Um vídeo que mostra como criar um banco
de
dados e uma tabela
No
MySQL e inserir dados usando o Windev Mobile
.
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/
Mensagem modificada, janeiro, 05 2024 - 4:33 PM
Denunciar
0
0
→ Voltar para WINDEV 25
WINDEV 25
Français
English
Español
Portuguesa
Fermer cette fenêtre
Tipo de Pesquisa
Apenas tópicos
Todas as mensagens
Período de pesquisa
Qualquer momento
Última hora
Últimas 24 horas
Semana passada
Mês passado
Ano passado
Cancelar
Pré-visualização da sua mensagem
Adicionar imagem
Importar uma imagem de uma URL
Enviar uma imagem a partir do seu disco
Deixe um ficheiro ou clique em "Procurar ..."
ou
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto