这个是 我在一个窗口上传图片并把图片显示到一个picture空间里面时的代码:
string pname//图片路径 全局变量string fname//图片名称
integer valuevalue = GetFileOpenName("请选择图片",pname, fname,'jpg', &
+ 'Jpg 文件(*.jpg),*.jpg,位图文件(*.bmp),*.bmp,所有文件(*.*),*.*') dw_1.setitem( 1, 'khyd',fname)IF value <> 1 THEN return//显示文件
p_1.PictureName = fname
SetPointer( HOURGLASS! )
SQLCA.AutoCommit = True
//测定文件长度
long ll_len
ll_len = FileLength(pname)
//打开文件
integer fileno
fileno = FileOpen(pname,StreamMode!,READ!,LOCKREAD!)//读文件
blob lb_file ,lb_fn
int li_ii,ii
li_ii = ceiling(ll_len/32765)//取整for ii = 1 to li_ii
FileRead (fileno, lb_fn)
lb_file = lb_file + lb_fn
next
这个 完全可以 但是我还想把 这个上传的图片复制到我想要的目录下 代码如下:string copyto
copyto = 'F:\图片\'   \\我所需文件目录
FileCopy ( pname , copyto , false)
if FileCopy(pname , copyto , false)  <> 1 then
 messagebox('提示','上传失败')
else
messagebox('提示','上传成功')
end if 为什么 返回值是 -1 啊 请各位大虾些帮帮忙 万分感谢