求救,两百分!(200分)

  • 主题发起人 主题发起人 zhoudang
  • 开始时间 开始时间
Z

zhoudang

Unregistered / Unconfirmed
GUEST, unregistred user!
表的结构和记录如下: 属性: 字:
象形字 手日月水
形声字 恢炭源

要查询“月”字的属性,如何实现?数据库可用access和paradox!要求速度快!
 
是这个意思吗?
Select 表.属性
From 表
Where 表.字="月"
 
就是sql语句嘛,还有什么困难的
 
同意suman的[:D]实属骗分[:D]
 
试一下用 VBA 函数嵌入ACCESS SQL,我没测试。

select 属性 FROM TableName WHERE InStr(0, '月', 字, vbTextCompare) > 0

InStr 函数
  返回某字符串在另一字符串中第一次出现的位置。
  InStr([start, ]string1, string2[, compare])
参数
  start
  可选项。数值表达式,用于设置每次搜索的开始位置。如果省略,将从第一个字符的位置开始搜索。如果 start 包含 Null,则会出现错误。如果已指定 compare,则必须要有 start 参数。
  string1
  必选项。接受搜索的字符串表达式。
  string2
  必选项。要搜索的字符串表达式。
  compare
  可选项。指示在计算子字符串时使用的比较类型的数值。如果省略,将执行二进制比较。
  设置
  compare 参数可以有以下值:
  常数
  值
  描述
  vbBinaryCompare
  0
  执行二进制比较。
  vbTextCompare
  1
  执行文本比较。
  返回值
  InStr 函数返回以下值:
  如果
  InStr 返回
  string1 为零长度
  0
  string1 为 Null
  Null
  string2 为零长度
  start
  string2 为 Null
  Null
  string2 没有找到
  0
  在 string1 中找到 string2
  找到匹配字符串的位置
  start > Len(string2)
  0
 
很久没用VBSCRIPT,查函数花了十几分钟就有这么多人回答,真怀疑我理解错了题目。
 
我的是可用的:
Select 属性 From 表 Where 表.字 like "%月%"
 
唉,原来写ASP时常用的 % 给忘了,吃力不讨好。

btw:
pipi,你的那个PInteger测试通过,真有你的。
 
select 属性 from table
where substr('月', 字)>1
 
看来PiPi.是个SQL的行家里手,我每次都被你抢了先去了
我要求多库联查,我要求给我难题,最好是需要子查询才能实现的那种
 
我觉得你的表结构不合理,不符合第一范式
属性: 字:
象形字 手
象形字 日
象形字 月
象形字 水
形声字 恢
形声字 炭
形声字 源
主键为 属性,字
查询用
Select 表.属性
From 表
Where 表.字="月" 即可
 
我认为chenliang_fly的意见是对的,同意。
 
同意PiPi的做法,对PiPi补充一点:
当PARADOX:Select 属性 From 表 Where 表.字 like "%月%"
当ACCESS:Select 属性 From 表 Where 表.字 like "?月?"
 
好象DELPHI的SETKEY方法可以但对中文不支持!
 
中文好像不行的吧??????、
 
同意PiPi的做法
Select 属性 From 表 Where 表.字 like "%月%"
 
同意chenliang_fly,但把字放在第一字段,屬性放在第二字段,主鍵字,紀錄多也非常快
 
同意:chenliang_fly, 时间:2002-2-21 8:42:00, ID:931227
我觉得你的表结构不合理,不符合第一范式
属性: 字:
象形字 手
象形字 日
象形字 月
象形字 水
形声字 恢
形声字 炭
形声字 源
主键为 属性,字
查询用
Select 表.属性
From 表
Where 表.字="月" 即可


 
谢谢各位的解答,写题目时漏了一个条件,就是“月”是一个变量,用edit1输入变量;
即select 属性 from 表 where 表.字 like (变量)
如何解决呢?
 
select 属性 from 表 where 表.字 like '%'||:w||'%'
给 w 赋值“月”就可以了
 

Similar threads

D
回复
0
查看
849
DelphiTeacher的专栏
D
D
回复
0
查看
855
DelphiTeacher的专栏
D
D
回复
0
查看
901
DelphiTeacher的专栏
D
D
回复
0
查看
634
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
后退
顶部