[Resolvido]Conexão Login e Password access - sql

boa tarde,

Sou iniciante ainda no access.

Procuro ajuda no seguinte:

Prentendo criar um formulário de login que valide o login no SQL Server.

Já fiz isto em VB, mas não estou a consegui adaptar ao access 2016.

O Código do modulo utilizado foi o seguinte:

------------------------------------------------------------
Global bd As New ADODB.Connection
Global sADOConnect As String

Public Sub AbrirBD(UID As String, PWD As String)

   Dim sConnect    As String
   Dim sDSN        As String
   
   sDSN = "DSN="ODBC Criada";"
   
   sConnect = sConnect & "UID=" & UID & ";"
   sConnect = sConnect & "PWD=" & PWD & ";"
   sConnect = sConnect & "Database="BASE DE DADOS";"
   
   sADOConnect = "PROVIDER=MSDASQL;" & sDSN & sConnect
   
   Set bd = New Connection
   bd.Open sADOConnect

   'MsgBox "Bem Vindo(a) " & Chr(13) & Chr(13) & UID, vbOKOnly
End Sub
-------------------------------------- / -----------------------------------------
Public Sub FecharBD()
   bd.Close
   Set bd = Nothing
End Sub
--------------------------------------/ ------------------------------------------

Cpts,

jocares

amigao ! nao seria melhor vincular a tabela de usuario ?

Olá a todos,
Jocares, bem-vindo ao fórum.

Acho que este vai ajudar:
https://www.maximoaccess.com/t10264-access-sql-server

Veja também link abaixo:
connectionstrings.com/sql-server/
Copiar e colar no Navegador (browser) - No fórum não são permitidos links externos

Desde já obrigado pelas boas vindas.

maguim
Sim poderia vincular. Mas a minha ideia é usar as credenciais que já são usadas na Segurança do SQLServer.


ahteixeira
Com o link que me indicou consigo quase aceder pelo ODBC.

Vou pesquisar mais sobre o assunto. Mas no entanto agradeço sugestão de como entrar com o Login feito no SQLServer

Cpts

Olá Jocares, obrigado pelo retorno.
Tente via DNSless, veja links abaixo:
https://www.maximoaccess.com/t11975p13-resolvidofonfigurara-conexao-dsn-less-via-formulario
https://www.maximoaccess.com/t29048-resolvidoconexao-mysql
Abraço