32 svar · 628 visningar · startad av Rodan
hej
har några frågor....
1. hur gör man så att istället för hel tal.... så kan man lägga till +0.01 i status ?
2. hur gör man så att man får bara en gång status för en inlogning per dag
3. hur räknar man i hop samman antalet poäng ?
4. namnförslag på poängen... alla heter ju status och poäng vill ha nåt nytt....
det är mina frågor... skulle va jätte tacksam om nån ville hjälpa till...
jag kan bara ge förslag på 4an för jag orkar inte tänka nu.
Respekt?
förslag på 4an: Points
1. Är det en databas ? då använder du REAL fältet vad jag vet, eller decimal kommer inte ihåg vad det heter.
2. Jämföra datumen och kolla om det är samma dag som sist man loggade in.
3. intTotalPoints = intPoints1+intPoints2
4. Respekt Poäng (från det ultimata flash spelet mujjafa-spelet)
respekt används redan av en sida https://www.soffta.com
Soffta Nere!
Soffta är stängt tills vidare...
Anledningen är att vi byter server..
Så kom tillbaks om några dagar eller så../ Soffta-crewn
Strunt i det Respekt poäng rockar fett ta det....
Eller
Fet Poäng.. ;)
Re: har några viktiga frågor...
Rodan skrev:
alla heter ju status och poäng vill ha nåt nytt....
Rodan skrev:
respekt används redan av en sida https://www.soffta.com
hur ska du ha det?
Du menar att poängen skall kunna uppdateras med hjälp av uppdatera status som ungefär lunarstorm så borde det fungera ngt såhär.
Databas fält:
Tabellnamn: Points
Points_Id
Points_UsrId (Användarens id i databasen)
Points_Gst (från gästboken)
Points_mail (från mail)
Points_login (från login)
Points_total (totalt)
Points_update (senast uppdaterad skall bara kunna bli det en gång per dygn.)
Sida 1.
strSQL = "Select Points_update From points Where Points_UsrId = "Session("UsrId")""
Set Rs = Conn.Execute(strSQL)
If Not Rs.Eof Then
If DatePart(dd,Now()) = Datepart(dd,Rs("Points_Update")) Then
Response.Write "Du har redan uppdaterat idag"
Else
Response.Write "<a href=update_points.asp>Uppdatera poäng</A>"
End If
Else
Response.Write "Din session har avslutats eller så har den aldrig skapats"
End if
Sida 2.
strSQL = "Select * From points Where Points_UsrId = "Session("UsrId")""
Set Rs = Conn.Execute(strSQL)
If Not Rs.Eof Then
If DatePart(dd,Now()) = Datepart(dd,Rs("Points_Update")) Then
Response.Redirect "sida1.asp"
Else
intTotal = Rs("points_gst")+Rs("points_mail")+Rs("points_login")
strSQL = "Update Points Set points_total = points_total+"&intTotal&" where session("UsrId")"
Set Rs_Update = Conn.Execute(strSQL)
Response.Redirect "Uppdaterad.asp"
End If
Else
Response.Write "Din session har avslutats eller så har den aldrig skapats"
End if
Har ej testat men det borde fungera!
när jag ska lägga till poäng så tror jag inte att det blir
recet (point)+1
hur ser koden ut för det ?
och en fråga till jag kommer lägga till tabbelen i en samma databas... måste jag koppla två gånger samma databas ? men ändra tabbelen... ? och hur visar jag hur myckket man tjänat ?
vad ska sida 1 heta ? och sida 2 ?
visa hur mkt du tjänat är ju bara att loopa ut från databasen ? ngt har du väl lärt dig?
sida 1 koden.... kan jag lägga den vart som helt på sidan ?
lägg den var du vill.... du måste först iallfall gjort en databas koppling som heter conn
Set Con = Server.CreateObject("ADODB.Connection")
Con.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("messages.mdb")&";"
Set conn = Server.CreateObject("ADODB.Recordset")
Hmmm...
Varför använda Driver när man kan använda Provider?
Set Conn = Server.CreateObject( "Adodb.Connection" )
Conn.Provider = "Microsoft.Jet.OLEDB.4.0"
MdbFilePath = Server.MapPath( "messages.mdb" )
Conn.ConnectionString = "Data Source='" & MdbFilePath & "'"
Conn.open
en sån databas koppling har jag aldrig sett förut... föresten grattis på födelsedagen