Solved

ORA-12537 while connecting ORACLE with an VISUAL BASIC exe file when the file name is too long.

Posted on 2004-04-04
6
3,845 Views
Last Modified: 2013-12-12
Hi
I have two Oracle databases. 1st one is PROD, 2nd is CARD. Version of DBs are 8.1.7.4.0   .My Tnsnames.ora file is at bottom

I developed a Visual Basic project to acess this both DBs. I used ADODB 2.5 for connection. (Source code at bottom)

i'm trying to connect both databases in VB design screen. I'm connecting to CARD but i can't connect to PROD. I'm getting "Run time error -2147467259 (80004005) ORA-12537: TNS:connection closed" error

on the other hand when i compile this file and give a name like 'test.exe' this executable file is connecting both databases

if i rename the file name to 'test1234567890123456.exe' (filename length is 20 or longer) i can connect just to CARD but getting same error from PROD connection.
When I copy test.exe file to my desktop, rename it to test123456.exe (length 10 or longer) i'm getting same error.

I'm using Windows XP and Windows 2000

What is the problem with my PROD database or with my VB code??



MY VB CODE is
Private Sub Command1_Click()
    Dim sSQL As String
    Dim oRs As ADODB.Recordset
    Dim sProvider As String
    Dim oConn As ADODB.Connection
    Set oConn = CreateObject("ADODB.Connection")
    Set oRs = CreateObject("ADODB.Recordset")
    sProvider = "Provider=MSDAORA.1;Password=pass;User ID=myuserid;Data Source= PROD ;Persist Security Info=True"
    oConn.Open sProvider
    oRs.CursorLocation = adUseClient
    sSQL = "select * from DIVISIONS"
    oRs.Open sSQL, oConn, adOpenDynamic, adLockBatchOptimistic
    Set oRs = Nothing
    Set oConn = Nothing
 End Sub


My tnsnames.ora file is

PROD.world =
  (DESCRIPTION =
    (ADDRESS_LIST =
        (ADDRESS =
          (PROTOCOL = TCP)
          (Host = 10.1.1.1)
          (Port = 1521)
        )       )
    (CONNECT_DATA = (SERVICE_NAME = PROD)
                    (SERVER=DEDICATED)          )  )

CARD.world =
  (DESCRIPTION =
    (ADDRESS_LIST =
        (ADDRESS =
          (COMMUNITY = tcp.world)
          (PROTOCOL = TCP)
          (Host = 10.1.1.2)
          (Port = 1521)
        )    )
    (CONNECT_DATA = (SERVICE_NAME = CARD)
    )  )

0
Comment
Question by:akmustafa
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
6 Comments
 
LVL 2

Expert Comment

by:syed555
ID: 10751546
Do you have firewall in PROD server?
0
 

Author Comment

by:akmustafa
ID: 10752823
Yes.
But both of DBs are behind same firewall.
0
 
LVL 48

Expert Comment

by:schwertner
ID: 10755324
Set USE_SHARED_SOCKET to FALSE in the registry.
Warning :
Setting this parameter will prevent to connect through a firewall which has no
SQL*Net proxy built-in.
0
 

Author Comment

by:akmustafa
ID: 10756662
Will I do this in my computer?

What is the full aaddress of this key?
0
 
LVL 1

Accepted Solution

by:
GhostMod earned 0 total points
ID: 11020045
PAQed, with points refunded (500)

GhostMod
Community Support Moderator
0

Featured Post

SharePoint Admin?

Enable Your Employees To Focus On The Core With Intuitive Onscreen Guidance That is With You At The Moment of Need.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Cursors in Oracle: A cursor is used to process individual rows returned by database system for a query. In oracle every SQL statement executed by the oracle server has a private area. This area contains information about the SQL statement and theā€¦
From implementing a password expiration date, to datatype conversions and file export options, these are some useful settings I've found in Jasper Server.
This video explains what a user managed backup is and shows how to take one, providing a couple of simple example scripts.
This video shows how to copy an entire tablespace from one database to another database using Transportable Tablespace functionality.

738 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question