Avatar billede cpccorp Juniormester
06. december 2002 - 10:18 Der er 9 kommentarer og
2 løsninger

ikke lukket forbindelse

Jeg får følgende meddelelse:
Microsoft JET Database Engine error '80004005'
Could not use ''; file already in use.

/mbif/coach/editgoals.asp, line 111

skyldes dette at jeg ikke har lukket connection??
Avatar billede dk_akj Nybegynder
06. december 2002 - 10:21 #1
Det lyder som om du har fat i den forkerte fil.

Normalt vil den skrive hvilken fil den ikke kan åbne.
//akj
Avatar billede medions Nybegynder
06. december 2002 - 10:22 #2
Ja, både og!

-Prøv at slutte alle dine connections af med flg.:

Set objRs = Nothing
objConn.Close
Set objConn = Nothing

Den anden ting der kan være galt, er at du har din database fil åben sammentidig med du prøver at lave efterspørgelser til den gennem din hjemmeside!

//>Rune
Avatar billede cpccorp Juniormester
06. december 2002 - 10:23 #3
Jeg prøver det lige af......please wait
Avatar billede dk_akj Nybegynder
06. december 2002 - 10:25 #4
Hvordan ser din connect ud ??

//akj
Avatar billede cpccorp Juniormester
06. december 2002 - 11:08 #5
Ja, det hjalp lidt, men nu vises der ingen poster. Jeg kan desværre ikke close connection det nægtes. jeg vedlægger lige lidt kode til gennemsyn:
<%
' Holdet
dim teamnavn
dim teamid
'Creating the Recordset Object
Set rs = Server.CreateObject("ADODB.RecordSet")

'Creating your SQL Resuest as a string
strSQL = "SELECT * FROM coaches ORDER BY coachtype DESC"
teamSQL = "SELECT * FROM teams"

'Open your recordset
rs.Open teamSQL, strDSN, 1
Do While Not rs.EOF
if rs("teamid") = CInt(request.querystring("team")) then
teamnavn = rs("Teamname")
teamid = rs("teamid")
end if
rs.MoveNext
Loop
rs.Close
set rs = nothing
Response.Write "<div align=center>"
Response.Write "<center>"
Response.Write "<table border=0 width='100%'>"
Response.Write "<tr>"
Response.Write "<td colspan=5 align=center width=730><b><font face=Verdana font-size: 10; color=#0000FF>TRÆNERE FOR " & teamnavn & "</font></b></td>"
Response.Write "</tr>"
Response.Write "<tr>"
Response.Write "<td width=205>&nbsp;</td>"
Response.Write "<td width=35>&nbsp;</td>"
Response.Write "<td width=223>&nbsp;</td>"
Response.Write "<td width=140>&nbsp;</td>"
Response.Write "<td width=103>&nbsp;</td>"
Response.Write "</tr>"
Response.Write "<tr>"
Response.Write "<td width=205>&nbsp;</td>"
Response.Write "<td colspan=2 style=border-bottom: 1 solid #0000FF width=264><font color=#0000FF><b>Trænertype</b></font></td>"
Response.Write "<td align=center style=border-bottom: 1 solid #0000FF width=140><font color=#0000FF><b>Navn</b></font></td>"
Response.Write "<td width=103>&nbsp;</td>"
Response.Write "</tr>"
'Open your recordset
strSQL = "SELECT * FROM coaches ORDER BY coachtype DESC"
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open strSQL, strDSN, 1

'Looping through your recordset
Do While Not rs.EOF
if rs("teamid") = teamid then
'Displaying Contents from Your database
Response.Write "<tr>"
Response.Write "<td align=right width=205><a class='comlinkblue' href='editcoaches.asp?coachid=" & rs("Coachid") & "&team=" & request.querystring("team") & "'>Rediger</a> | <a class='comlinkblue' href='deletecoach.asp?coachid=" & rs("Coachid") & "&team=" & teamnavn & "'>Slet</a>&nbsp;&nbsp;&nbsp;&nbsp;</td>"
Response.Write "<td width=258 colspan=2><font color=red>" & rs("coachtype") & "</font></td>"
Response.Write "<td width=243 align=left colspan=2><font color=red>" & rs("coachname") & "</font></td>"
Response.Write "</tr>"
end if
'Move to next Record
  rs.MoveNext

' Looping through our Recordset
  Loop

'Finished - Time to close the Recordset and the Connection to the Database
rs.Close
Set rs = Nothing
Response.Write "</table>"
Response.Write "</center>"
Response.Write "<p align=center>[ <a class='comlinkblue' href='newcoach.asp?team=" & teamnavn & "'>Tilføj ny træner</a> ] | [ <a class='comlinkblue' href=coachservice.asp>Tilbage</a> ]</p>"
set strDSN = Nothing
%>
Avatar billede dk_akj Nybegynder
06. december 2002 - 12:05 #6
Hvor sætter du variablen strDSN ???
Avatar billede dk_akj Nybegynder
06. december 2002 - 12:07 #7
Ups, der fik jeg squ trykket for tidligt ;o)

Den ved tilsyneladende ikke hvilken DB den skal tage fat i.

Eks:
strDSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("..")+"/db/navn.mdb"
Avatar billede cpccorp Juniormester
06. december 2002 - 12:43 #8
Tusind tak begge to
Avatar billede dk_akj Nybegynder
06. december 2002 - 12:44 #9
Hvad var fejlen ??
Avatar billede cpccorp Juniormester
06. december 2002 - 12:48 #10
Fejlen var i conn og det var medion der fik mig på sporet, grunden til at du alligevel fik point var at jeg nogle steder havde brugt:
DBQ=" & Server.Mappath("oldfiles/db/users.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" og det ændrede sig så....
Avatar billede medions Nybegynder
06. december 2002 - 13:41 #11
*G* Fair nok.
Thx 4 Poinz

//>Rune
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester