Avatar billede mt2 Nybegynder
04. juni 2006 - 00:49 Der er 11 kommentarer

Conn.Execute(Query) fejl ?

Jeg ved ved at lave et online netspil, men sidder lidt fast i det nu. www.barcelona-fc.dk/netspil

Hver gang jeg går ind på siden får jeg fejlmeddelelsen:
Microsoft ADO/RDS error '80072ee7'

Internet Client Error: Cannot Connect to Server.

/netspil/default.asp, line 22

Går jeg ind under andre menu punkter, er det altid den samme sætning der er problemer med, hvilket er:
Conn.Execute(Query)

I tilfældet over er hele koden således, hvis det skulle være nødvendig:
<%
Query = "Select * from Bets where Now() = StopTime And Active = 1"
Set Bets_Rs = Conn.Execute(Query)
Do until Bets_Rs.EOF
If Session("PLogin") <> "" Then
Query = "Select * from UserBets where Bets_ID = " & Bets_RS("ID") & " And Users_ID = " & Session("PLogin")
Set CheckBet_RS = Conn.Execute(Query)
If CheckBet_RS.EOF OR CheckBet_RS.BOF Then
%>

Jeg skal gerne have hele spillet færdig meget, meget snart, så behøver hurtig hjælp, for aner ikke hvordan jeg skal komme videre.
Avatar billede Slettet bruger
04. juni 2006 - 01:07 #1
hejsa... jeg tror måske at "query" er et reserveret udtryk... men i så fald er det ikke den rigtige fejlmeddelelse vi har med at gøre... men hvad med dette her i stedet?:
<%
Set Bets_Rs = Conn.Execute("Select * from Bets where " & Now() & "=StopTime And Active = 1")
Do until Bets_Rs.EOF
If Session("PLogin") <> "" Then
Set CheckBet_RS = Conn.Execute("Select * from UserBets where Bets_ID=" & Bets_RS("ID") & " And Users_ID=" & Session("PLogin"))
If CheckBet_RS.EOF OR CheckBet_RS.BOF Then
%>


\Dan
Avatar billede madeindk Nybegynder
04. juni 2006 - 01:09 #2
Dan - jeg tror ikke det har noget med den der Query at gøre - men han kunne evt. prøve med SQL, det bruger jeg selv og det spiller.

Men den siger jo ligefrem den ikke kan forbinde til serveren.
Avatar billede mt2 Nybegynder
04. juni 2006 - 01:14 #3
Så melder den fejl i linje 11:
Set Bets_Rs = Conn.Execute("Select * from Bets where " & Now() & "=StopTime And Active = 1")

Jeg ved ikke om det har betydning (er ikke lige så god inden for dette emne). Men altså jeg har fået overdraget spillet fra PLDK.dk. Deres database var en MySql (hvilket er php, ik sandt). Jeg vil lave min i access, og kunne muligvis være derfor det ikke vil fungere?
Avatar billede Slettet bruger
04. juni 2006 - 01:16 #4
OK!

Prøv lige at smide din connection-string også så...

Altså definitionen på "Conn"...

- det er højst sandsynligt der den er gal så...

\Dan
Avatar billede arne_v Ekspert
04. juni 2006 - 01:16 #5
Er der ikke noget med tidsformater, Access, ## o.s.v. ?
Avatar billede Slettet bruger
04. juni 2006 - 01:18 #6
... madeindk! Man kan også lade helt være med at have en variabel som hedder "query" eller "SQL" eller noget helt tredje... som du kan se i eksemplet jeg lavede så bliver det "executed direkte"...
- og så slipper man nemlig for den ekstra linie...

\Dan
Avatar billede mt2 Nybegynder
04. juni 2006 - 01:19 #7
Dan:

<% 
    cst = "Provider=MS Remote;" &_
        "Remote Server=http://10.0.0.11>;" &_
        "Remote Provider=Microsoft.Jet.OLEDB.4.0;" &_
        "Data Source=www.Barcelona-FC.dk/netspil/BAFC.mdb;" &_
    "Uid=michael;" &_
    "Pwd=PRIVAT;"
    set conn = CreateObject("ADODB.Connection") 
    conn.open cst
%>
Avatar billede Slettet bruger
04. juni 2006 - 01:26 #8
- OK!

Jeg ved ikke helt hvordan en connection til en remote-server skal se ud... men prøv evt. at rette denne her linie:
"Remote Server=http://10.0.0.11>;" &_
til:
"Remote Server=http://10.0.0.11;" &_

- og du er sikker på at det er en Access-database du vil connecte til?
\Dan
Avatar billede mt2 Nybegynder
04. juni 2006 - 01:30 #9
Jep, er jeg sikker på, og det andet hjalp ikke.

Hele den der default fil ser således ud. Tror ikke det kan bruges, men som du kan se giver den også en fejl et andet sted, lige når man trykker ind på barcelona-fc.dk/netspil. Og det er igen med = Conn.Execute (Query)

<!--#include file="res/Top_Template.asp"-->
<% If Request.QueryString("l") = "2" Then %>
<% If Request.QueryString("e") = "1" Then %>
<script language="JavaScript">
alert("Du har ikke point nok til at gøre de valgte indsatser. Forsøg igen.");
</script>
<% End If %>
<table>
<form action="Bet.asp" method="POST" name="BetForm">
<%
Set Bets_Rs = Conn.Execute("Select * from Bets where "& Now() & "=StopTime And Active = 1")
Do until Bets_Rs.EOF
If Session("PLogin") <> "" Then
Set CheckBet_RS = Conn.Execute("Select * from UserBets where Bets_ID=" & Bets_RS("ID") & " And Users_ID=" & Session("PLogin"))
If CheckBet_RS.EOF OR CheckBet_RS.BOF Then
%>
<tr><td colspan="2"><p><%=Bets_RS("Headline")%> (Spilstop <%=Bets_RS("StopTime")%>)</p></td></tr>
<tr><td width="50"><input type="text" name="Betpoints<%=Bets_RS("ID")%>" size="4"></td>
<td align="left"><p><input type="radio" name="Bet<%=Bets_RS("ID")%>" value="1">Ja  - <input type="radio" name="Bet<%=Bets_RS("ID")%>" value="2">Nej</p></td></tr>
<%
Else
%>
<tr><td colspan="2"><p><%=Bets_RS("Headline")%> (Spilstop <%=Bets_RS("StopTime")%>)</p></td></tr>
<tr><td width="50"><p><%=CheckBet_RS("Points")%></p></td>
<td align="left"><p><b><% If CheckBet_RS("Bet") = "1" Then Response.Write "Ja" Else Response.Write "Nej" %></b></p></td></tr>
<%
End If
Else
%>
<tr><td colspan="2"><p><%=Bets_RS("Headline")%> (Spilstop <%=Bets_RS("StopTime")%>)</p></td></tr>
<tr><td width="50"><input type="text" name="Betpoints<%=Bets_RS("ID")%>" size="4" disabled></td>
<td align="left"><p><input type="radio" name="Bet<%=Bets_RS("ID")%>" value="1" disabled>Ja  - <input type="radio" name="Bet<%=Bets_RS("ID")%>" value="2" disabled>Nej</p></td></tr>
<%
End If
Bets_RS.MoveNext
Loop
%>
<tr><td colspan="3" align="center"><input type="submit" name="FinishBet" value="Finish"></td></tr>
<tr><td colspan="3" align="center"><a href="Afsluttede.asp">Se afsluttede udfald</a></td></tr>
</form>
</table>
<% Else %>
<center>
<br><br><br>
<p>Spillet præsenteres i samarbejde med<br>
<div ID="BigHeading">Games4Sale.dk</div></p>
<table>
<%
TRC = 1
Query = "Select * from G4S where Ref = 1"
Set G4S_RS = Conn.Execute (Query)
Do until G4S_RS.EOF
If TRC = 1 Then Response.Write "<tr>"

Response.Write "<td align=""center""><p><a href=""" & G4S_RS("Link") & """ target=""blank""><img src=""" & G4S_RS("URL") & """ border=""0""></a><br><b>" & G4S_RS("Price") & " kr.</b></p></td>"

If TRC = 4 Then
Response.Write "</tr>"
TRC = 1
Else
TRC = TRC + 1
End If
G4S_RS.MoveNext
Loop
%>
</table>
</center>
<% End If %>
<!--#include file="res/Bottom_Template.asp"-->

Har du behov fra andre fil-informationer eller noget, for at kunne give ekstra hjælp eller?
Avatar billede mt2 Nybegynder
04. juni 2006 - 01:50 #10
Der ikke andre der kan hjælpe videre på problemet, eller kan hjælpe mig på helt andre veje.
Kunne det eventuelt være, at det vil være nemmere hvis jeg så oprettede det i en MySql database. Jeg har slet ingen kendskab til dette, så om nogen kan hjælpe mig med at oprette sådan en, hvis altså det ikke er muligt at få det til at du i access.
Avatar billede mt2 Nybegynder
04. juni 2006 - 02:18 #11
www.barcelona-fc.dk/netspil

Får en lidt anden fejlmeddelelse:
Microsoft ADO/RDS error '80072efe'

Internet Client Error. (0x80072efe)

/netspil/default.asp, line 11

Men den meddeler ikke, at den ikke kan forbinde med serveren, det burde være fremskridt ;)
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



IT-JOB

Quadsat ApS

Robotics Engineer

AURA A/S

IT-administrator

Capgemini Danmark A/S

Project Manager

Cognizant Technology Solutions Denmark ApS

Kinaxis Sr. Solution Consultant