Jump to content
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

Sign in to follow this  
mirsofy

Login

Recommended Posts

mirsofy

boas noites malta

estou começando a trabalhar com vb . não tenho conhecimento nenhum em programação , assim sendo tenho uma porrada de duvidas ,pelo que me obriga a seguir há risca os manuais que descarreguei desta casa e da net.

como tudo começa-se pelo principio e queria criar um login para uma base em acess , acontece-me o erro que vou mencionar mais em baixo. poderiam ajudar-me aonde estou a falhar????

""

rslogin.Open " Select * from user where user = & Vnome & " And pass = "& Vsenha, user ,adOpenKeyset,adLockOptimistic,adCmdText"

""

fico grato

mirsofy

Share this post


Link to post
Share on other sites
vbtipo

Este teu código está mal elaborado:

rslogin.Open " Select * from user where user = & Vnome & " And pass = "& Vsenha, user ,adOpenKeyset,adLockOptimistic,adCmdText"

Deves alterar para esta aqui:

rslogin.Open "Select * from user where user =" & Vnome & " And pass =" & Vsenha & ", user,adOpenKeyset,adLockOptimistic,adCmdText"


Lema: Se eu não saber de alguma coisa não se preocupem porque tento sempre ajudar alguma coisita, nem que seja, por palpites/sugestões.

Share this post


Link to post
Share on other sites
mirsofy

boas de novo

apos corrigir o codigo , continuo a não conseguir seguir com o meu projecto.

agora aparece uma janela apresentando o (Run-time error`3709`: )

com a linha corrigida em amarelo

rslogin.Open " Select * from user where user =" & Vnome & " And pass =" & Vsenha & ", user ,adOpenKeyset,adLockOptimistic,adCmdText"

o que estarei ainda a fazer mal???

grato pelas dicas

mirsofy

Share this post


Link to post
Share on other sites
vbtipo

boas de novo

apos corrigir o codigo , continuo a não conseguir seguir com o meu projecto.

agora aparece uma janela apresentando o (Run-time error`3709`: )

com a linha corrigida em amarelo

rslogin.Open " Select * from user where user =" & Vnome & " And pass =" & Vsenha & ", user ,adOpenKeyset,adLockOptimistic,adCmdText"

o que estarei ainda a fazer mal???

grato pelas dicas

mirsofy

Experimenta tirares a última parte e fica.te assim:

rslogin.Open "Select * from user where user =" & Vnome & " And pass =" & Vsenha & ";"


Lema: Se eu não saber de alguma coisa não se preocupem porque tento sempre ajudar alguma coisita, nem que seja, por palpites/sugestões.

Share this post


Link to post
Share on other sites
vbtipo

continua a dar o mesmo erro

o que poderei mais fazer???

mirsofy

No último caso deve ser a tua ligação à base de dados deve estar mal feita.


Lema: Se eu não saber de alguma coisa não se preocupem porque tento sempre ajudar alguma coisita, nem que seja, por palpites/sugestões.

Share this post


Link to post
Share on other sites
programadorvb6

Olá.

1º Definiste a Dll a ser usada como Dao Ado etc.. ?

2ª Definiste no módulo a Base de Dado e o Recordset ?

Ex . Global Data as Database

      Global Record as recordset

Disponibiliza um exerto do teu projecto em um zip para que te possam ajudar .

Até+

programadorvb6

Share this post


Link to post
Share on other sites
F_Correia

Porque não usar antes Mysql ? grátis, rápido, cómodo e muito estável, se tu andas-te em algum curso de informática de certeza que te ensinaram os comandos de Mysql, logo não custa nada usares isso. Existe um DLL Connect se não me estou em erro é o Ado para o Mysql e o ADBC para o Acess.

alem de que caso queiras depois ligar o teu software a um servidor web é de 90 % o servidor usar Mysql.

Abraços


Porque havia eu se assinar ? A minha mãe diz que é perigoso ter as nossas assinaturas na net ! :S

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.