Gaaf! komt er weer een nieuwe stillus layout ?
Btw: Als je met asp werkt en databases heb ik nog een tip voor die personen!
Gebruik niet gewoon recordset.open SQL,0,1 oid.
Maar gooi het door een functie heen.
Aangezien ASP geen or die() heeft net als php moet je die even zelf maken!
simpel voorbeeld:
Code:
dim total_queries
dim current_open_queries
dim total_db_time
public function open_query(sql_statement,recordset,cursortype,locktype,die_message)
dim no_error, cur_proc_time
'error handling for sql query
on error resume next
cur_proc_time = Timer()
'open the recordset!
with eval(recordset)
.open sql_statement, adoCon, cursortype, locktype
end with
'if sql error.
If Err.number <> 0 then
'err msg laten zien
end if
cur_proc_time = timer() - cur_proc_time
'set normal error handling
On Error Goto 0
'update globals
current_open_queries = current_open_queries + 1
total_queries = total_queries + 1
total_db_time = total_db_time + cur_proc_time
end function
public function execute_query(sql_statement,die_message)
'error handling for sql query
on error resume next
cur_proc_time = Timer()
'open the recordset!
adocon.execute(sql_statement)
'if sql error.
If Err.number <> 0 then
'laat err msg zien
end if
cur_proc_time = timer() - cur_proc_time
'set normal error handling
On Error Goto 0
'update globals
total_queries = total_queries + 1
total_db_time = total_db_time + cur_proc_time
end function
public function query_movenext(recordset)
'open the recordset!
with eval(recordset)
.movenext
end with
end function
public function close_query(recordset)
with eval(recordset)
.close
end with
'update globals
current_open_queries = current_open_queries - 1
end function