Godkend en spillet kamp

jeg kan ikke komme med koden, men her er idéen bag;

1 lav din database med de felter du nu ønsker PLUS en ja/nej boks
2 lav indtastningsformularen hvor der indsættes i alle de nødvendige felter pånær ja/nej boksen som default skal være nej (false) - på udtrækssiden hiver du så alle felter ud hvor din ja/nej boks er = true
3 når B så skal godkende resultatet laver du bare en update der sætter din ja/nej boks = true

Det lyder da meget godt altsammen.....
Men det er fordi jeg ikkeer så god til at kode,
Databasen har jeg, jeg mangler nådet asp kode

www.html.dk - www.netcoders.dk - www.activeserverpages.dk

alle fine steder at lære lidt asp :)

Tak skal du ha, Det kunne jeg godt finde ud af selv

hvis du havde forventet at få udviklet systemet gratis af mig så tro om igen... dette er et forum for at få hjælp til ting - ikke få fulde løsninger

Så må jeg jo tro om igen....Tsk tsk

Det er skram ikke hele koder jeg søger, meeeen en guider til hvordan det muligt kunne se ud.....der fra kunne jeg oxo lære en ting eller 2,
Det var jo ikke for at fornærme dig på nogle måder. Men et barn starter heller ikke med at gå af sig selv....vel, der er jo som regl en der hjælper lidt til i starten.....

jamen - hvad er det så der er det præcise problem? en sql-sætning eller?

Jeg har en side hvor et medlem skriver en kamp ind, så ville jeg gerne have det sådan at jeg som admin skal godkende kampen før den bliver lagt op på siden

>>><>><><Min kode hvor man skriver Resultaterne ind>><>>>>>>


<% 'no security checking %>
<%
Response.expires = 0
Response.expiresabsolute = Now() - 1
Response.addHeader "pragma", "no-cache"
Response.addHeader "cache-control", "private"
Response.CacheControl = "no-cache"
%>
<!--#include file="db.asp"-->

<%
response.buffer = true

'get action
a=request.form("a")

'get fields from form

x_id = Request.Form("x_id")
x_Hjemmehold = Request.Form("x_Hjemmehold")
x_Resultat = Request.Form("x_Resultat")
x_Udehold = Request.Form("x_Udehold")
x_MOTM = Request.Form("x_MOTM")
x_Runde = Request.Form("x_Runde")
x_Dato = Request.Form("x_Dato")
x_Indsendtaf = Request.Form("x_Indsendtaf")
x_Indskrivet = Request.Form("x_Indskrivet")

' Open Connection to the database
set conn = Server.CreateObject("ADODB.Connection")
conn.Open xDb_Conn_Str

Select Case a
    Case "A": ' Add

        ' Open record
        strsql = "SELECT * FROM [Buffer_Resultater] WHERE 0 = 1"

        set rs = Server.CreateObject("ADODB.Recordset")
        rs.Open strsql, conn, 1, 2

        rs.AddNew

       
tmpFld = Trim(x_Hjemmehold)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Hjemmehold") = tmpFld
tmpFld = Trim(x_Resultat)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Resultat") = tmpFld
tmpFld = Trim(x_Udehold)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Udehold") = tmpFld
tmpFld = Trim(x_MOTM)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("MOTM") = tmpFld
tmpFld = Trim(x_Runde)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Runde") = tmpFld
tmpFld = x_Dato
If IsDate(tmpFld) Then
    rs("Dato") = cDate(tmpFld)
Else
    rs("Dato") = Null
End If
tmpFld = Trim(x_Indsendtaf)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Indsendtaf") = tmpFld
tmpFld = x_Indskrivet
If tmpFld = "Yes" Then
    rs("Indskrivet") = True
Else
    rs("Indskrivet") = False
End If

        rs.Update
        rs.Close
        Set rs = Nothing
        conn.Close
        Set conn = Nothing
        Response.Clear
        Response.Redirect "Buffer_Resultaterlist.asp"
End Select
%>


<script language="JavaScript" src="ew.js"></script>
<script language="JavaScript">
<!-- start Javascript
function  EW_checkMyForm(EW_this) {
if  (!EW_hasValue(EW_this.x_Runde, "TEXT" )) {
            if  (!EW_onError(EW_this, EW_this.x_Runde, "TEXT", "Please enter required field - Runde"))
                return false;
        }
if  (!EW_checkdate(EW_this.x_Dato.value)) {
        if  (!EW_onError(EW_this, EW_this.x_Dato, "TEXT", "Incorrect date (yyyy/mm/dd) - Dato"))
            return false;
        }
return true;
}
// end JavaScript -->

så lav det ekstra felt i databasen som jeg tidligere skrev - kald det fx "godkendt" og lad det være et "ja/nej" fejlt.

På siden hvor du trækker resultaterne ud skal det være med følgende forbehold; "WHERE godkendt = true"

Så kan du enten direkte i databasen sætte kryds i ja/nej feltet eller køre en update når et resultat skal godkendes; "UPDATE xxx SET godkendt = true WHERE id = " & dit_id & "

fint nok at du afviser hvis du ikke kan bruge det - men så kom lidt mere specifikt med hvor det så går galt...

Daw Daw...
Jeg har en side hvor der er en der vil det samme som dig..
http://asp.dk/forum.asp?mode=show_message&tech_id=1&forum_id=3&message_id=61546
Det burde være noget i den stil ?

/Mjall0w-

<%
'Hvis et link godkendes:
If Not Request.QueryString("link") = "" Then
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN
Conn.Execute("update links set godkendt = 'ok' WHERE LinkName = '" & Request("link") & "'")
Response.Redirect("godkend.asp?godkendt=ok")
end if
%>
<%
'Hvis et link afvises
If Not Request.QueryString("afvis") = "" Then
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN
Conn.Execute("DELETE FROM links WHERE LinkName = '" & Request.QueryString("afvis") & "'")
Response.Redirect("godkend.asp?afvist=ok")
end if
%>

<%
'Herunder udskriver den alle links hvor godkendt = nej
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("database.mdb")
strSQL = "SELECT * FROM links WHERE godkendt = 'nej'"
Set rs = myConn.Execute(strSQL)
%>
<% Do until rs.eof %>
<a href="godkend.asp?link=<%=rs("linkname")%>">Ok</a>
<a href="godkend.asp?afvis=<%=rs("linkname")%>">Afvis</a>
<%
rs.movenext
loop
rs.close
set rs = nothing
%>


/Mjall0w-

godkend.asp ??? er det sådan at du har lige kode til denne

Jeg har en db hvor der er 4 tabler i
1: Hjemmehold
2: Resultat
3: Udehold
4: Godkendt

Det skal være sådan at man skal kunne se sin spillet kampe når man logger ind

Hmmm...
Nej det har jeg ikke lige, men du skal vel bare sortere efter ID. Dvs, hvis ham der nu logger ind kan han kun se kampe hvor at hans klan er med i, og det er kun dem som ikke er accepteret der ska skrives ud.. Også hvis han ikke accepterer ska den vel bare slette Kolonnerne ?

/Mjall0w-

Jeg lukker dette spørsmål,

mjall0w få 50 point

Tak, håber du kunne bruge det...

/Mjall0w-