PERMISSOES DO USUARIO

LEANDRO 03/02/2010 11:17:33
#333495
Bom Dia a Todos.
Tenho uma Aplicação que acessa 3 Base de Dados diferente, conforme configuração do .INI, ou seja de o .INI estive apontado para uma empresa o sistema altera a ODBC para a Base de Dados correta e acessa o Sistema, porem na empresa onde o sistema esta instalado, foi mudado o SERVIDOR e o usuario da maquina não tem acesso a esta opção de Alteração de ODBC, porem se acesso como Administrador ele roda normalmente, gostaria de saber se tem alguma forma de Mudar o Usuario para Administrador Alterar a ODBC e depois voltar para o usuario normal.

Espero que tenham entendido.
Obrigado

PS: o Servidor é 2003, e os usuario esta sendo Bloqueados pelo active directory
NICOLLAS2 03/02/2010 11:41:45
#333497
use o [Ô]Run as[Ô]

veja se ajuda
http://support.microsoft.com/kb/325859/pt-br
LEANDRO 03/02/2010 11:54:49
#333499
ja tentei esta opção e continua com o mesmo problema.
só preciso alterar a Base de Dados que a ODBC aponta
LEANDRO 03/02/2010 14:31:59
#333511
Alguem ?
MARCOSLING 04/02/2010 08:33:42
#333571
A configuração do ODBC que vc utiliza é [Ô]fonte de dados do usuário[Ô] ou [Ô]fonte de dados do sistema[Ô]?
LEANDRO 04/02/2010 10:25:51
#333592
Fonte de Dados do Sistema
LLAIA 04/02/2010 10:37:51
#333594
Estou deduzindo que seja o Access seu banco de dados

Cara, posso está enganado, mas veja as permissões do usuário com relação aos bancos de dados. Crie grupos específicos e atribua permissões de leitura e escrita. Inclua usuários neste grupo.

Pode dar certo
LEANDRO 04/02/2010 10:41:48
#333595
o Banco de Dados é SQL Server.

ja tentamos fazer um Grupo especifico, porem no Banco de Dados o sistema faz as Alteracões normalmente.
o problema é a ODBC
MARCOSLING 04/02/2010 11:12:15
#333599
E pq a conexão precisa ser feita através de ODBC?
LROSSI 04/02/2010 11:32:28
#333600
essa função serve para manipular os dsn[ô]s bem como criar novos...


Private Declare Function RegCreateKey Lib [Ô]advapi32.dll[Ô] Alias [Ô]RegCreateKeyA[Ô] (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Private Declare Function RegSetValueEx Lib [Ô]advapi32.dll[Ô] Alias [Ô]RegSetValueExA[Ô] (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long
Private Declare Function RegCloseKey Lib [Ô]advapi32.dll[Ô] (ByVal hKey As Long) As Long

Public Sub CriaDSN(ByVal DSN As String, ByVal Nome As String, ByVal User As String, ByVal PWD As String, ByVal Porta As String, ByVal Servidor As String, ByVal Database As String)

Const DriverName = [Ô]MySQL ODBC 3.51 Driver[Ô]

Dim lResult As Long
Dim hKeyHandle As Long
Dim hKeyHandSub As Long

[ô]cria chave
lResult = RegCreateKey(HKEY_CURRENT_USER, [Ô]SOFTWARE\ODBC\ODBC.INI\[Ô] & DSN, hKeyHandle)

[ô]configura os dados
lResult = RegSetValueEx(hKeyHandle, [Ô]Description[Ô], 0&, REG_SZ, ByVal Nome, Len(Description))
lResult = RegSetValueEx(hKeyHandle, [Ô]Driver[Ô], 0&, REG_SZ, ByVal DriverPath, Len(DriverPath))
lResult = RegSetValueEx(hKeyHandle, [Ô]Option[Ô], 0&, REG_SZ, ByVal [Ô]11[Ô], Len([Ô]11[Ô]))
lResult = RegSetValueEx(hKeyHandle, [Ô]Password[Ô], 0&, REG_SZ, ByVal PWD, Len(PWD))
lResult = RegSetValueEx(hKeyHandle, [Ô]Port[Ô], 0&, REG_SZ, ByVal Porta, Len(Porta))
lResult = RegSetValueEx(hKeyHandle, [Ô]Stmt[Ô], 0&, REG_SZ, ByVal [Ô][Ô], Len([Ô][Ô]))
lResult = RegSetValueEx(hKeyHandle, [Ô]Server[Ô], 0&, REG_SZ, ByVal Servidor, Len(Servidor))
lResult = RegSetValueEx(hKeyHandle, [Ô]User[Ô], 0&, REG_SZ, ByVal User, Len(User))
lResult = RegSetValueEx(hKeyHandle, [Ô]Database[Ô], 0&, REG_SZ, ByVal Database, Len(Database))

[ô]Fecha chave.
lResult = RegCloseKey(hKeyHandle)

[ô]salva dsn em lista para abrir em gerenciador
lResult = RegCreateKey(HKEY_CURRENT_USER, [Ô]SOFTWARE\ODBC\ODBC.INI\ODBC Data Sources[Ô], hKeyHandle)
lResult = RegSetValueEx(hKeyHandle, DSN, 0&, REG_SZ, ByVal DriverName, Len(DriverName))
lResult = RegCloseKey(hKeyHandle)
End Sub
LEANDRO 04/02/2010 11:35:26
#333601
Eu tenho uma rotina para manipulação de DSN, nao tenho privilegios para isso, e o ADM da rede, não quer me dar privilegio, por isso preciso mudar o usuario da Maquina
Página 1 de 2 [12 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar