Avatar billede asp4u Nybegynder
24. december 2001 - 22:20 Der er 33 kommentarer og
1 løsning

Privat ?

Hej

Jeg har lavet det hele, udfra at lad KUN den person som man sender til læse beskeden...og det er det jeg vil ha hjælp med...

Dvs. Skrive privat... her er min kode:

strSQL = \"Select * From beskederne Order by Dato Desc\"

Set rs = Conn.Execute(strSQL)

    If RS.eof then
    Response.Write(\"Ingen har skrevet nogen beskeder indtil nu !\")
    else
    do while not RS.eof
    If Rs(\"Til\") = \"Alle\" Then 
    Response.Write(\"<span class=\'Alle\'>\"& rs(\"Fra\") & \" : \" & rs(\"Besked\") & \"<br>\")
    Elseif Rs(\"Til\") = \"Chatten\" Then 
    Response.Write(\"<span class=\'Chatten\'>\"& rs(\"Fra\") & \" : \" & rs(\"Besked\") & \" \" & rs(\"Dato\") & \"<br>\")
    Elseif
    \' Her tror jeg koden skal være som tjekker hvem personen har skrevet til, men jeg har ingen anelse om hvad der kan stå
    Response.Write(\"<span class=\'Privat\'>\"& rs(\"Fra\") & \" (Til \" & rs(\"Til\") & \"): \" & rs(\"Besked\") & \"<br>\")
    End If
    RS.movenext
    loop   
    End If

På forhånd tak for hjælpen !
Avatar billede virus Nybegynder
24. december 2001 - 22:38 #1
Gemmer du detsom bliver skrevet i en database?
Avatar billede asp4u Nybegynder
24. december 2001 - 22:40 #2
ja..
Avatar billede virus Nybegynder
24. december 2001 - 22:42 #3
det skal nok få dit webhotel til at kokse :)
Avatar billede asp4u Nybegynder
24. december 2001 - 22:42 #4
Tabelen hedder: Funktioner
Felterner Hedder: Fra, Til, Besked, Dato

Fra = Selve Person
Til = Hvem han har skrevet beskeden til
Besked = Selve Beskeden som personen har skrevet
Dato = er det bare noget jeg måske skal bruge senere !
Avatar billede virus Nybegynder
24. december 2001 - 22:42 #5
Skal jeg komme med et eksempel på den måde jeg ville lave det, eller skrive dit vidre?
Avatar billede asp4u Nybegynder
24. december 2001 - 22:46 #6
skrive mit videre....tak :)

kokse...skal jeg så indsætte det til txt file ?
Avatar billede virus Nybegynder
24. december 2001 - 22:48 #7
nej du skal køre det som variabler istedet :)men jeg leger med dit skal lige se en film færdig
Avatar billede asp4u Nybegynder
24. december 2001 - 22:53 #8
ok venter :)
Avatar billede asp4u Nybegynder
24. december 2001 - 22:53 #9
ja, men jeg bliver nødt til at gemme alt i en log file...så jeg har bare valgt database: )
Avatar billede virus Nybegynder
24. december 2001 - 23:03 #10
ok så er jeg klar
Avatar billede asp4u Nybegynder
24. december 2001 - 23:05 #11
indsæt dit script så kan jeg kigge på det mens du laver det andet :)
Avatar billede virus Nybegynder
24. december 2001 - 23:07 #12
Jeg har ikke et andet script, har ikke noget at bruge en chat til, men kunne lige strikke et simpelt et sammen, men det gider vi ikke nu hvis DU SKAL logge det som forgår på chatten, husk at oplyse folk om dette ellers er det ulovligt :)

2 min
Avatar billede asp4u Nybegynder
24. december 2001 - 23:09 #13
skal jeg oplyse folk at jeg gemme alt i der bliver skrevet i en log file ?
Avatar billede virus Nybegynder
24. december 2001 - 23:09 #14
prøv
<%
strSQL = \"Select * From beskederne Order by Dato Desc\"

Set RS = Conn.Execute(strSQL)

    If RS.EOF Then
        Response.Write(\"Ingen har skrevet nogen beskeder indtil nu !\")
    Else
   
    Do While NOT RS.EOF
    If RS(\"Til\") = \"Alle\" Then 
   
        Response.Write(\"<span class=\'Alle\'>\"& RS(\"Fra\") & \" : \" & RS(\"Besked\") & \"<br>\")
   
    Elseif RS(\"Til\") = \"Chatten\" Then
   
        Response.Write(\"<span class=\'Chatten\'>\"& RS(\"Fra\") & \" : \" & RS(\"Besked\") & \" \" & RS(\"Dato\") & \"<br>\")
   
    Elseif
   
        If RS(\"til\") = Session(\"brugernavn\") Then
          Response.Write(\"<span class=\'Privat\'>\"& RS(\"Fra\") & \" (Til \" & RS(\"Til\") & \"): \" & RS(\"Besked\") & \"<br>\")
    End If
   
        RS.MoveNext
    Loop   
    End If
    %>
Avatar billede virus Nybegynder
24. december 2001 - 23:10 #15
Ja det skal du, du skal skrive at \"folk acceptere du logger deres samtaler ved at bruge din chat\"
Avatar billede virus Nybegynder
24. december 2001 - 23:11 #16
saaaaadan
<%
strSQL = \"Select * From beskederne Order by Dato Desc\"

Set RS = Conn.Execute(strSQL)

    If RS.EOF Then
        Response.Write(\"Ingen har skrevet nogen beskeder indtil nu !\")
    Else
   
    Do While NOT RS.EOF
    If RS(\"Til\") = \"Alle\" Then 
   
        Response.Write(\"<span class=\'Alle\'>\"& RS(\"Fra\") & \" : \" & RS(\"Besked\") & \"<br>\")
   
    Elseif RS(\"Til\") = \"Chatten\" Then
   
        Response.Write(\"<span class=\'Chatten\'>\"& RS(\"Fra\") & \" : \" & RS(\"Besked\") & \" \" & RS(\"Dato\") & \"<br>\")
   
    Elseif
   
        If RS(\"til\") = Session(\"brugernavn\") Then
          Response.Write(\"<span class=\'Privat\'>\"& RS(\"Fra\") & \" (Til \" & RS(\"Til\") & \"): \" & RS(\"Besked\") & \"<br>\")
        End If
    End If
   
        RS.MoveNext
    Loop   
    End If
    %>
Avatar billede virus Nybegynder
24. december 2001 - 23:11 #17
fark om igen :)
Avatar billede virus Nybegynder
24. december 2001 - 23:12 #18
saaaaaaaaaaaaaa for satan virus

<%
strSQL = \"Select * From beskederne Order by Dato Desc\"

Set RS = Conn.Execute(strSQL)

    If RS.EOF Then
        Response.Write(\"Ingen har skrevet nogen beskeder indtil nu !\")
    Else
   
    Do While NOT RS.EOF
    If RS(\"Til\") = \"Alle\" Then 
   
        Response.Write(\"<span class=\'Alle\'>\"& RS(\"Fra\") & \" : \" & RS(\"Besked\") & \"<br>\")
   
    Elseif RS(\"Til\") = \"Chatten\" Then
   
        Response.Write(\"<span class=\'Chatten\'>\"& RS(\"Fra\") & \" : \" & RS(\"Besked\") & \" \" & RS(\"Dato\") & \"<br>\")
   
    Elseif RS(\"til\") = Session(\"brugernavn\") Then
          Response.Write(\"<span class=\'Privat\'>\"& RS(\"Fra\") & \" (Til \" & RS(\"Til\") & \"): \" & RS(\"Besked\") & \"<br>\")
    End If
   
        RS.MoveNext
    Loop   
    End If
    %>
Avatar billede asp4u Nybegynder
24. december 2001 - 23:20 #19
DAMN...nu vil det andet ik virke *grrrrrrrrrrr**
Avatar billede virus Nybegynder
24. december 2001 - 23:23 #20
<%
strSQL = \"Select * From beskederne Order by Dato Desc\"

Set RS = Conn.Execute(strSQL)

    If RS.EOF Then
        Response.Write(\"Ingen har skrevet nogen beskeder indtil nu !\")
    Else
   
    Do While NOT RS.EOF
    If RS(\"Til\") = \"Alle\" Then 
   
        Response.Write(\"<span class=\'Alle\'>\"& RS(\"Fra\") & \" : \" & RS(\"Besked\") & \"<br>\")
   
    Elseif RS(\"Til\") = \"Chatten\" Then
   
        Response.Write(\"<span class=\'Chatten\'>\"& RS(\"Fra\") & \" : \" & RS(\"Besked\") & \" \" & RS(\"Dato\") & \"<br>\")
   
    Else RS(\"til\") = Session(\"brugernavn\") Then
          Response.Write(\"<span class=\'Privat\'>\"& RS(\"Fra\") & \" (Til \" & RS(\"Til\") & \"): \" & RS(\"Besked\") & \"<br>\")
    End If
   
        RS.MoveNext
    Loop   
    End If
    %>


???
Avatar billede asp4u Nybegynder
24. december 2001 - 23:24 #21
jeg får ik de beskeder som man sender til andet end \"Alle\" eller \"Chatten\"
Avatar billede virus Nybegynder
24. december 2001 - 23:25 #22
hmmmmm shit det er sent
brbr tænke baren
Avatar billede asp4u Nybegynder
24. december 2001 - 23:26 #23
jeg gemmer ik hvem han skal skrive til i session, det er kun min eget navn ?
Avatar billede virus Nybegynder
24. december 2001 - 23:27 #24
ja :)
Avatar billede virus Nybegynder
24. december 2001 - 23:27 #25
og? ej...ja det er jeg klar over
Avatar billede asp4u Nybegynder
24. december 2001 - 23:29 #26
nu virker den !
Avatar billede asp4u Nybegynder
24. december 2001 - 23:29 #27
mon det er kun selve personen der modtager beskeden ?
Avatar billede asp4u Nybegynder
24. december 2001 - 23:30 #28
nope...jeg har lige logget ind i andet brugernavn og jeg kan stadigvæk se de beskeder som blev skrevet ?
Avatar billede virus Nybegynder
24. december 2001 - 23:46 #29
Ja derfor køre jeg denne rutine

if rs(\"til\") = session(\"brugernavn\") then
response.write

på den måde er du sikker på at hvis rs(\"til\") er det samme som session(\"brugernavn\") bliver det udskrevet på den computer som session(\"brugernavn\") sidder på

skal lige til tanken er tilbage om 30 min
Avatar billede virus Nybegynder
24. december 2001 - 23:48 #30
husk at lave en session.abandon du kan sagtens ha flere sessions åbne på samme comp derfor ser du det stadigvæk, men jeg skal nok klare det, skal bare ha mere cola :) 30 min
Avatar billede asp4u Nybegynder
25. december 2001 - 10:18 #31
ok venter :)
Avatar billede asp4u Nybegynder
25. december 2001 - 10:23 #32
Jeg vil også ha at selve personen også modtager beskeden :)

ElseIf RS(\"Til\") = Session(\"Brugernavn\") And Rs(\"Fra\") = Session(\"Brugernavn\") Then1
Avatar billede asp4u Nybegynder
25. december 2001 - 11:53 #33
har fået den til at virke...tak for ideen ;)
Avatar billede virus Nybegynder
25. december 2001 - 15:41 #34
hehe velbekommen
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