超过指定行的数据如何进行提示 - 编程论坛

#2

hams2010-07-05 08:49

xxx=0
hhh=0
Do While Not rootRs.Eof
   rootRs.movenext
   xxx=xxx+1
   if rootrs("Product")="HHHH" then hhh=xxx
   if xxx-hhh=14 then response.write "注意"
   if xxx>18 then response.write "XXX"
Loop

#3

a1900662010-07-05 10:03

      非常感谢这么快就可回答我的问题。我测试时，页面提示正在打开，但好长时间打不开。CPU占去了70%，好象进入了死循环。怎么办呢。
     其实。我最现想是在一个表内。无论数据：“HHHH”和“MMMM”在那一个字段(因为每个仓库都有相同名称的商品)，只要数据：“HHHH”超过13行时提示：“注意”字样；“MMMM”超过17行数据时提示“超期”字样(上文用XXX表示)。有了这个提示，早进货的商品可以及早处理。

     我是新手，连好多的符号都不懂，我只认定你是我师傅，我等你答我。谢谢。

#4

hams2010-07-05 11:44

说得不明白

#5

a1900662010-07-05 12:53

回复 4楼 hams

不好意思，没有说清楚。再说一次。在一个表内。无论数据：“感冒冲剂”和“先锋六胶囊”在那一个字段(因为每个仓库都有相同名称的商品)，只要：“感冒冲剂”超过13行时提示：“注意”字样；“先锋六胶囊”超过17行数据时提示“超期”字样(上文用XXX表示)。有了这个提示，早进货的商品可以及早处理。

表:    Product
ID    Storehouse1     Storehouse2      Storehouse3   Storehouse4
1     感冒冲剂        先锋六胶囊
2     阿司匹林        感冒冲剂
3     先锋六胶囊      阿司匹林
4     阿司匹林        阿司匹林
……
13    板蓝根冲剂      维生素B1
……
17

#6

hams2010-07-05 15:19

超过13\17行是什么意思？出现过这么多次？还是出现在13/17行？如果是后者有意义么？

#7

a1900662010-07-05 18:23

最后一次存入“先锋六胶囊”和“感冒冲剂”的行与当前最新一行的“行差”，如相差超出13行和17行数据时用提醒方法。

如“感冒冲剂”的是第2行。数据到第15行，行差大于13行时提示：“注意”字样。同理，“先锋六胶囊”行差大于17行时提示：“超期”字样/

#8

hams2010-07-05 20:03

不太了解你的需要，但我想，实在要做，可以：
1、把你需要判断的字段先做个搜索，把符合条件的位置全记录下来
2、依次判断与某行的行差