Verbindung zu Oracle über VBScript

Question

Ich habe zwei Datenbanken auf dem gleichen Server mit dem gleichen Namen und der anderen Portnummer. Der tnxnames.ora Eintrag sieht aus wie (eigentlich eine Datenbank ein Klon des anderen ist.)

AAAA.FSA.GOV.UK = 
(DESCRIPTION = 
(ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(Host = SERVERNAME)(Port = 1530))) 
(CONNECT_DATA = (SID = AAAA))) 


AAAA.FSA.GOV.UK = 
(DESCRIPTION = 
(ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(Host = SERVERNAME)(Port = 1521))) 
(CONNECT_DATA = (SID = AAAA))) 

ich MS-Access bin mit der Anwendung und Verwendung von ADODB-Konnektivität zu entwickeln, auf den Server zuzugreifen. Ich versuche auf die Daten vom Server zuzugreifen. Meine Verbindungszeichenfolge ist wie folgt aussehen:

sConStr = "Driver={oracle in oraclient10g_home1};SERVER=SERVER_NAME;DBQ=AAAA;UID=username;Pwd=pswd" 

Set oConn = New ADODB.Connection 

oConn.connectionstring = sConStr 
oConn.open 

Mein Problem ist, mein ADODB Verbindung immer zu Datenbank-Port-Nummer 1530. Ich bin nicht in der Lage es in dem Connetion-String zu setzen, die Datenbank im Anschluss zuzugreifen 1521

Ist es möglich, die Portnummer in der Verbindungszeichenfolge anzugeben, um auf eine andere Datenbank mit demselben Namen und demselben Server zuzugreifen?

Ich muss die Anwendung für den Zugriff auf die geklonte Datenbank anstelle der ursprünglichen vorbereiten. Nur die Portnummer unterscheidet sich zwischen den Datenbanken.

Answer 1

können Sie finden diese nützlich: http://www.connectionstrings.com/oracle

Answer 2

Versuchen Sie, Ihre Portnummer am Ende des Servernamens durch einen Doppelpunkt getrennt hinzuzufügen.

SERVER=SERVER_NAME:1521 

Ich bin kein Oracle-Benutzer, aber das wird mit MS SQL Server arbeiten.

Answer 3

Das ist eine dumme Frage sein kann ... aber sind diese beiden Einträge in der tnsnames.ora?

AAAA.FSA.GOV.UK = 
(DESCRIPTION = 
(ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(Host = SERVERNAME)(Port = 1530))) 
(CONNECT_DATA = (SID = AAAA))) 


AAAA.FSA.GOV.UK = 
(DESCRIPTION = 
(ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(Host = SERVERNAME)(Port = 1521))) 
(CONNECT_DATA = (SID = AAAA))) 

Versuchen Sie es zu ändern, damit jeder Name einzigartig ist.

AAAA.FSA.GOV.UK = 
(DESCRIPTION = 
(ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(Host = SERVERNAME)(Port = 1530))) 
(CONNECT_DATA = (SID = AAAA))) 


AA21.FSA.GOV.UK = 
(DESCRIPTION = 
(ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(Host = SERVERNAME)(Port = 1521))) 
(CONNECT_DATA = (SID = AAAA))) 

dann auf der Kommandozeile versuchen tnsping AAAA.FSA.GOV.UK und tnsping AAAA21.FSA.GOV.UK