Välkommen till wF!!
Kolla på denna sida, där kan du läsa dig till hur du gör och vilka strängar du ska nadvända!
6 svar · 293 visningar · startad av COOBRAA
Har en tabell med följande kolumner:
matchid
hemmalag
bortalag
datum
tid
plan
Hur skulle man på ett enkelt sätt koda så att nästkommande match visas på mitt lags hemsida?
Välkommen till wF!!
Kolla på denna sida, där kan du läsa dig till hur du gör och vilka strängar du ska nadvända!
Vad använder du för databas?
Access.... men kanske ska be om råd för MySql, då mitt webhotell B-One nyttjar detta...
Eftersom att B-One endast kör localhost till mySql så får du administrera databasen i deras kontrollpanel.
Då borde det sen se ut ungefär så här:
Sub myDBget(mygetarr, calSql)
Dim calConn,calRS
Set calConn = Server.CreateObject("ADODB.Connection")
calConn.Open "DRIVER={MySQL ODBC 3.51 Driver};DATABASE=ditt_databasnamn;"&_
"UID=ditt_användarid;PWD=ditt_lösenord;SERVER=localhost;"
Set calRS = calConn.Execute(calSql)
If not calRS.EOF then mygetarr = calRS.getrows()
calRS.Close : Set calRS = Nothing
calConn.Close : Set calConn = Nothing
End Sub
call myDBget(arrUgRS,"select matchid, hemmalag, bortalag, datum, plan from din_tabell where datum > now() order by datum limit 0,1")
If isarray(arrUgRS) then
Dim z
for z=0 to ubound(arrUgRS,2)
Response.write arrUgRS(0,z) &" : "& arrUgRS(1,z) & "<br>"
next
Else
Response.write "Det finns inga matcher!"
End if
Skulle även lägga ihop datum och tid till en kolumn så att formatet blir: 2004-01-01 18:30:00
puuuhhh... detta är nog svårare än jag trodde...
ska se om jag kan använda din kod praktiskt. Tack för hjälpen.