| 发表于:2007-02-12 16:53:042楼 得分:0 |
全部贴出来怕大家没时间看,先贴个sub main()吧 sfilename = formatdatetime(now, 1) sfilename = app.path( "csv ") & "\ " & cstr(sfilename) & ".xls " set myobj = server.createobject( "projectexcel.classexcel ") myobj.stroutpath = sfilename myobj.aspexcel ( "select i_object from t_stock_trace_tr where i_game_cd= ' " & trim(request.querystring( "id ")) & " ' order by i_update_date desc ") set mo = nothing end sub | | |
|