82 messaggi dal 04 ottobre 2007
Salve a tutti vorrei il vostro aiuto per capire se faccio la cosa giusta o meno e cioè vorrei migliorare le prestazioni del mio sito e passare ad un db misgliore per cui avevo pensato di passare a MySql.

Prima di tutto è la scelta giusta secondo voi?

Inoltre sto facendo le pirme prove, si fanno cos' le query?

Ad inizio pagina file di inclusione con il seguente codice:
<%
'Evito la memorizzazione in cache/proxy della pagina
response.Expires = -1500
response.AddHeader "PRAGMA", "NO-CACHE"
response.AddHeader "CACHE-CONTROL", "PRIVATE"
response.CacheControl = "PRIVATE"

' MySQL Version
DB_CONNECTIONSTRING = "Data Source=localhost; Database=ecommerce; User ID=root; Password=pass;"
%>


e poi nella pagina ad esempio continuo con queste 3 query:

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open DB_CONNECTIONSTRING
SQLnews2 = "SELECT * FROM prodotti WHERE Data Between (NOW()- interval 21 day) AND (NOW()- interval 8 day)"
RSnews2 = Server.CreateObject("ADODB.Recordset")
set RSnews2 = conn.execute(SQLnews2)
If Not RSnews2.EOF Then
RSnews2.MoveFirst
Do While Not RSnews2.EOF
%>

Poi all&#8217;interno di questa e prima di chiuderla ne faccio un&#8217;altra &#8230;

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open DB_CONNECTIONSTRING
SQLclick2 = "SELECT * FROM click WHERE url = "& FixSQL(RSnews2("ID"))
Set RSclick2 = Conn.Execute(SQLclick2)
If Not RSclick2.EOF Then
clicks = RSclick2("clicks")
Response.write clicks
Else
Response.write 0
End if
RSclick2.close
%>

Ne faccio ancora un&#8217;altra&#8230;

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open DB_CONNECTIONSTRING
SQLPiace2 = "SELECT * FROM PiaceUser WHERE url = "& FixSQL(RSnews2("ID"))
Set RSPiace2 = Conn.Execute(SQLPiace2)
If Not RSPiace2.EOF Then
PiaceUser2 = RSPiace2("PiaceUsers")
Response.write PiaceUser2
Else
Response.write 0
End if
RSPiace2.close
%>

E poi chiudo la prima &#8230;

<%
RSnews2.MoveNext
Loop
Else
END IF
RSnews2.Close
%>


il codice funziona ma prima di andare a vanti vorrei sapere da voi per cortesia se sto facendo bene oppure sbaglio in qualche cosa... grazie mille in anticipo
82 messaggi dal 04 ottobre 2007
scusate forse ho le idee un po piu chiare... va bene così?

inizio pagina:

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open DB_CONNECTIONSTRING
%>


poi faccio una delle tante select...

<%
SQLnews2 = "SELECT * FROM prodotti WHERE ........."
RSnews2 = Server.CreateObject("ADODB.Recordset")
set RSnews2 = conn.execute(SQLnews2)
If Not RSnews2.EOF Then
RSnews2.MoveFirst
Do While Not RSnews2.EOF
%>

faccio le mie cose e poi chiudo questa...

<%
RSnews2.Close
Set RSnews2=nothing
%>

ed a fine pagina...

<%
conn.close
Set conn=nothing
%>

è tutto giusto?
grazie in anticipo

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.