Wrox Home  
Search P2P Archive for: Go

  Return to Index  

asptoday_discuss thread: '80004005' Connection error between access database and excel, everything on same server


Message #1 by "Trevor Mosher" <lil_huge@h...> on Wed, 31 Oct 2001 21:26:44
Unfortunetly still no go.  what we have now is a problem between the

database and the excel sheets that it is linked to.  Everything is now on

the webserver itself. the Access DB and even the Excel sheets in the same

folder.  the links have been remade using the \\ldo\ type path.  The error

though remains the same this time it reads the Database (tested with a

normal table out of the database that was not linked to excel)but the

error now comes at the level of the spreadsheets and says



[Microsoft][ODBC Microsoft Access Driver] The Microsoft Jet database

engine cannot open the

file '\\ldoa311a\inetpub\wwwroot\SEK\CurrentFY\TestExcel.xls'. It is

already opened exclusively by another user, or you need permission to view

its data.



here is my command code maybe something wrong with it and frontpage made a

connection string here it is this is in the application_onstart



Dim FrontPage_UrlVars(1)

	'--Project Data Connection

		Application("ScoreCardDB_ConnectionString") = "DRIVER

{Microsoft Access Driver (*.mdb)};DBQ=URL=CurrentFY/ScoreCardDB.mdb"

		FrontPage_UrlVars(0) = "ScoreCardDB_ConnectionString"

		Application("ScoreCardDB_ConnectionTimeout") = 15

		Application("ScoreCardDB_CommandTimeout") = 30

		Application("ScoreCardDB_CursorLocation") = 3

		Application("ScoreCardDB_RuntimeUserName") = ""

		Application("ScoreCardDB_RuntimePassword") = ""

	'--

	Application("FrontPage_UrlVars") = FrontPage_UrlVars



Set connDB = Server.CreateObject ("ADODB.Connection")

	connDB.Open Application("ScoreCardDB_ConnectionString")



	set cmdBuyer = server.CreateObject("ADODB.Command")

	cmdBuyer.ActiveConnection = Application

("ScoreCardDB_ConnectionString")

	cmdBuyer.CommandType = 4 ' Stored Procedure Type

	cmdBuyer.CommandText = "TestExcelQ"

'	cmdBuyer.Parameters.Refresh

	set recBuyer = server.createObject("ADODB.RECORDSET")

	set recBuyer = cmdBuyer.Execute



This is a major delay and help is greatly appreciated


  Return to Index