|
代码如下,目的是想将数据库中sys_template表中的数据导到excel中
db_connect("database","DSN=lees;UID=ss;PWD=ss");
db_execute_query("database","select * from sys_template",recordnum);
db_get_headers("database",colume,headers);
split(headers,headerarray,"\t");
table="fromdb.xls";
ddt_open(table,DDT_MODE_READWRITE);
cur=ddt_set_row(table,1);
for(i=0;i<recordnum;i++)
{
db_get_row("database",i,rowcont);
split(rowcont,rowarray,"\t");
ddt_get_current_row(table,rowid);
pause(rowid);####光标当前所在行
for(j=0;j<colume;j++)
{
ddt_set_val(table,headerarray[j+1],rowarray[j+1]);
}
cur=ddt_next_row(table);##下移一行
#cur=cur+1;###另外一种我认为可以下移一行的方法,也没成功
#r=ddt_set_row(table,cur);
}
ddt_save(table);
ddt_close(table);
不知道为什么,光标一直在表的第一行,请大家指出我错在哪了,谢谢! |
|