Toon posts:

asp foutmelding

Pagina: 1

Acties:

266 views sinds 30-01-2008

zondag 15 september 2002 21:37

Acties:

Verwijderd

Topicstarter

Ik heb een asp pagina gemaakt en een database en beide geuploadt naar brinkster.com. Maar als ik de file uitvoer, krijg ik deze foutmelding.

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified

/mccane/Memberstwee.asp, line 8

.

Hieronder staat de volledige asp code.

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<%
Dim rsMedic
Dim rsMedic_numRows

Set rsMedic = Server.CreateObject("ADODB.Recordset")
rsMedic.ActiveConnection = MM_verbindingMedic_STRING

rsMedic.Source = "SELECT * FROM Members"
rsMedic.CursorType = 0
rsMedic.CursorLocation = 2
rsMedic.LockType = 1
rsMedic.Open()

rsMedic_numRows = 0
%>
<%
Dim MM_paramName
%>
<%
' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters

Dim MM_keepNone
Dim MM_keepURL
Dim MM_keepForm
Dim MM_keepBoth

Dim MM_removeList
Dim MM_item
Dim MM_nextItem

' create the list of parameters which should not be maintained
MM_removeList = "&index="
If (MM_paramName <> "") Then
MM_removeList = MM_removeList & "&" & MM_paramName & "="
End If

MM_keepURL=""
MM_keepForm=""
MM_keepBoth=""
MM_keepNone=""

' add the URL parameters to the MM_keepURL string
For Each MM_item In Request.QueryString
MM_nextItem = "&" & MM_item & "="
If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then
MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item))
End If
Next

' add the Form variables to the MM_keepForm string
For Each MM_item In Request.Form
MM_nextItem = "&" & MM_item & "="
If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then
MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item))
End If
Next

' create the Form + URL string and remove the intial '&' from each of the strings
MM_keepBoth = MM_keepURL & MM_keepForm
If (MM_keepBoth <> "") Then
MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1)
End If
If (MM_keepURL <> "") Then
MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1)
End If
If (MM_keepForm <> "") Then
MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1)
End If

' a utility function used for adding additional parameters to these strings
Function MM_joinChar(firstItem)
If (firstItem <> "") Then
MM_joinChar = "&"
Else
MM_joinChar = ""
End If
End Function
%>
<html>
<head>
<title>Members</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body background="AchtegrondHPM.gif" text="#FFFF00">
<p><strong><font color="#FFFF00" size="5">Members</font></strong></p>
<table width="75%" border="1" cellspacing="0" cellpadding="0">
<tr>
<td><A HREF="Detailpagina.asp?<%= MM_keepNone & MM_joinChar(MM_keepNone) & "id=" & rsMedic.Fields.Item("Members").Value %>"><%=(rsMedic.Fields.Item("Members").Value)%></A></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
<p> </p>
</body>
</html>
<%
rsMedic.Close()
Set rsMedic = Nothing
%>

Weet iemand waar het aan kan liggen??

zondag 15 september 2002 21:39

Acties:

Verwijderd

post ipv al die zooi es dit bestand :

haal wel effe het password en mischien de servername weg...
waarschijnlijk ligt t daar ergens aan

maandag 16 september 2002 02:06

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

Hmmm.. Dit lijkt wel heel erg op de fout die hier beschreven is:
[rml][ ASP]Dreamweaver MX code-fout[/rml]

(Het moet je in ieder geval wel een hint geven..

)

Digitaal onderwijsmateriaal, leermateriaal voor hbo

maandag 16 september 2002 10:14

Acties:

Verwijderd

Topicstarter

Dit is de de asp pagina die over de verbinding gaat:

<%
' FileName="Connection_odbc_conn_dsn.htm"
' Type="ADO"
' DesigntimeType="ADO"
' HTTP="false"
' Catalog=""
' Schema=""
Dim MM_verbindingMedic_STRING
MM_verbindingMedic_STRING = "dsn=medic;"
%>

maandag 16 september 2002 10:45

Acties:

xtra

MM_verbindingMedic_STRING verwijst naar een niet bestaande DSN. Je moet een zogenaamde DSN-less verbinding maken op onderstaande manier.

code:

1
2
3

sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
              "Data Source=" & Server.MapPath("\UserName\db\dbname.mdb") & ";" & _
              "Persist Security Info=False"

Zie ook http://brinkster.com/GeneralDatabaseGuide.asp

maandag 16 september 2002 11:05

Acties:

Verwijderd

Topicstarter

moet ik dan mijn laatste post -de gehele code- vervangen door de code van poster xtra? of gedeeltelijk.

maandag 16 september 2002 11:14

Acties:

Verwijderd

Topicstarter

Ik heb nu het een en ander vernaderd in de code. maar de brinkster compilatie zegt nu dit
Microsoft VBScript runtime error '800a000b'

Division by zero

/mccane/Connections/verbindingMedic.asp, line 3

maandag 16 september 2002 11:14

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

code:

Dim MM_verbindingMedic_STRING
MM_verbindingMedic_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
              "Data Source=" & Server.MapPath("DE_NAAM_EN_PAD_VAN_JE_DB.mdb") & ";" & _
              "Persist Security Info=False"

Digitaal onderwijsmateriaal, leermateriaal voor hbo

maandag 16 september 2002 11:22

Acties:

Verwijderd

Topicstarter

maar het probleem is juist hoe dat path gedefinieerd moet worden. Is dat met usernamen of enkel : Map.Path("db/HPmedic.mdb"

maandag 16 september 2002 11:25

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

Server.Mappath = absolute pad, relatief ten opzichte van de rootdir.

Je stel site staat in c:\inetpub\wwwroot
Server.Mappath("/") geeft dan: c:\inetpub\wwwroot
Je kan Server.Mappath ook vervangen door een harde lokatie.

Zie ook:
http://www.4guysfromrolla.com/webtech/121799-1.shtml

[voorkauwmode]

code:

Dim MM_verbindingMedic_STRING
MM_verbindingMedic_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
              "Data Source=c:\pseudodirectory\NAAMDB.mdb;" & _
              "Persist Security Info=False"

[/voorkauwmode]

Digitaal onderwijsmateriaal, leermateriaal voor hbo

maandag 16 september 2002 11:32

Acties:

Verwijderd

Topicstarter

en die " horen er bij?
de HPmedic.mdb staat in de directory db. En ik ben ingelogd als mccane. Op de brinkster website staat dan het zo moet worden: Hieronder staat gehele file. verbindingMedic.asp

<%
Set Conn = Server.CreateObject("ADODB.Connection")
sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Server.MapPath("\mccane\db\HPmedic.mdb") & ";" & _
"Persist Security Info=False"
Conn.Open(sConnection)
%>

maandag 16 september 2002 11:38

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

Je hebt opeens een andere inhoud van een bestand gemaakt, met andere variabelnamen?

En heb je die link doorgelezen (gok van niet, aan je slashes te zien)
En je database zou dus, afgezien van beveiligingsrechten, te downloaden moeten zijn vanaf:

www.domeinnaam.com/mccane/db/HPmedic.mdb

?

Digitaal onderwijsmateriaal, leermateriaal voor hbo

maandag 16 september 2002 11:44

Acties:

Verwijderd

Topicstarter

wat is het probleemmet die slashes dan?

maandag 16 september 2002 12:01

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

Werking van slashes blijkt indifferent te zijn (moet zelf ook beter lezen..

, vind het sowieso wel netter), maar dit was een van minst belangrijke zaken van de 3.

Digitaal onderwijsmateriaal, leermateriaal voor hbo

maandag 16 september 2002 12:01

Acties:

D2k

[rml][ PW] Wordt errug basic[/rml]

gorgi_19 schreef op 16 september 2002 @ 11:51:
asp foutmelding

Heeft probleem met Dreamweaver / ASP.

Geef hem daarna een link naar de probleembeschrijving van Macromedia zelf.
(en naar een topic met EXACT hetzelfde probleem:[rml][ ASP]Dreamweaver MX code-fout[/rml])
Geef hem vervolgens nog beide goede connectionstrings
Geef hem een tutorial van Server.Mappath, waarvan ik me afvraag of hij deze gelezen heeft...)

En hij heeft volgens mij geen enkele kaas gegeten van asp of van programmeren an sich (je volledige variabelen opeens omgooien en de verwijzingen niet.)

Misschien beter om hem naar een aantal tutorials te verwijzen?

Waarbij de beslissing over het topic natuurlijk aan de mods is.. $_/-\o_$

Doet iets met Cloud (MS/IBM)

Pagina: 1

Dit topic is gesloten.