最近准备为公司网站用VB做个产品展示生成,生成部分基本没问题,
问题出现在查询部分,使用了MSHFelxGrid(DATAGrid不能满足操作需求),本来以为收工了,昨天再次测试的时候发现了以下问题
当数据库字段为“Memo(Access备注)”的时候,使用MSHFlexGrid1.TextMatrix取得的值并不完全,长度只有999个字符……困扰了一天,请高人们来测试并说说解决方案。由于相当原因,排除掉修改数据库字段类型的方案。
源码如下:
包括控件 textbox x 1(可不要,显示测试用),MSHFlexGrid x 1,Label x 1
数据库为Access,表Product内的SmallClassName字段为Memo类型,记录数据超过2000字符
Dim con As New ADODB.Connection
Dim Gs As New ADODB.Recordset
Private Sub Form_Load()
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & "/DB.mdb;Persist Security Info=False "
con.Open
Gs.CursorLocation = adUseClient
Gs.Open "select * from product where smallClassName like '% ' ", con, 1, 1
Set MSHFlexGrid1.DataSource = Gs
Gs.Close
Text1.Text = MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, 1) '显示测试用,可忽略该行
相关问答:
IsSqlDataBase = 0 '主数据库类型(1=SQL,0=AC)
'===========================================================================
SqlDatabaseName = "ads365" '主数据库名
S ......
问题如下:
用查询语句
select * from tab where fil like 'CK090902'能查找出一条记录并显示出来
改为
select * from tab where fil = 'CK090902'
就不能查找到,也显示不出来 ......
Dim searchKW As String = txtbxSearch.Text
Dim cmdSearch = New OleDb.OleDbCommand
cmdSearch.CommandText = " ......
ACCESS数据库中有一个tablename表,设计如下
编号,书名,作者,出版时间,出版社,ISBN,目录,简介
其中除“编号”为自动编号外,其它都为“备注”
其中"编号"维一,在“ISBN”中有的为空值, ......
大家好,我在数据表中定义一个需要进行排序的整数字段,但是根据应用需求,该字段的取值范围很大,几乎用满了整个32位长度。
在Access表中好像只有“长整型”适合长度的需要。可是由于长整型是带符号数的,因此在 ......