/ Forside / Teknologi / Udvikling / ASP / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Valg af DB...??
Fra : Ras


Dato : 14-02-01 23:36

Hej.

Jeg skal bygge en side hvor man først skal vælge mærke.Dertil har jeg
oprettet X antal DB.
Man går det at man vælger mærke - som gerne skulle overføres til hvilken
*.mdb der skal connectes til:

Side 1 ser sådan ud: (efter at jeg nok snart har smadret det hele..!!)

<FORM action="admin.asp" method="POST">
<TABLE border=1 width="100%" height="100%" cellspacing=5 cellpadding=5
rules=box>
<TR>
<TD Colspan="5">
<FONT FACE="arial","helvetica" SIZE="-1">
For at finde de rigtige dæk/fælge skal du angive værdier i felterne
nedenfor og trykke på knappen <B>'Send forespørgsel'</B></FONT></TD></TR>
<TR><TD align="right" valign="top">
<TT><FONT FACE="arial","helvetica" SIZE="-1">Mærke</font>: </TT>
</TD>
<TD align="left" valign="top">

</TD>
<TD align="left" valign="top">
<INPUT NAME="maerke" VALUE="" SIZE="27" MAXLENGTH="254" VALUE="">
</TD></TR>
<TR><TD Colspan="3">
<INPUT TYPE="SUBMIT" VALUE="Send forespørgsel">
<INPUT TYPE="RESET" VALUE="Gendan standarder"></TD></TR>


</TABLE>
</FORM>

formaction-siden ser sådan her ud:

<%

If request.Form("maerke") = "toyota" Then
db = ("toyota.mdb")

ElseIf request.Form("maerke") = "opel" Then
db = "opel.mdb"

ElseIf request.Form("maerke") = "mazda" Then
db = "mazda.mdb"
End If

Set Conn = Server.Createobject("ADODB.Connection")
'--- Database forbindelse ---
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " &_
"DBQ=" & Server.Mappath("../log/" & Request("db") ) & "; password=xx"
Conn.Open strDSN
Set RS = Conn.Execute("SELECT TOP 1 * FROM UploadData ORDER BY ID DESC")
%>
<HTML>
<HEAD>
<TITLE>Meddelelsescenter</TITLE>
<%
Response.Write RS("Tekst2")
RS.close
Conn.Close
Set RS = nothing
Set Conn = nothing
%>
</BODY>
</HTML>

....men jeg får forskellige fejl........hvad gør jeg galt.og kan det
overhovedet lade sig gøre..????
den skriver bla. "unknown file" - dvs at den sikkert ikke kan læse hvilken
mdb.
mvh.
Ras.



 
 
Mikkel Bjerg (15-02-2001)
Kommentar
Fra : Mikkel Bjerg


Dato : 15-02-01 11:22

Ras wrote:
>
> Hej.
>
> Jeg skal bygge en side hvor man først skal vælge mærke.Dertil har jeg
> oprettet X antal DB.
> Man går det at man vælger mærke - som gerne skulle overføres til hvilken
> *.mdb der skal connectes til:
>
[SNIP]
> formaction-siden ser sådan her ud:
>
> <%

Dim db
sikrer dig at du rent faktisk har en variabel med navn db

> If request.Form("maerke") = "toyota" Then
> db = ("toyota.mdb")
>
> ElseIf request.Form("maerke") = "opel" Then
> db = "opel.mdb"
>
> ElseIf request.Form("maerke") = "mazda" Then
> db = "mazda.mdb"
> End If

Her burde der nok være en standardværdi for db

>
> Set Conn = Server.Createobject("ADODB.Connection")
> '--- Database forbindelse ---
> strDSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " &_
> "DBQ=" & Server.Mappath("../log/" & Request("db") ) & "; password=xx"
> Conn.Open strDSN

Her skal der kun stå db i stedet for Request("db")

> Set RS = Conn.Execute("SELECT TOP 1 * FROM UploadData ORDER BY ID DESC")
> %>
> <HTML>
> <HEAD>
> <TITLE>Meddelelsescenter</TITLE>
> <%
> Response.Write RS("Tekst2")
> RS.close
> Conn.Close
> Set RS = nothing
> Set Conn = nothing
> %>
> </BODY>
> </HTML>
> den skriver bla. "unknown file" - dvs at den sikkert ikke kan læse hvilken
> mdb.

Netop, eftersom Request("db") ikke har nogen værdi, forsøger du sikkert
blot at åbne filen ../log/
Det kan være derfor det ikke virker

--
MVH

Mikkel Bjerg

Ras (16-02-2001)
Kommentar
Fra : Ras


Dato : 16-02-01 18:49

Takker Mikkel..!!!!

Var det ikke sværere..godt være at man skulle lave den slags ting om
dagen...og ikke om natten.

Tak.

- Ras

Ras <ras@rasweb.dk> skrev i en
nyhedsmeddelelse:96f1d6$27ue$1@news.cybercity.dk...
> Hej.
>
> Jeg skal bygge en side hvor man først skal vælge mærke.Dertil har jeg
> oprettet X antal DB.
> Man går det at man vælger mærke - som gerne skulle overføres til hvilken
> *.mdb der skal connectes til:
>
> Side 1 ser sådan ud: (efter at jeg nok snart har smadret det hele..!!)
>
> <FORM action="admin.asp" method="POST">
> <TABLE border=1 width="100%" height="100%" cellspacing=5 cellpadding=5
> rules=box>
> <TR>
> <TD Colspan="5">
> <FONT FACE="arial","helvetica" SIZE="-1">
> For at finde de rigtige dæk/fælge skal du angive værdier i felterne
> nedenfor og trykke på knappen <B>'Send forespørgsel'</B></FONT></TD></TR>
> <TR><TD align="right" valign="top">
> <TT><FONT FACE="arial","helvetica" SIZE="-1">Mærke</font>: </TT>
> </TD>
> <TD align="left" valign="top">
>
> </TD>
> <TD align="left" valign="top">
> <INPUT NAME="maerke" VALUE="" SIZE="27" MAXLENGTH="254" VALUE="">
> </TD></TR>
> <TR><TD Colspan="3">
> <INPUT TYPE="SUBMIT" VALUE="Send forespørgsel">
> <INPUT TYPE="RESET" VALUE="Gendan standarder"></TD></TR>
>
>
> </TABLE>
> </FORM>
>
> formaction-siden ser sådan her ud:
>
> <%
>
> If request.Form("maerke") = "toyota" Then
> db = ("toyota.mdb")
>
> ElseIf request.Form("maerke") = "opel" Then
> db = "opel.mdb"
>
> ElseIf request.Form("maerke") = "mazda" Then
> db = "mazda.mdb"
> End If
>
> Set Conn = Server.Createobject("ADODB.Connection")
> '--- Database forbindelse ---
> strDSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " &_
> "DBQ=" & Server.Mappath("../log/" & Request("db") ) & "; password=xx"
> Conn.Open strDSN
> Set RS = Conn.Execute("SELECT TOP 1 * FROM UploadData ORDER BY ID DESC")
> %>
> <HTML>
> <HEAD>
> <TITLE>Meddelelsescenter</TITLE>
> <%
> Response.Write RS("Tekst2")
> RS.close
> Conn.Close
> Set RS = nothing
> Set Conn = nothing
> %>
> </BODY>
> </HTML>
>
> ...men jeg får forskellige fejl........hvad gør jeg galt.og kan det
> overhovedet lade sig gøre..????
> den skriver bla. "unknown file" - dvs at den sikkert ikke kan læse hvilken
> mdb.
> mvh.
> Ras.
>
>





Søg
Reklame
Statistik
Spørgsmål : 177557
Tips : 31968
Nyheder : 719565
Indlæg : 6408868
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste