回 帖 发 新 帖 刷新版面

主题:在线求教高手,有关数据窗口

我想实现一个功能,就是在添加的数据窗口中要求双击可以打开一个添加附件的窗口,然后选择再复制到指定位置,最后将这个文件名写到当前双击的这个文本框里。
代码如下:
//写在dw_1的双击事件中
string fujian_name
fujian_name=dw_1.getcolumnname( )//当前双击的字段名

string fujian_type//字段名划类,因为此类都是以pic_开头的
fujian_type=Left ( fujian_name, 4 ) //选出以PIC_开头的
if fujian_type="pic_" then
    //添加附件
string pname,fname,new_fujian
integer rtn,rt
rtn=getfileopenname("添加附件",pname,fname)
if rtn=1 then
new_fujian=system_dz+"\pic\"+fname//复制到指定位置
rt=filecopy(pname,new_fujian)
if rt=1 then
    messagebox("提示","文件复制成功!")
    dw_1.object.dwo.text=fname//写到当前文本框里,就是这句无法实现。 
end if
end if
end if

回复列表 (共1个回复)

沙发

自已顶

我来回复

您尚未登录,请登录后再回复。点此登录或注册