{"id":643,"date":"2020-07-30T01:23:23","date_gmt":"2020-07-30T01:23:23","guid":{"rendered":"http:\/\/mio-web.net\/pcsupport\/?p=643"},"modified":"2020-07-30T01:23:23","modified_gmt":"2020-07-30T01:23:23","slug":"access%e3%80%80%e3%82%b5%e3%83%96%e3%83%95%e3%82%a9%e3%83%bc%e3%83%a0%e3%80%80%e6%96%b0%e8%a6%8f%e8%a1%8c%e8%bf%bd%e5%8a%a0%e6%99%82%e3%81%ab%e8%87%aa%e5%8b%95%e7%9a%84%e3%81%ab%e8%a1%8c%e7%95%aa","status":"publish","type":"post","link":"https:\/\/mio-web.net\/pcsupport\/archives\/643\/","title":{"rendered":"ACCESS\u3000\u30b5\u30d6\u30d5\u30a9\u30fc\u30e0\u3000\u65b0\u898f\u884c\u8ffd\u52a0\u6642\u306b\u81ea\u52d5\u7684\u306b\u884c\u756a"},"content":{"rendered":"\n<p>\u30b5\u30d6\u30d5\u30a9\u30fc\u30e0\uff08\u30c0\u30a4\u30ca\u30bb\u30c3\u30c8\uff09\u3067\u3001\u672b\u5c3e\u306e\u65b0\u898f\u8ffd\u52a0\u884c\u306e\u7de8\u96c6\u3092\u958b\u59cb\u3057\u305f\u3068\u304d\u306b\u3001\u884c\u756a\u30d5\u30a3\u30fc\u30eb\u30c9\u306b\u81ea\u52d5\u7684\u306b\u63a1\u756a\u3057\u305f\u3044\u5834\u5408\u306f\u3001\u30d5\u30a9\u30fc\u30e0\u306e\u300c\u633f\u5165\u524d\u300d\u30a4\u30d9\u30f3\u30c8\u3092\u4f7f\u3046\u3002<\/p>\n\n\n\n<p>Private Sub Form_BeforeInsert(Cancel As Integer)<\/p>\n\n\n\n<p> &#8216;\u8ffd\u52a0\u6642\u306b\u884c\u756a\uff08\u6700\u5927\u5024\uff09\u3092\u632f\u308b<br>Dim rst As Object, lastno As Double<br>Set rst = Me.RecordsetClone<br>If rst.RecordCount = 0 Then<br>lastno = 0<br>Else<br>lastno = rst.RecordCount<br>End If<br>rst.AddNew<br>rst![\u5e74] = Parent!cboNEN<br>rst![\u6708] = Parent!cboMONTH<br>rst![\u4f1a\u793eC] = Parent!cboCOM<\/p>\n\n\n\n<p>rst![\u884c\u756a] = lastno + 1<\/p>\n\n\n\n<p>rst.Update<br>rst.Close<\/p>\n\n\n\n<p>End Sub<\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u30b5\u30d6\u30d5\u30a9\u30fc\u30e0\uff08\u30c0\u30a4\u30ca\u30bb\u30c3\u30c8\uff09\u3067\u3001\u672b\u5c3e\u306e\u65b0\u898f\u8ffd\u52a0\u884c\u306e\u7de8\u96c6\u3092\u958b\u59cb\u3057\u305f\u3068\u304d\u306b\u3001\u884c\u756a\u30d5\u30a3\u30fc\u30eb\u30c9\u306b\u81ea\u52d5\u7684\u306b\u63a1\u756a\u3057\u305f\u3044\u5834\u5408\u306f\u3001\u30d5\u30a9\u30fc\u30e0\u306e\u300c\u633f\u5165\u524d\u300d\u30a4\u30d9\u30f3\u30c8\u3092\u4f7f\u3046\u3002 Private Sub Form_BeforeInsert(Canc [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"vkexunit_cta_each_option":"","footnotes":""},"categories":[24],"tags":[],"class_list":["post-643","post","type-post","status-publish","format-standard","hentry","category-access"],"_links":{"self":[{"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/posts\/643","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/comments?post=643"}],"version-history":[{"count":1,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/posts\/643\/revisions"}],"predecessor-version":[{"id":644,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/posts\/643\/revisions\/644"}],"wp:attachment":[{"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/media?parent=643"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/categories?post=643"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/tags?post=643"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}