Avatar billede landsten Nybegynder
24. marts 2004 - 12:48 Der er 4 kommentarer

nogen der kan lave denne fil om

hejsa er der en der har forstand på sql for så må du godt lave denne fil om til den køre sql db jeg har en fil der hedder include database.asp

<%
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.CursorLocation = 3
Set Conn = Server.CreateObject("ADODB.Connection")
strDSN = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("database.mdb")
Conn.Open strDSN

rs.open "SELECT COUNT(*) as antal, bynavn FROM webmaster GROUP BY bynavn", Conn

rs.Sort="antal DESC"

For i = 1 to 10
  response.Write rs("bynavn") & " - " & rs("antal") & "<br />"
  rs.MoveNext
Next

rs.close
set rs=nothing
Conn.Close
set Conn=nothing
%>
Avatar billede skg Nybegynder
24. marts 2004 - 12:52 #1
kig evt. her : http://www.connectionstrings.com/

det er ikke meget du skal ændre
Avatar billede medions Nybegynder
24. marts 2004 - 13:16 #2
http://activedeveloper.dk/artikler/default.asp?articleid=14#mssql

Det vil sige din kode evt. kunne se således ud;

<%
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.CursorLocation = 3
Set Conn = Server.CreateObject("ADODB.Connection")
strDSN = "Provider=sqloledb; Data Source=ServerNavn; Initial Catalog=DatabaseNavn; User Id=Brugernavn; Password=Adgangskode;"
Conn.Open strDSN

rs.open "SELECT COUNT(*) as antal, bynavn FROM webmaster GROUP BY bynavn", Conn

rs.Sort="antal DESC"

For i = 1 to 10
  response.Write rs("bynavn") & " - " & rs("antal") & "<br />"
  rs.MoveNext
Next

rs.close
set rs=nothing
Conn.Close
set Conn=nothing
%>

Men nu ved jeg jo ikke om du benytter dig af ODBC eller OLEDB!?

//>Rune
Avatar billede landsten Nybegynder
24. marts 2004 - 14:42 #3
den kom med denne fejl

Fejltype:
Microsoft OLE DB Provider for SQL Server (0x80004005)
[DBNETLIB][ConnectionOpen (Connect()).]SQL Server findes ikke, eller adgang blev nægtet.
/online/bytop.asp, line 17
Avatar billede landsten Nybegynder
24. marts 2004 - 14:53 #4
hey nu har jeg lavet den her men nu viser den bare alle sammen men jeg vil have den til at vise hvem der er flest af og kun de 10 der er flest af


<!-- #include file='database.asp' -->
<%
set rs = server.createObject("adodb.connection")
rs.open "driver={MySql};server="& SQLserveradr &";database="& SQLdatabase &";uid="& SQLlogin &";pwd="& SQLpassword
sql = "select bynavn, post from webmaster order by id desc"
set rs = rs.execute(sql)

response.write "<table>"
while not rs.eof
response.write "<tr><td>" & rs.fields("bynavn") & "</td><td>" & rs.fields("post") & "</td></tr>"
rs.movenext
wend
%>
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