谁能给个listview的分页显示的例子 ||||基本好了`非常感谢afan [已解决]

410521a

晕`` 那是咋回事呀` 我这现在都快700条了只能读取633条`

410521a

我怎么把代码发给你看看呀

不留QQ就` `留个信箱吧` 我一会发你信箱里边`` 行吗？

afan

你生成1000条试试~

1. $a = '[Config]' & @CRLF
   
2. For $i = 1 To 1000
   
3.         $a &= $i & '=项目' & $i & @CRLF
   
4. Next
   
5. FileWrite('test.ini', $a)

复制代码

估计是你的ini文件有问题

410521a

回复 95# afan


我试过了` 可以`` 那为啥呢``我数据库有啥问题呀？

afan

估计是你的数据超出了iniread限制，可以试试使用我那个ini函数库
http://www.autoitx.com/thread-12319-1-1.html

410521a

回复 97# afan


    超出限制？ 晕`限制为多少呀```

afan

内置函数有效数据仅有32767字符可以被正常返回
你在第633条数据上增减部分字符，可能会只能显示632条或634条，就说明是这个问题了

410521a

回复 99# afan


    大哥你那个是不是把_.ini.au3下载下来放到D:\autoit3\Include 这个里边` 然后把带码里的INI函数前边加_就可以了？

我看那个还有打开模式`` 需不需添加？

afan

是的，放到脚本目录也可以
记得必须在脚本前面 #include <_Ini.au3>
打开模式一般默认就行

410521a

回复 101# afan


    O了`` 大哥你真棒`` 我什么时候才能有你这样的水平啊` 崇拜 ``我现在都不知道怎么学习了`

afan

O了就好，至于如何学我也没发言权，从感兴趣的入手吧~

410521a

回复 103# afan

对学习这块我真的很迷茫`` 想学又没目标```有时候总是偷机取巧


还有个问题`` 带关键字`` 我只能贴图片``   这个正规怎么使用```   要他检测`` 是不是 shengfenzhen 号

afan

1. $Str1 = '101123456781231'
   
2. If StringRegExp($str1, '^(\d{15}|\d{18})$') Then Msgbox(0, $Str1, '是身份证号')
   
3. 
   
4. $Str2 = '10112345678123122'
   
5. If StringRegExp($str2, '^(\d{15}|\d{18})$') Then Msgbox(0, $Str2, '是身份证号')
   
6. 
   
7. $Str3 = '101123456781231220'
   
8. If StringRegExp($str3, '^(\d{15}|\d{18})$') Then Msgbox(0, $Str3, '是身份证号')

复制代码

410521a

回复 105# afan





这个好像只是检测位数`` 有没有办法让他检测 号是不是正确？

1. #include <ButtonConstants.au3>
   
2. #include <EditConstants.au3>
   
3. #include <GUIConstantsEx.au3>
   
4. #include <WindowsConstants.au3>
   
5. #Region ### START Koda GUI section ### Form=
   
6. $Form1 = GUICreate("Form1", 244, 177, 274, 213)
   
7. $Input1 = GUICtrlCreateInput("Input1", 32, 32, 153, 21)
   
8. $Button1 = GUICtrlCreateButton("Button1", 64, 88, 75, 25)
   
9. GUISetState(@SW_SHOW)
   
10. #EndRegion ### END Koda GUI section ###
    
11. 
    
12. While 1
    
13.         $nMsg = GUIGetMsg()
    
14.         Switch $nMsg
    
15.                 Case $GUI_EVENT_CLOSE
    
16.                         Exit
    
17.                 Case $Button1
    
18.                          $Str1 = GUICtrlRead($Input1,"")
    
19.                   If StringRegExp($str1, '^(\d{15}|\d{18})$') Then
    
20.                           Msgbox(0, $Str1, '是身份证号')
    
21.                   Else
    
22.                           Msgbox(0, $Str1, '不是身份证号')
    
23.                   EndIf
    
24.         EndSwitch
    
25. WEnd
    

复制代码

afan

这个需要了解第一代和第二代身份证的编号规则