很急 请问用vf怎么能让用户自己在表单上添加图片

1。使用list命令输出4到8条和记录号大于10的记录

list for recno()>=4 and recno()<=8

list for recno()>10

2.打开浏览窗口，只显示编号，姓名，性别等字段

brow field 编号,姓名,性别

3，在第五条记录之前插入一条空白记录

go 5

insert befo blank

4，将刚才加入的空白记录进行物理删除

go 5

dele

pack

5，将教授的基本工资加20%

repl all 基本工资 with 基本工资*1.2 for 职称="教授"

6，将rsda表的结构复制到rsda表

use rsda

copy stru to rsdax

7，将rsda表的已婚男教授的信息添加到rsda x表

use rsda

copy to rsdax for 婚否 and 职称="教授"

8，使用排序命令将rsda表按性别将序排序，性别相同按基本工资升序排序，排序结构放到表prsda.dbf

use rsda

sort to prsda on 性别/d,基本工资

9,建立结构化复合索引：表按职称降序,基本工资按升序排序，索引名zc.jbgz

index on asc(职称)+str(10000-基本工资) desc tag zc

10、使用索引查询，查找第一个姓”李“的职工，并将其进行逻辑删除

index on 姓名 to aa

seek "李"

11、统计男女职工的平均工资。

aver 基本工资 for 性别="男"

aver 基本工资 for 性别="女"

12、查找基本工资最高与最低的职工。

sele max(基本工资) as 最高工资,min(基本工资) as 最低工资 from rsda

不管是用什么数据库，存放图片的字段你采用字符类型，这一点肯定是不对的。而且，你没说明使用的数据库类型，采用的语言是什么；

下面是C++的处理方法：

下面这段程序用于将数据库中的图片读入到Image中：

((TBlobField*)(ADOQuery1->FieldByName("lk_sfz_photo")))->

SaveToFile("linshi2.jpg")

Image1->Picture->LoadFromFile("linshi2.jpg")

Image1->Width=Image1->Picture->Width

Image1->Height=Image1->Picture->Height

Image1->Visible=true

下面这段程序用于将Image中的图片写入到数据库：

if(bLoadImage==true){

TMemoryStream *pms=new TMemoryStream()

TJPEGImage *jpg=dynamic_cast<TJPEGImage*>(Image1->

Picture->Graphic)

if(jpg!=NULL)//是JPEG类型的图像

jpg->SaveToStream(pms)//将图像数据写入内存流

else//是位图

Image1->Picture->Bitmap->SaveToStream(pms)//将图像数据

//写入

//内存流

//从内存流中装载图像数据

((TBlobField*)(ADOQuery1->FieldByName("lk_sfz_photo")))->

LoadFromStream(pms)

delete pms

}

ADOQuery1->Post()

上面的代码需要在前面加载两个包：

#include <io.h>

#include <jpeg.hpp>

---