<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />你好，
我有一个生存分析脚本，可以产生（1）失败图，（2）两个比较组的组间总结和测试。 我试图将这些导出到日记并保存为 MSword，但什么也没发生。 甚至文件“JournalTest.doc”也没有出现在文件夹中。 你能帮我修改我的代码吗？ 我附上了我的数据表和显示我想要的测试日志。 尽可能缩短我的代码。
// 获取数据库中的所有行
dbq_string = "DBQ=E:\Now\(Project) RFID_r3_Homing_r1\Ben analysis\Chang_bee_db.mdb;" ||
“DefaultDir=E:\Now\(Project) RFID_r3_Homing_r1\Ben 分析；” ||
“驱动程序={Microsoft Access 驱动程序 (*.mdb)};DriverId=25;FIL=MS Access;” ||
"FILEDSN=C:\Program Files\Common Files\ODBC\Data Sources\chang_bee_db.dsn;" ||
"MaxBufferSize=2048;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;";
dt1=打开数据库（dbq_string，“SELECT * FROM qryAFF14”，“qryAFF14”，不可见）；
// 在一个故障图中获得 3 组曲线
dt=数据表（“qryAFF14”，不可见）； /*invisible: 关闭数据表窗口*/
dt<<生存（
Y(:AFF14),
分组（：治疗），
故障图（1），
生存图（0），
其中（：治疗==“丙酮5μl”|：治疗==“无”|：治疗==“甲氧普林5μll（40μg/μl）”），
发送到报告（
派遣（
{"失败图"},
“失败”，
文本编辑框，
{Set Text("首航率")}
),
派遣（
{"失败图"},
“AFF14”，
文本编辑框，
{设置文本（“年龄（天）”）}
)
)
);
// 将失败图输出到日志中。如何修改带下划线的部分以导出绘图？
dt<<日志（全部冻结）；
dt<<关闭窗口；
当前日志（）<<最小化窗口；
分页框（） << 日记；
dts = dt <<摘要（组（：治疗），N，平均值（：AFF14），标准错误，输出表名（“qryAFF14_out”））；
dts << 日记（全部冻结）；
dts <<关闭窗口；
Current Journal() << save HTML("E:\Now\(Project) RFID_r3_Homing_r1\Ben analysis\JMP\JournalTest.htm");
Current Journal() << save MSWord("E:\Now\(Project) RFID_r3_Homing_r1\Ben analysis\JMP\JournalTest.doc");
Current Journal() << save RTF("E:\Now\(Project) RFID_r3_Homing_r1\Ben analysis\JMP\JournalTest.rtf");
// 获取组间的总结和测试，这部分工作
dt<<生存（
Y(:AFF14),
分组（：治疗），
故障图（0），
生存图（0），
，其中（：治疗==“丙酮5μl”|：治疗==“无”），
)
<<生存(
Y(:AFF14),
分组（：治疗），
故障图（0），
生存图（0），
，其中（：治疗==“丙酮5μl”|：治疗==“甲氧戊二烯5μll（40μg/μl）”），
);
// 导出组之间的摘要和测试，不起作用。如何修改这两个的脚本
dt<<日志（全部冻结）；
dt<<关闭窗口；
当前日志（）<<最小化窗口；
分页框（） << 日记；
dts = dt <<摘要（组（：治疗），N，平均值（：AFF14），标准错误，输出表名（“qryAFF14_out”））；
dts << 日记（全部冻结）；
dts <<关闭窗口；
Current Journal() << save HTML("E:\Now\(Project) RFID_r3_Homing_r1\Ben analysis\JMP\JournalTest.htm");
Current Journal() << save MSWord("E:\Now\(Project) RFID_r3_Homing_r1\Ben analysis\JMP\JournalTest.doc");
Current Journal() << save RTF("E:\Now\(Project) RFID_r3_Homing_r1\Ben analysis\JMP\JournalTest.rtf");
