Question

想通过VB搭建一个平台，通过richtextbox控件来将带图片的文档存储到access或其他数据

想通过VB搭建一个平台，通过richtextbox控件来将带图片的文档存储到access或其他数据库中，实现录入查询功能，图文排版不变。但实践发现access中没有能够对图文直接存储的类型，只能分别对文字图片进行存储。如果在录入的时候分别录入图片和文字，会使录入工作复杂，同时造成access数据库数据量快速增大，处理速度慢。现在想请教一下，要想满足图文录入查询这样功能，该如何实现？或者贴近这种功能的方式。

Answer 1

openFileDialog1.Filter = "*.jpg|*.jpg|*.gif|*.gif|*.BMP|*.BMP";
if (openFileDialog1.ShowDialog() == DialogResult.OK)
{
string fullpath = openFileDialog1.FileName;
FileStream fs = new FileStream(fullpath, FileMode.Open);
byte[] imagebytes = new byte[fs.Length];
BinaryReader br = new BinaryReader(fs);
imagebytes = br.ReadBytes(Convert.ToInt32(fs.Length));
string strpath = Application.StartupPath + "";
string constr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+strpath;
OleDbConnection olecon = new OleDbConnection(constr);
olecon.Open();
OleDbCommand oledcom = new OleDbCommand("insert into picdata(pix) values(@ImageList)", olecon);
oledcom.Parameters.Add("ImageList",OleDbType.Binary);
oledcom.Parameters["ImageList"].Value = imagebytes;
oledcom.ExecuteNonQuery();
olecon.Close();
MessageBox.Show("图片保存完毕");
}