{"id":6676,"date":"2024-07-31T11:01:01","date_gmt":"2024-07-31T03:01:01","guid":{"rendered":""},"modified":"2024-07-31T11:01:01","modified_gmt":"2024-07-31T03:01:01","slug":"\u901a\u8fbe\u4fe1\u7535\u8111\u7248\u600e\u4e48\u6dfb\u52a0\u81ea\u9009\u80a1\u7968?_\u901a\u8fbe\u4fe1\u81ea\u52a8\u4ea4\u6613\u89e3\u51b3\u65b9\u6848","status":"publish","type":"post","link":"https:\/\/mushiming.com\/6676.html","title":{"rendered":"\u901a\u8fbe\u4fe1\u7535\u8111\u7248\u600e\u4e48\u6dfb\u52a0\u81ea\u9009\u80a1\u7968?_\u901a\u8fbe\u4fe1\u81ea\u52a8\u4ea4\u6613\u89e3\u51b3\u65b9\u6848"},"content":{"rendered":"<\/p>\n<h2 id=\"\u8bf4\u660e\">\u8bf4\u660e<\/h2>\n<p>\u5728\u91cf\u5316\u8ba1\u7b97\u4e2d\uff0c\u7ecf\u5e38\u9700\u8981\u53d6\u5f97\u7c7b\u4f3c\u6700\u65b0\u7684\u80a1\u7968\u4ee3\u7801\u8868\u7b49\u76f8\u5173\u7684\u80a1\u7968\u4fe1\u606f\u3002\u867d\u7136\u53ef\u4ee5\u7f51\u7edc\u4e0a\u53ef\u4ee5\u5f88\u5bb9\u6613\u83b7\u5f97\u8fd9\u4e9b\u4fe1\u606f\uff0c\u4f46\u5f53\u5904\u4e8e\u79bb\u7ebf\u6216\u7f51\u7edc\u72b6\u51b5\u4e0d\u4f73\u72b6\u6001\u65f6\uff0c\u6211\u4eec\u53ef\u4ee5\u4ece\u8bf8\u5982\u901a\u8fbe\u4fe1,\u540c\u82b1\u987a,\u5927\u667a\u6167\u7ec8\u7aef\u4e4b\u7c7b\u7684\u672c\u5730\u6570\u636e\u4e2d\u83b7\u5f97\u6b64\u7c7b\u4fe1\u606f\u3002<br \/> <\/p>\n<h3 id=\"\u4e00--\u8bfb\u53d6\u80a1\u7968\u4ee3\u7801\">(\u4e00) \u8bfb\u53d6\u80a1\u7968\u4ee3\u7801<\/h3>\n<ul>\n<li>\n<p>\u6570\u636e\u6587\u4ef6<br \/> \u4e00\u822c\u901a\u8fbe\u4fe1\u7684\u80a1\u7968\u4ee3\u7801\u6587\u4ef6\uff0c\u4f4d\u4e8e\"\u901a\u8fbe\u4fe1\u8f6f\u4ef6\u7684\u5b89\u88c5\u76ee\u5f55\/T0002\/hq_cache\/\"\u4e0b\u3002\u7531 shm.tnf \u6caa\u5e02\u80a1\u7968\u4fe1\u606f\u548c szm.tnf\u6df1\u5e02\u80a1\u7968\u4fe1\u606f \u4e24\u4e2a\u6587\u4ef6\u3002\u5176\u4e2d\u5305\u62ec\u4e86\u5728\u76f8\u5e94\u5e02\u573a\u4e0a\u7684\u6240\u6709\u4ea4\u6613\u4ea7\u54c1\u7684\u4ee3\u7801\u548c\u540d\u79f0\uff08\u80a1\u7968AB\uff0c\u6307\u6570\uff0c\u57fa\u91d1\u7b49\uff09\u3002\u6bcf\u4e2a\u6587\u4ef6\u4e2d\u7684\u4fe1\u606f\u6761\u76ee\u8d85\u8fc72\u4e07\u3002<\/p>\n<\/li>\n<li>\n<p>\u6587\u4ef6\u683c\u5f0f<br \/> \u6570\u636e\u6587\u4ef6\u662f\u4e8c\u8fdb\u5236\u5b57\u8282\u683c\u5f0f\uff0c\u7531\u6587\u4ef6\u5934\u548c\u6570\u636e\u4f53\u6784\u6210\u3002<\/p>\n<\/li>\n<\/ul>\n<p>-- \u6587\u4ef6\u5934\uff1a\u5305\u542b 50 \u4e2aByte\uff0c\u5176\u4e2d<br \/> [ 0:40] -> 40\u4e2aByte\uff0cIPv4\u5730\u5740\uff0c\u8bb0\u5f55\u8f6f\u4ef6\u6700\u540e\u767b\u9646\u7684\u884c\u60c5\u4e3b\u7ad9IP\u5730\u5740\uff0c\u4e0d\u8db3\u7684\u5b57\u8282\u7531\"\\x00\"\u586b\u5145\uff0c\u4ee5\"\\x01'\"\u7ed3\u675f\uff1b<br \/> [40:42] -> 2\u4e2aByte\uff0c\u7aef\u53e3\u53f7\uff1b<br \/> [42:46] -> 4\u4e2aByte\uff0c\u65e5\u671f\uff08YYYYMMDD\uff09\uff1b<br \/> [46:50] -> 4\u4e2aByte\uff0c\u65f6\u95f4(Hmmss)\uff1b<\/p>\n<p>-- \u6570\u636e\u4f53\uff1a\u6bcf\u4e2a\u80a1\u7968\u4fe1\u606f\u8bb0\u5f55\u5728 314 \u4e2aByte\u7684\u6570\u636e\u5757\u5185\uff0c\u5176\u4e2d<br \/> [ 0: 6] -> 6\u4e2aByte\uff0c\u80a1\u7968\u4ee3\u7801\uff1b<br \/> [23:41] -> 18\u4e2aByte\uff0c\u80a1\u7968\u540d\u79f0\uff0c\u4e0d\u8db3\u7684\u5b57\u8282\u7531\"\\x00\"\u586b\u5145\uff1b<br \/> [276:280] -> 4\u4e2aByte\uff0c\u6628\u6536\u76d8\u4ef7\uff1b<br \/> [285:293] -> 4\u4e2aByte\uff0c\u80a1\u7968\u540d\u79f0\u62fc\u97f3\u5b57\u5934<\/p>\n<p><img decoding=\"async\" src=\"https:\/\/img-blog.csdnimg.cn\/64d41b6afb9246079280dcc94f9c82e3.png\" =\"\" =\"\" alt=\"\u901a\u8fbe\u4fe1\u7535\u8111\u7248\u600e\u4e48\u6dfb\u52a0\u81ea\u9009\u80a1\u7968?_\u901a\u8fbe\u4fe1\u81ea\u52a8\u4ea4\u6613\u89e3\u51b3\u65b9\u6848 (https:\/\/mushiming.com\/) \u7b2c1\u5f20\" title=\"\u901a\u8fbe\u4fe1\u7535\u8111\u7248\u600e\u4e48\u6dfb\u52a0\u81ea\u9009\u80a1\u7968?_\u901a\u8fbe\u4fe1\u81ea\u52a8\u4ea4\u6613\u89e3\u51b3\u65b9\u6848 \u7b2c1\u5f20-\u7a46\u4e16\u660e\u535a\u5ba2\" ><\/p>\n<p> \u4e0a\u56fe\u662f\u7a0b\u5e8f\u754c\u9762<\/p>\n<p>Private Sub Command1_Click()<br \/> On Error GoTo zyp<br \/> Dim hFile As Long<br \/> Dim temp(100) As Byte<br \/> Dim dddtemp As SECURITY_ATTRIBUTES<br \/> Dim dwRet, count, ngg, leibie As Integer<br \/> <br \/> For ii = 0 To 1<br \/> tdx_mc = Text1(ii).Text<br \/> hFile = CreateFile(tdx_mc, GENERIC_READ Or GENERIC_WRITE, FILE_SHARE_READ Or FILE_SHARE_WRITE, dddtemp, OPEN_EXISTING, 0, 0)<br \/> If hFile = -1 Then<br \/> MsgBox \"\u6253\u5f00\u6587\u4ef6\u5931\u8d25\"<br \/> End If<br \/> '\u8f6c\u5230\u6b63\u5f0f\u6587\u4ef6\u4f4d\u7f6e<br \/> SetFilePointer hFile, 50, 0, 0<br \/> '\u8bfb\u53d6\u4e2a\u6570<br \/> ReadFile hFile, temp(0), 2, dwRet, 0<br \/> '\u6700\u7ec8\u7684\u7ed3\u6784\u4f53\uff0c\u50a8\u5b58\u6240\u6709\u4fe1\u606f\u7684<br \/> 'Dim bk As WENJIAN<br \/> 'wj.nBanKuai = CInt(temp(0)) + CInt(temp(1)) * 256<br \/> 'count = wj.nBanKuai<br \/> '\u5b9a\u4e49\u52a8\u6001\u6570\u7ec4<br \/> 'ReDim wj.bBanKuai(count) As BANKUAI<br \/> '\u5faa\u73af\u8bfb\u53d6\u677f\u5757<br \/> List1.Clear<br \/> cou = FileLen(tdx_mc) \\ 314<br \/> Dim bk As BANKUAI<br \/> If InStr(tdx_mc, \"shm\") > 0 Then ibeg = 19000<br \/> If InStr(tdx_mc, \"szm\") > 0 Then ibeg = 500<br \/> For I = 0 To cou '\u8bfb\u53d6\u677f\u5757\u540d<br \/> Dim aa(6) As Byte<br \/> ReadFile hFile, aa(0), 7, dwRet, 0<br \/> bk.sDm = ByteToStr(aa)<br \/> <br \/> SetFilePointer hFile, 50 + 23 + 314 * (I), 0, 0<br \/> ReadFile hFile, temp(0), 18, dwRet, 0<br \/> bk.sMc = ByteToStr(temp)<br \/> Debug.Print I & vbTab & bk.sDm & vbTab & bk.sMc<br \/> SetFilePointer hFile, 50 + 314 * (I + 1), 0, 0<br \/> If Left(bk.sDm, 2) = \"30\" Or Left(bk.sDm, 2) = \"00\" Then<br \/> List1.AddItem I & vbTab & bk.sDm & vbTab & bk.sMc<br \/> End If<\/p>\n<p> Next<br \/> CloseHandle hFile<br \/> Next ii<br \/> 'Text1.Text = Text1.Text + \"\u8bfb\u53d6\u5b8c\u6210\"<br \/> '\u663e\u793a\u5728\u754c\u9762\u4e0a<br \/> zyp:<br \/> If Err.Number <> 0 Then MsgBox Err.Description<br \/> End Sub<br \/> Private Sub Command2_Click()<br \/> Me.CommonDialog1.InitDir = \"D:\\tdx\"<br \/> Me.CommonDialog1.FileName = \"\"<br \/> Me.CommonDialog1.Filter = \"txt (*.tnf)|*.tnf|All Files(*.*)|*.*\"<br \/> Me.CommonDialog1.ShowOpen<br \/> If CommonDialog1.FileName <> \" \" Then<br \/> Text1(0) = Me.CommonDialog1.FileName<br \/> End If<br \/> <br \/> End Sub<\/p>\n<p>Private Sub Command3_Click()<br \/> Me.CommonDialog1.InitDir = \"D:\\tdx\"<br \/> Me.CommonDialog1.FileName = \"\"<br \/> Me.CommonDialog1.Filter = \"txt (*.tnf)|*.tnf|All Files(*.*)|*.*\"<br \/> Me.CommonDialog1.ShowOpen<br \/> If CommonDialog1.FileName <> \" \" Then<br \/> Text1(1) = Me.CommonDialog1.FileName<br \/> End If<br \/> End Sub<\/p>\n","protected":false},"excerpt":{"rendered":"\u901a\u8fbe\u4fe1\u7535\u8111\u7248\u600e\u4e48\u6dfb\u52a0\u81ea\u9009\u80a1\u7968?_\u901a\u8fbe\u4fe1\u81ea\u52a8\u4ea4\u6613\u89e3\u51b3\u65b9\u6848\u91cf\u5316\u4ea4\u6613,\u80a1\u7968\u4ea4\u6613,shm.tnfszm.tnf_\u80a1\u7968\u4ee3\u7801tnf\u683c\u5f0f","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[],"tags":[],"_links":{"self":[{"href":"https:\/\/mushiming.com\/wp-json\/wp\/v2\/posts\/6676"}],"collection":[{"href":"https:\/\/mushiming.com\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/mushiming.com\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/mushiming.com\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/mushiming.com\/wp-json\/wp\/v2\/comments?post=6676"}],"version-history":[{"count":0,"href":"https:\/\/mushiming.com\/wp-json\/wp\/v2\/posts\/6676\/revisions"}],"wp:attachment":[{"href":"https:\/\/mushiming.com\/wp-json\/wp\/v2\/media?parent=6676"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/mushiming.com\/wp-json\/wp\/v2\/categories?post=6676"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/mushiming.com\/wp-json\/wp\/v2\/tags?post=6676"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}