CAMINHO INI
Boa noite amigos
no XP sempre usei assim e funciona,
mais no Windows 7 não acha ??
(conpartilhada 100%)
no modulo
Dim Caminho As String
Dim LocalFoto As String
Set CnSql = New ADODB.Connection
LocalFoto = ReadINI([Ô]Local[Ô], [Ô]BD[Ô], App.Path & [Ô]\Config.ini[Ô])
Caminho = ReadINI([Ô]Caminho[Ô], [Ô]BD[Ô], App.Path & [Ô]\Config.ini[Ô])
CnSql.ConnectionString = [Ô]Provider=SIBPROvider; SIB:Character Set =NONE; Data Source=[Ô] & Caminho & [Ô];User ID=[Ô] & [Ô]SYSDBA[Ô] & [Ô];Password=[Ô] & [Ô]masterkey[Ô]
CnSql.Open
arquivo.ini
[Caminho]
bd=Servidor:\SCMClinicas\Dados\DADOS.FDB
no XP sempre usei assim e funciona,
mais no Windows 7 não acha ??
(conpartilhada 100%)
no modulo
Dim Caminho As String
Dim LocalFoto As String
Set CnSql = New ADODB.Connection
LocalFoto = ReadINI([Ô]Local[Ô], [Ô]BD[Ô], App.Path & [Ô]\Config.ini[Ô])
Caminho = ReadINI([Ô]Caminho[Ô], [Ô]BD[Ô], App.Path & [Ô]\Config.ini[Ô])
CnSql.ConnectionString = [Ô]Provider=SIBPROvider; SIB:Character Set =NONE; Data Source=[Ô] & Caminho & [Ô];User ID=[Ô] & [Ô]SYSDBA[Ô] & [Ô];Password=[Ô] & [Ô]masterkey[Ô]
CnSql.Open
arquivo.ini
[Caminho]
bd=Servidor:\SCMClinicas\Dados\DADOS.FDB
Tenta rodar a aplicação (ou o VB, se tiver em modo de desenvolvimento) como administrador... ou então, no atalho da aplicação, botão direito, propriedades, compatibilidade e marcar [Ô]Sempre rodar essa aplicação como administrador[Ô] (coisa assim).
Abraço!
Abraço!
Tópico encerrado , respostas não são mais permitidas