Koppla nyhetsdatabas till hemsida

48 svar · 1 632 visningar · startad av MrPhil 18 juni 2007 · sida 2 av 3

Frågan, av MrPhil 18 juni 2007

Hej! Nykomling här med frågor o för lite kunskap, därav postningen under detta ämne istället för det rätta. Ber om ursäkt, men jag har inte en susning om detta bör ligga under ASP, PHP eller något annat :r Min fråga: Jag har tagit hand om en hemsida som dessutom flyttat till en ny server. Den gamla hemsidan hade en nyhetssida med databaskoppling som kunde uppdateras av flera från ett ställe

Läs frågan i sin helhet →

MrPhilMedlem sedan juni 200729 inlägg

26 juni 2007 19:44#21

voigtann1 skrev:

Kan även rätta min egna kod... man ska egentligen undvika (i den mån som går) att inte använda <% %> för mycket.. du kan använda response.write:
<%
If RS.EOF Then
  Response.Write "Ingen träff i databasen"
Else
  Do Until RS.EOF
    Response.Write RS("Datum") & "<br>"
    RS.MoveNext
  Loop
End If
%>

Gav svaret:

Server.MapPath() error 'ASP 0173 : 80004005'

Invalid Path Character

/aktuellt.asp, line 7

An invalid character was specified in the Path parameter for the MapPath method.

Men nu visas sidan iaf :e

Är det fel sökväg till databasen??

voigtann1Medlem sedan juni 20019 519 inlägg

27 juni 2007 04:33#22

det kan inte vara den kod som ger det meddelande ;)

MrPhil skrev:

Är det fel sökväg till databasen??

jepp

MrPhil skrev:

Är det förresten möjligt att se koden i en .asp-fil som denna?
Isf skulle jag ju kunna se vad som står i den gamla.
Troligen inte va? :P

Nej... eftersom det är ett server språk -> Servern generera resultatet innan den skickar den till användaren.

MrPhilMedlem sedan juni 200729 inlägg

27 juni 2007 08:05#23

voigtann1 skrev:

jepp.

fast den ligger där: ../db/a6news.mdb det har jag kollat o dubbelkollat.... :q
Skulle det bli samma resultat om den var tom?

voigtann1Medlem sedan juni 20019 519 inlägg

27 juni 2007 11:04#24

Vad får du om du skriver:

<%
Response.Write Server.Mappath("../db/a6news.mdb")
%>

Kolla resultatet och se om den VERKLIGEN ligger där.. du kanske inte kan ta ../ på din server...

MrPhilMedlem sedan juni 200729 inlägg

28 juni 2007 08:57#25

voigtann1 skrev:

Vad får du om du skriver:
<%
Response.Write Server.Mappath("../db/a6news.mdb")
%>
Kolla resultatet och se om den VERKLIGEN ligger där.. du kanske inte kan ta ../ på din server...

Ska jag lägga in den koden i aktuellt.asp ist för den andra ovan?
Vad bör resultatet bli om den finns, resp inte finns på rätt ställe?

edit: fick detta resultat...

d:\www\a6fencing.se_omdskeovjj\db\a6news.mdb

Ska jag peka med den fullständiga adressen istället?

voigtann1Medlem sedan juni 20019 519 inlägg

28 juni 2007 15:54#26

Är det vid "d:\www\a6fencing.se_omdskeovjj\db\" a6news.mdb ligger? på server datorn?

MrPhilMedlem sedan juni 200729 inlägg

2 juli 2007 17:29#27

voigtann1 skrev:

Är det vid "d:\www\a6fencing.se_omdskeovjj\db\" a6news.mdb ligger? på server datorn?

Vet inte. Jag kommer inte längre upp än att jag kan se två mappar: /public_html och /db

voigtann1Medlem sedan juni 20019 519 inlägg

2 juli 2007 17:38#28

Kontakta webbhotellet för att få reda på din /db plats sen kör du den direkt istället för att använda Server.Mappath().

Offtast brukar /db hos webbhotellen ligga på en annan plats än just public_html och inte ../ ... fysiskt ligger den någon annan stans.. vilket hotell använder du?

MrPhilMedlem sedan juni 200729 inlägg

6 juli 2007 14:34#29

Nu säger den istället

ADODB.Connection error '800a0e78'

Operation is not allowed when the object is closed.

/aktuellt.asp, line 14

voigtann1Medlem sedan juni 20019 519 inlägg

6 juli 2007 14:35#30

rad 14 är? Du får nog ge oss en liten mer uppdaterad kod av det du använder just nu av.

MrPhilMedlem sedan juni 200729 inlägg

6 juli 2007 14:42#31

voigtann1 skrev:

rad 14 är? Du får nog ge oss en liten mer uppdaterad kod av det du använder just nu av.

Snabba puckar! :D

Rad 14 är antingen "If RS.EOF Then"

eller "Response.Write "Ingen träff i databasen" "

beroende på om man ska räkna en tom rad eller inte. Jag öppnar i anteckningar så jag ser inte nåhgra radnummer.

voigtann1Medlem sedan juni 20019 519 inlägg

6 juli 2007 14:43#32

Ctrl+g för att söka rad.. läs mitt inlägg ovan(redigerade den) Ge oss mer kod ;)

MrPhilMedlem sedan juni 200729 inlägg

6 juli 2007 14:45#33

Hela koden på sidan är:

<HTML>
<HEAD>
<META NAME="GENERATOR" CONTENT="Adobe PageMill 3.0 Win">
<BASE TARGET="_self">
<TITLE>A6 Fäktning - JÖNKÖPING Sweden | Swedish fencing</TITLE>
<LINK REL="stylesheet" HREF="mall.css">
<% strconnect="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("../db/a6news.mdb") %>
<% set RS=server.createobject("adodb.connection") %>
<% RS.Open "SELECT * FROM tbl_nyheter ORDER BY Datum desc, ID desc",strconnect,1,3 %>
</HEAD>

<BODY>
<%
If RS.EOF Then
Response.Write "Ingen träff i databasen"
Else
Do Until RS.EOF
Response.Write RS("Datum") & "<br>"
RS.MoveNext
Loop
End If
%>
</BODY>

</HTML>

voigtann1Medlem sedan juni 20019 519 inlägg

6 juli 2007 14:46#34

Jag vet inte alls vad som är fel.. provade:

<HTML>
<HEAD>
<META NAME="GENERATOR" CONTENT="Adobe PageMill 3.0 Win">
<BASE TARGET="_self">
<TITLE>A6 F&auml;ktning - J&Ouml;NK&Ouml;PING Sweden | Swedish fencing</TITLE>
<LINK REL="stylesheet" HREF="http://www.a6fencing.se/mall.css">
</HEAD>
<BODY>
<%
Dim Databas, StrConnect, Sql, RecSet
Set Databas = Server.CreateObject("ADODB.Connection")
StrConnect = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("../db/a6news.mdb")
Databas.Open StrConnect

Sql = "SELECT * FROM tbl_nyheter ORDER BY Datum desc, ID desc"
Set RecSet = Databas.Execute(sql)
If  RecSet.EOF Then
  response.write "Ingen träff i Databasen"
Else
  Do Until RecSet.EOF
%>
<%=RecSet("Datum")%>
<%
RecSet.MoveNext
Loop
End if
RecSet.Close
set Recset = nothing
%>
</BODY>
</HTML>

Detta vet jag ska fungera 9/10 :P

red. Uppdaterat :P lite fel ;)

MrPhilMedlem sedan juni 200729 inlägg

6 juli 2007 14:47#35

voigtann1 skrev:

Ctrl+g för att söka rad.. läs mitt inlägg ovan(redigerade den) Ge oss mer kod ;)

ctrl-g i vilket program?? :q Händer inget i anteckningar.

voigtann1Medlem sedan juni 20019 519 inlägg

6 juli 2007 14:48#36

View -> Status Bar sen ser du "ln 1, Col2" nere i status baren på fönstret.

MrPhilMedlem sedan juni 200729 inlägg

6 juli 2007 14:51#37

voigtann1 skrev:

Jag vet inte alls vad som är fel.. provade:
Detta vet jag ska fungera 9/10 :P

red. Uppdaterat :P lite fel ;)

OK testar igen då :birp
http://www.a6fencing.se/aktuellt.asp

voigtann1Medlem sedan juni 20019 519 inlägg

6 juli 2007 14:52#38

Gjort en uppdatering.. ändra din ;)

MrPhilMedlem sedan juni 200729 inlägg

6 juli 2007 14:53#39

Blir det samma om du kollar?

Microsoft VBScript runtime error '800a000d'

Type mismatch: 'RS'

/aktuellt.asp, line 24

voigtann1Medlem sedan juni 20019 519 inlägg

6 juli 2007 14:54#40

Ser felet ;) ändra RS till RecSet