Avatar billede gr8m8 Novice
26. marts 2003 - 12:35 Der er 15 kommentarer og
1 løsning

ENTER tryk = linjeskift

Der skulle ikke være en venlig sjæl derude der kunne gi mig koden til at når der bliver trykket ENTER i en txtboks skrives der automatisk et <BR> så man ikke skal sidde og skrive dem selv når man skal poste en Nyhed fks.

På forhånd tak !
Avatar billede ellebaek Nybegynder
26. marts 2003 - 12:37 #1
Function fncTextChange(strText)
            strTekst = Trim(strText)
                        fncTextChange = Replace(fncTextChange,vbCrLf,"<BR>")
                    End Function

Så ændre du det ved at skrive følgende:
indhold = fncTextChange(request.form("oplysningerne"))

indhold indeholder nu din tekst med <br>
Avatar billede ellebaek Nybegynder
26. marts 2003 - 12:38 #2
altså du kalder den funktion når inden du sætter nyheden ind i databasen...
Avatar billede gr8m8 Novice
26. marts 2003 - 12:40 #3
wow nice og hurtigt svar der :)
Der er lige en ting jeg ik er helt med på og det er hvor jeg skal smide
den funktion ind henne ?
Jeg har en fil med selve Nyheds formularen på og så en side som sætter
nyheden ind osv.

Håber du forstår mig, jeg er ikke så vild til det her endnu, men det kommer :)
Avatar billede ellebaek Nybegynder
26. marts 2003 - 12:42 #4
du skal smide den ind i toppen på den side der indsætter nyheden,
så skriver du linien: indhold = fncTextChange(request.form("oplysningerne"))
Og her skriver du selvfølgelig navnet på dit eget felt i stedet for oplysningerne.

Så indsætter du bare indhold i databasen i stedet for værdien af feltet...
Avatar billede gr8m8 Novice
26. marts 2003 - 12:49 #5
skal der ASP klammer ( <% %> ) rundt om den der function ?

Jeg fatter det ik lige desværre :o/
Avatar billede ellebaek Nybegynder
26. marts 2003 - 12:50 #6
ja det skal der...

Den skal ind i dit asp-tag bare ind i det samme som du har din insert-sql
Avatar billede gr8m8 Novice
26. marts 2003 - 12:51 #7
Jeg poster lige min Spaghetttikode så du lige kan se :D

<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("matches.mdb")
Conn.Open DSN

' SQL sætning opbygges
strSQL = "INSERT INTO matches (opponent, event, us, them, country, warreport, lineup_us, lineup_them) VALUES('"& Request.Form("opponent") &"','"& Request.Form("event") &"','"& Request.Form("us") &"','"& Request.Form("them") &"','"& Request.Form("country") &"','"& Request.Form("warreport") &"','"& Request.Form("lineup_us") &"','"& Request.Form("lineup_them") &"')"

Function fncTextChange(strText)
            strTekst = Trim(strText)
            fncTextChange = Replace(fncTextChange,vbCrLf,"<BR>")
End Function

indhold = fncTextChange(request.form("warreport"))

' SQL sætning eksekveres
Conn.Execute(strSQL)

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
Avatar billede gr8m8 Novice
26. marts 2003 - 13:06 #8
hmm... sys jeg har prøvet en masse forskellige ting nu, men jeg kan ik lige få det til at fungere desværre... øv bøv !
Avatar billede ellebaek Nybegynder
26. marts 2003 - 13:12 #9
<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("matches.mdb")
Conn.Open DSN

Function fncTextChange(strText)
            strTekst = Trim(strText)
            fncTextChange = Replace(fncTextChange,vbCrLf,"<BR>")
End Function

indhold = fncTextChange(request.form("warreport"))


' SQL sætning opbygges
strSQL = "INSERT INTO matches (opponent, event, us, them, country, warreport, lineup_us, lineup_them) VALUES('"& Request.Form("opponent") &"','"& Request.Form("event") &"','"& Request.Form("us") &"','"& Request.Form("them") &"','"& Request.Form("country") &"','"& indhold &"','"& Request.Form("lineup_us") &"','"& Request.Form("lineup_them") &"')"


' SQL sætning eksekveres
Conn.Execute(strSQL)

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
Avatar billede ellebaek Nybegynder
26. marts 2003 - 13:23 #10
den opdatere først entertryk efter teksten er smidt ind i databasen, men den er ændret når du henter teksten ud igen...

Det skulle virke sådan som det står nu...
Avatar billede gr8m8 Novice
26. marts 2003 - 13:28 #11
Tusind tak igen Ellebaek, du lidt for sej :)

/waves
Avatar billede gr8m8 Novice
26. marts 2003 - 13:38 #12
hmm... jeg kan ik lige få resultatet frem, nu er min warreport helt tom når jeg tilføjer noget !
Avatar billede ellebaek Nybegynder
26. marts 2003 - 13:39 #13
Hvad mener du ??

Kan du ikke indsætte ting i din database ??
Avatar billede gr8m8 Novice
26. marts 2003 - 13:59 #14
nej der kommer ikke noget inde i database feltet Warreport nu
Avatar billede ellebaek Nybegynder
26. marts 2003 - 14:00 #15
hmmn...

Kan du ikke sende filerne til min email ??
Så kan jeg lige fikse det..
jens@mail.zix.dk
Avatar billede gr8m8 Novice
26. marts 2003 - 14:04 #16
jow seføli, tusind tak ! 2 secs
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