Log In
Home
April 19, 2001
Offline
TJa!
Jag har ett litet problem som är högst störande....
jag har en admin-hörna på min hemsida där man b la kan lägga till nyheter på förstasida....
Jag har gjort så att man skriver nyheten till en textfil, sedan hämtar jag allt innehåll i som finns i den textfilem med en
"do until a.AtEndOfLine" så att de visas på hemsidan..
Nu till problemet:
-------
När nyheterna läggs i txt filen så läggs dom ju efter varandra...sen hämtar man ju upp dom så till förstasida....självklart kommer då den äldsta nyhetet först!!!!
Jag vill ha så att loopen går från "marken" till toppen om ni förstår???
HJÄLP MIG!!!!
June 1, 2001
Offline
Använd en databas istället.
April 19, 2001
Offline
Har inte mySQL....och i access får jag det inta att funka så att man kan ha rad-brytning osv.....utan det blir bara en rad med text!!!
February 7, 2001
Offline
Du kan ladda hem MySQL på http://www.mysql.com om du inte har det...
I annat fall kan du prova att göra en ny fil per nyhet.
June 1, 2001
Offline
Nu tror ju inte jag han har en egen server och kan installera MySQL på den, men jag kan ju ha fel.
Varför skulle det inte gå med radbrytningar ? Kör en Replace( text , vbcrlf, "
" ) innan du sparar texten eller kör med
text
eller
[ Detta Inlägg ändrades av: Nibbler den 2001-08-09 00:42 ]
April 19, 2001
Offline
kan inte det där med replace i ASP.....
kan nån skriva?
April 9, 2001
Offline
Men lägg till nyheten först i textfilen då genom att läsa in hela textfilen till en variabel, sedan lägga till den nya nyheten först (nyanyheter = nyhet & gammalnyhet) och sedan skriva tillbaka hela strängen till fil (obs, skriva över, ej appenda)
December 19, 2000
Offline
jag har en sån funktion i min gästbok som jag har skrivit 
http://www.jonas.pp.se
June 1, 2001
Offline
Varför krångla med sådant när det är så oerhört enkelt att använda en databas ?`
Strula med textfiler och läsa fram och tillbaka är ju urdumt och dessutom krångligare och ineffektivt.
August 14, 2001
Offline
öppna textfilen med variabeln read
Do Until read.AtEndOfLine
read.readline
linecounter = linecounter +1
loop
read.close
öppna textfilen igen med read
For forloop = 1 to 10 '10 senaste raderna läses in
for temploop = 1 to linecounter
nyhetsvar= read.readline
next
response.write(nyhetsvar)
linecounter = linecounter - 1
next
nåt i den stilen kanske?
1 Guest(s)
