const dim_11_len=50
const dim_12_len=50
class class_joekoe_cms
public web_name,web_url,web_email,web_urls,web_dir,web_cookies,web_skin,web_dir_skin,web_upload,web_unit,web_health,web_tit,now_time,today_time,timer_start,pro_edition,num_rs,connstr
public js_tim,js_mod,isconn,ishealth
function exec(esql,etype)
if isconn=false then call conn_open()
'response.write vbcrlf&"//
"&esql
select case etype
case 0
conn.execute(esql)
case 1
set exec=conn.execute(esql)
end select
num_rs=num_rs+1
end function
sub conn_open()
set conn=server.createobject("adodb.connection")
set rs=server.createobject("adodb.recordset")
conn.open connstr
isconn=true
end sub
|