[2 days left] What’s wrong with your cloud strategy? Learn why multicloud solutions matter with Nimble Storage.Register Now

x
?
Solved

Error 380: Invalid Property on Windows Server 2003

Posted on 2006-11-24
5
Medium Priority
?
155 Views
Last Modified: 2013-11-26
Hi Everybody!

Currently I'm programing an Interface kind of program that works fine on every OS I test it, but when it comes to Windows Server 2003 I get the 380: Invalid Property Error.

The wierd thing is that according to my debugging logs, the error occurs at a line that checks if a recordset is at EOF.

I'm using the following parameters:

    My machine:
        - OS: Windows XP Professional
        - IDE: Visual Basic 6.0 SP6

    Target Computer:
        - OS: Windows Server 2003 Standard
        - Database: Microsoft SQL Server 2000 SP4

    Code:
        - Database Control: DB1: Adodc
        - Connection String: "Provider=sqloledb;Data Source=localhost;Initial Catalog=MyDB;User Id=Me;Password=Me;"
       
        - Code Extract:
                    'Load Parameters (OK)
                    'Display Forms and Controls (OK)
                    'Get Files via FTP (OK)
                    DB1.Recordsource="Select * From MyTable;"
                    DB1.Refresh
                    If DB1.Recordset.EOF then
                        MsgBox("No Records.")
                    End If

When the program gets to the If line, I get the 380: Invalid Property Error.

I don't have Visual Basic IDE installed on the Target machine, but that's the last thing I want to do, only if nothing else works...

Any help will be very appreciated!! Thanks in advance.
0
Comment
Question by:smaldona
[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
5 Comments
 
LVL 9

Expert Comment

by:pradapkumar
ID: 18007134
 DB1.Recordsource="Select * From MyTable;"
                    DB1.Refresh
                    If DB1.EOF then
                        MsgBox("No Records.")
                    End If

try the above one.
0
 

Author Comment

by:smaldona
ID: 18010102
Finally got it myself... after a full day of debugging I found out I mistyped a proerty value when logging to the Event Viewer, and I didn't set the Explicit Option...

Sorry to bother you all...

Thanks anyway!!
0
 
LVL 1

Accepted Solution

by:
DarthMod earned 0 total points
ID: 18449450
PAQed with points refunded (125)

DarthMod
Community Support Moderator
0

Featured Post

How to Use the Help Bell

Need to boost the visibility of your question for solutions? Use the Experts Exchange Help Bell to confirm priority levels and contact subject-matter experts for question attention.  Check out this how-to article for more information.

Question has a verified solution.

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

Introduction In a recent article (http://www.experts-exchange.com/A_7811-A-Better-Concatenate-Function.html) for the Excel community, I showed an improved version of the Excel Concatenate() function.  While writing that article I realized that no o…
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
Suggested Courses

656 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