Database søgning mellem ASP & PHP.

Du kan bruge timer() funktionen

start = timer()
..Kode
slut = timer()
afviklingstid = slut - start

Jo tak, men roder ikke med asp. Kan du komme med et helt eksempel ?

Et eks på hvad? Det er bare at smide den kode man vil teste hastigheden på ind i mellem start og slut:

start = timer()
for f=1 to 1000000
  'en lille løkke
next
slut = timer()
afviklingstid = slut - start
response.write "Tid: "& afviklingstid

Og det er ikke nødvendigvis nr 1 der er hurtigst. Langtfra faktisk. Der er tusind ting, som spiller ind i det regnestykke.

1: Kører du en eller 2 server (en web og en database server)
2: Processortype/hastighed
3: Harddiskhastighed
4: Ram
5: Kode opbygning
6: Database optimering
7: Datamængde
8: Dataudtræks typer. Store/små mængder, enkelt/indviklet selects
osv.

Jeg har set eks på at en Access var hurtigere end både MySQL og MS-SQL, ved små datamægder, men den taber altid når den vokser sig stor (+20MB).

Det var interresant.. Det skal jeg rode med men mængden så.

Men skal have en kode i asp. Så den virker, bare så den er klar til upload og skal køres.

På forhånd tak

Det vil selvfølgelig være den samme server,database og samme udtræk.

En hurtig ASP kode til et database opslag:

strDB = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("\database.mdb;")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open strDB
set rs = conn.execute("select * from enTabel")
while not rs.eof
  response.write rs("kolonne")
  rs.MoveNext
wend

Og angående serverne, så får du selvfølgelig et resultat, som fortæller, hvad der er hurtigst. Men hele min bemærkning ved serverne er, at skifter du f.eks bare harddisken ud på serveren, så kan du få et andet resultat.

Det resultat du får på den given server, med de given selecte, vil altså ikke gælde for en anden server. Du kan derfor kun sig, at dit resultat gør sig gældende, med den opsætning din server nu har.

Dejligt eksempel..

Kan du lave et med MYSQL også ?

På forhånd tak.

Det kan jeg :-)

<%
Set objConn = Server.CreateObject("ADODB.Connection")
ConnDSN = "Driver={MySQL ODBC 3.51 Driver}; Server=localhost; Database=dindatabase; UID=ditUsername; PWD=ditPassword;"
ObjConn.Open ConnDSN

SQL = "SELECT * FROM dinTabel "
Set rs = ObjConn.Execute(SQL)

Do While not rs.eof Then
  Response.Write rs("dinKolonne")
  rs.MoveNext
Loop
%>

Som du kan se er det bare at ændre connections-string, til en anden database, også kører det. Du kan finde connections-strings til næsten alle database/udgaver her:
http://www.connectionstrings.com/

takker mange gange.