473,847 Members | 1,432 Online
Bytes | Software Development & Data Engineering Community
+ Post

Home Posts Topics Members FAQ

help needed with error 3011

1 New Member
i have developed some functions in module using which i want to download CSV files from a Stock exchange server. everything is fine but i am unable to download CSV file, i get following msg "[COLOR="Red"]3011 The Microsoft Jet database engine could not find the object 'http://www.nseindia.co m/content/historical/EQUITIES/2007/SEP/'. Make sure the object exists and that you spell its name and the path name correctly.[/COLOR]" however when i check the values in debug windows everything is fine even the file URL is constructed properly. for reference the code is
Expand|Select|Wrap|Line Numbers
  1. ============================================
  2. Option Explicit
  3.  
  4. Function ImportBhavCopy(dtFrom As Date, dtTo As Date)
  5. On Error GoTo errHandler
  6. Dim dtDate As Date
  7.  
  8. For dtDate = dtFrom To dtTo Step -1
  9.     'Debug.Print GetURL(dtDate)
  10.     DoCmd.TransferText acImportDelim, "", "Quotes", GetURL(dtDate), True, ""
  11. Next
  12.  
  13. errHandler:
  14. Debug.Print err.Number & " " & err.Description
  15. Exit Function
  16. End Function
  17. Function GetURL(dtTemp As Date) As String
  18. Dim strTemp As String
  19. strTemp = "http://www.nseindia.com/content/historical/EQUITIES/"
  20. strTemp = strTemp & GetYear(dtTemp) & "/"
  21. strTemp = strTemp & UCase(GetMonthName(dtTemp)) & "/cm"
  22. strTemp = strTemp & GetDay(dtTemp)
  23. strTemp = strTemp & UCase(GetMonthName(dtTemp))
  24. strTemp = strTemp & GetYear(dtTemp) & "bhav.csv"
  25. GetURL = strTemp
  26. End Function
  27.  
  28. Function GetMonthName(dtTemp As Date) As String
  29. GetMonthName = MonthName(Month(dtTemp), True)
  30. End Function
  31. Function GetDay(dtTemp As Date) As String
  32. If Day(dtTemp) < 10 Then
  33.     GetDay = "0" & CStr(Day(dtTemp))
  34. Else
  35.     GetDay = CStr(Day(dtTemp))
  36. End If
  37. End Function
  38.  
  39. Function GetYear(dtTemp As Date) As String
  40. GetYear = CStr(Year(dtTemp))
  41. End Function
  42.  
  43. ============================================
  44.  
i will really appreciate if anyone can help me with this. i need this to be completed as soon as possible. need to submit this for a project.
Oct 19 '07 #1
2 2597
nico5038
3,080 Recognized Expert Specialist
Could be a corruption sign as described in:
http://www.vb123.com/fixaccess/Acces...onProblems.htm

Some MS Access database recovery steps:

1) Create a backup of the corrupt database. (Just in case of)

2) Create a new database and use File/Get external data/Import to get all objects of the damaged database.

3) Try these Microsoft solutions:
Repair A97/A2000:
http://support.microsoft.com/support.../Q109/9/53.asp
Jetcomp:
http://support.microsoft.com/default...;en-us;Q273956
and/or read the article:
ACC2000: How to Troubleshoot Corruption in a Microsoft Access Database
http://support.microsoft.com/default...b;en-us;306204

4) Bit "heavier":
Access decompile:
http://www.granite.ab.ca/access/decompile.htm

5) Try a recovery tool / Table rescue
Table datarecovery:
www.mvps.org/access/tables/tbl0018.htm
Access recovery:
http://www.officerecovery.com/access/index.htm

6) Ask a company (will cost $$'s ! )
http://www.pksolutions.com/services.htm

check also: http://www.granite.ab.ca/access/corruptmdbs.htm

Nic;o)
Oct 19 '07 #2
missinglinq
3,532 Recognized Expert Specialist
While Access error messages are notorious for not being accurate, in this case, as the message says, the object

http://www.nseindia.co m/content/historical/EQUITIES/2007/SEP/

does not exist! Try copying it and pasting it into your browser's address box. You have to take it all the way back to

http://www.nseindia.co m/

before you can connect to the site. I think you need to check your references again for the correct URL.

Welcome to TheScripts!

Linq ;0)>
Oct 21 '07 #3

Sign in to post your reply or Sign up for a free account.

Similar topics

1
24440
by: Trevor Best | last post by:
Just been having this problem when Exporting a query. DoCmd.TransferText acExportDelim, "GenMESR Export Specification", "qryGenMESRExport", Environ$("TEMP") & "\MESR.CSV", False I get the error 3011 cannot find object 'MESR.CSV' Tried using OutputTo, which netted "database or object is read-only". Googled this group to find KB article KB225987 for A2K, which refers
0
1336
by: Simon Kirk | last post by:
Hi, In Access 97 I used to be able to copy data from Excel 97 and then paste it directly into the tables database pane. It would then ask if the first row contained column headings, and then would create a table based upon the data I was pasting. When I try to do this between Excel 2002 and Access 2002 I get the following error: "The Microsoft Jet Database engine could not find the object ''. Make sure the object exists and that you
4
5136
by: Polly | last post by:
I had a macro that ran a parameter query and created and opened an Excel file with the system date as part of the file name, but I had to change the file name by hand. So I converted the macro to code using tools-->references. The converted macro included the following statement: DoCmd.OutputTo acQuery, "qselLabelsBloodLog_output", "MicrosoftExcelBiff8(*.xls)", "S:\susan_cheree\lb041129.xls", True, "", 0
3
2931
by: Praetorian Prefect | last post by:
Code will not work in XP. Any ideas? Public Sub GetData() ' Declare variables Dim InputDir, ImportFile As String, tblName As String, strsql As String InputDir = ("f:\") ImportFile = Dir("F:\Documents\Deployment Documentation" & "\*.txt") On Error Resume Next
4
3253
by: JonathanParker | last post by:
Looking for some help urgently with some VB SQL Access stuff. You'll have to excuse the messiness of the code, I'm a newbie at all this. I'm running this code with a selection of check boxes to select extra fields for my table that is then exported to Excel. there are 3 fields that are always part of the SQL, when these are selected it works fine, however when I select any of the optional fields I get a Runtime Error '3011' saying: the...
2
2417
by: karrans | last post by:
Hi, I'm trying to debug some code where I'm trying to retrieve particular ranges in an excel sheet into an Access table, depending on the user selection of the range name in a combo box with a list of range names. I have already named the ranges I need in the target Excel sheet as follows : range1 (where range1 =$A$1:$E$10 range2 = $H$1:$L$10 and so on
1
2316
by: Bhavesh Devgan | last post by:
Hi all, am having a runtime error while exportnig data by running a query through TransferSpreadsheet command Error it shows: object could not be found 'Select * from where . =200704 The relevant code is: Dim strQuery As String strMonth = cmbMonth.Value strQuery = ("Select * from where . =" & strMonth)
0
1858
by: Dirk.Emmermacher | last post by:
Hello list. I' ve got a problem with mde files from Office XP. We have following situation: We are running a W2K Terminal server with an Office XP. There is a Access application running (mde file) who connects to sql2000 database. Each User has his own directory with a own copy of all necessary files. Instead of reports the application use word for sereial letters. The program should create a ~01tmp.tab file (word format) as
4
8221
by: forrestgump | last post by:
In my access database I have created vba which deletes information in a table and then uploads a .txt file based on it's naming convention. However if you specific an incorrect naming convention by mistake the vba still deletes all the information in the table so the table is blank and nothing is uploaded. The next time I try and run the code i get run time error 3011 because there is nothing to delete in the table. What is the best why...
0
9889
marktang
by: marktang | last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However, people are often confused as to whether an ONU can Work As a Router. In this blog post, we’ll explore What is ONU, What Is Router, ONU & Router’s main usage, and What is the difference between ONU and Router. Let’s take a closer look ! Part I. Meaning of...
0
9732
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can effortlessly switch the default language on Windows 10 without reinstalling. I'll walk you through it. First, let's disable language synchronization. With a Microsoft account, language settings sync across devices. To prevent any complications,...
0
10988
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed. This is as boiled down as I can make it. Here is my compilation command: g++-12 -std=c++20 -Wnarrowing bit_field.cpp Here is the code in...
0
10652
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven tapestry of website design and digital marketing. It's not merely about having a website; it's about crafting an immersive digital experience that captivates audiences and drives business growth. The Art of Business Website Design Your website is...
0
9487
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then launch it, all on its own.... Now, this would greatly impact the work of software developers. The idea...
1
7886
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules. He will explain when you may want to use classes instead of User Defined Types (UDT). For example, to manage the data in unbound forms. Adolph will...
0
7058
by: conductexam | last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and then checking html paragraph one by one. At the time of converting from word file to html my equations which are in the word document file was convert into image. Globals.ThisAddIn.Application.ActiveDocument.Select();...
0
5723
by: TSSRALBI | last post by:
Hello I'm a network technician in training and I need your help. I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs. The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols. I succeeded, with both firewalls in the same network. But I'm wondering if it's possible to do the same thing, with 2 Pfsense firewalls...
2
4126
muto222
by: muto222 | last post by:
How can i add a mobile payment intergratation into php mysql website.

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.