ODBC リンクテーブルの場合、
DoCmd.SetParameter "日付", CDbl(日付)
DoCmd.OpenQuery "クエリー"
でどうでしょう…
2017年9月19日火曜日
VB6 用、日付に関する便利関数
Public Function 先月初日() As Date
Dim 先月 As Date
Let 先月 = DateSerial(Year(Now), Month(Now), 1) - 1
先月初日 = DateSerial(Year(先月), Month(先月), 1)
End Function
Public Function 先月末日() As Date
Dim 初日 As Date
先月末日 = DateSerial(Year(Now), Month(Now), 1) - 1
End Function
Public Function 今月初日() As Date
今月初日 = DateSerial(Year(Now), Month(Now), 1)
End Function
Public Function 今月末日() As Date
Dim 来月 As Date
Let 来月 = DateSerial(Year(Now), Month(Now), 1) + 31
今月末日 = DateSerial(Year(来月), Month(来月), 1) - 1
End Function
2017年8月20日日曜日
XSLT XPath + MS 仕様 リファレンス用
XPath 構文
XPath 式のコンテキスト
演算子および特殊文字
コレクション
フィルターおよびフィルター パターン
論理式、比較式、およびセット式
比較
セット操作
位置のパス
XPath の例
XPath の例
./author
author
first. name
/bookstore
//author
book[/bookstore/@specialty=@style]
author/first-name
bookstore//title
bookstore/*/title
bookstore//book/excerpt//emph
.//title
author/*
book/*/last-name
*/*
*[@specialty]
@style
price/@exchange
price/@exchange/total
book[@style]
book/@style
@*
./first-name
first-name
author[1]
author[first-name][3]
my:book
my:*
@my:*x/y[1]
x/y[position() = 1]
(x/y)[1]
x[1]/y[2]
book[last()]
book/author[last()]
(book/author)[last()]
book[excerpt]
book[excerpt]/title
book[excerpt]/author[degree]
book[author/degree]
author[degree][award]
author[degree and award]
author[(degree or award) and publication]
author[degree and not(publication)]
author[not(degree or award) and publication]
author[last-name = "Bob"]
author[last-name[1] = "Bob"]
author[last-name [position()=1]= "Bob"]
degree[@from != "Harvard"]
author[. = "Matthew Bob"]
author[last-name = "Bob" and ../price > 50]
book[position() <= 3]
author[not(last-name = "Bob")]
author[first-name = "Bob"]
author[* = "Bob"]
author[last-name = "Bob" and first-name = "Joe"]
price[@intl = "Canada"]
degree[position() < 3]
p/text()[2]
ancestor::book[1]
ancestor::book[author][1]
ancestor::author[parent::book][1] 軸
ancestor::
ancestor-or-self::
attribute::
child::
descendant::
descendant-or-self::
following::
following-sibling::
namespace::
parent::
preceding::
preceding-sibling::
self::
ノード型のテスト
comment()
node()
processing-instruction()
text()
文字列関数 (XPath)
concat
contains
normalize-space
starts-with
String
string-length
substring
substring-after
substring-before
translate
XML データ型リファレンス
string
boolean
decimal
float
double
duration
dateTime
time
date
gYearMonth
gYear
gMonthDay
gDay
gMonth
hexBinary
base64Binary
anyURI
QName
NOTATION
normalizedString
token
language
IDREFS
ENTITIES
NMTOKEN
NMTOKENS
Name
NCName
ID
IDREF
ENTITY
integer
nonPositiveInteger
negativeInteger
long
int
short
byte
nonNegativeInteger
unsignedLong
unsignedInt
unsignedShort
unsignedByte
positiveInteger
XsltArgumentList.AddExtensionObject
.AddExtensionObject("urn:Link", link);
xmlns:hxLink="urn:Link"
exclude-result-prefixes="hxLink"
<xsl:value-of select="concat(hxLink:LookupContentId(@NavigateUrl), '.html')"/>
<xsl:element> 要素
xsl:apply-imports
xsl:apply-templates
xsl:call-template
xsl:choose
xsl:copy
xsl:copy-of
xsl:element
xsl:fallback
xsl:for-each
xsl:if
xsl:message
xsl:number
xsl:otherwise
xsl:param
xsl:template
xsl:text
xsl:value-of
xsl:variable
xsl:when
xsl:with-param
Node-Set 関数
count
id
last
local-name
name
namespace-uri
position
Microsoft XPath 拡張関数
ms:type-is
ms:type-local-name ([node-set])
ms:type-namespace-uri ([node-set])
ms:schema-info-available
ms:string-compare
ms:utc
ms:namespace-uri
ms:local-name
ms:number
ms:format-date
ms:format-time
$ は変数
{} は属性値テンプレート
- 7.6.2 属性値テンプレート
- XSLT variable into the curly braces
- {} 波かっこ内の評価結果を string に変換してくれる?
2017年6月30日金曜日
WinPE 起動用 ISO イメージ作成メモ
mkisofs ... mkisofs は cdrecord_fe_0902_all のものを使用
mkisofs -udf -o cd.iso -b isolinux/isolinux.bin -c isolinux/boot.cat -no-emul-boot -boot-load-size 4 -boot-info-table cd
フォルダー構成
boot/
bcd
boot.sdi
BootFix.bin
bootsect.exe
en-us
etfsboot.com
fonts
grldr
grub
IMG
ja-JP
memdisk
memtest.exe
fonts/
chs_boot.ttf
cht_boot.ttf
jpn_boot.ttf
kor_boot.ttf
wgl4_boot.ttf
grub/
grldr
menu.lst
ja-JP/
bootmgr.exe.mui
bootsect.exe.mui
isolinux/
boot.cat
chain.c32
isolinux.bin
isolinux.cfg
sources/
2008R2.wim
BOOTMGR
isolinux.cfg
DEFAULT winpe LABEL winpe MENU LABEL ^WinPE BOOTMGR COM32 chain.c32 APPEND fs ntldr=/BOOTMGR
2017年6月14日水曜日
Access レポート「指定した式には値がありません。」
---
実行時エラー '2427':
指定した式には値がありません。
---
対策例:
Private Sub 詳細_Format(Cancel As Integer, FormatCount As Integer)
If CurrentRecord = 0 Then
' レコードなし
Else
' レコードあり
Debug.Print [ID]
End If
End Sub
2017年5月26日金曜日
PowerEdge T130 で、Windows Server 2008 R2 セットアップのキーボード・マウスが操作できない!
簡単な解決方法(未確認)
難しい解決方法
参考:
How to inject USB 3.0 drivers into Windows Server 2008 R2SP1 for use on Dell PowerEdge R230, R330, T130, T330 and T30
http://en.community.dell.com/techcenter/b/techcenter/archive/2016/05/15/how-to-inject-usb-3-0-drivers-into-windows-server-2008-r2sp1-for-use-on-dell-r230-r330-t130-t330
- BIOS に入ります。
- System BIOS Settings → Integrated Devices → USB 3.0 Setting → Disabled
難しい解決方法
- Windows インストールディスクの boot.wim に USB 3.0 ドライバーを注入します。
- 更新した boot.wim を含む DVD を作成し、それを使ってインストールを実施します。
参考:
How to inject USB 3.0 drivers into Windows Server 2008 R2SP1 for use on Dell PowerEdge R230, R330, T130, T330 and T30
http://en.community.dell.com/techcenter/b/techcenter/archive/2016/05/15/how-to-inject-usb-3-0-drivers-into-windows-server-2008-r2sp1-for-use-on-dell-r230-r330-t130-t330
syslinux 6 で WinPE を起動したい
用意するファイル
VistaPE などで作成した boot.wim から、7-zip などを使ってこれらのファイルを取り出してください:\BOOTMGR
\Boot\bcd
\Boot\boot.sdi
\Boot\en-us\*
\Boot\fonts\*
\Boot\ja-JP\*
cfg ファイルの書き方
LABEL -MENU LABEL ^WinPE BOOTMGR
COM32 /boot/syslinux/chain.c32
APPEND fs ntldr=/BOOTMGR
bcdedit で \boot\bcd ファイルを修正
bcdedit は使う OS のバージョンには特に影響しないようです。
C:\A>bcdedit
/store bcd /copy {default} /d "MyPE_x86"
エントリは
{5841949e-415a-11e7-bff0-d43d7e05f256} に正常にコピーされました。
C:\A>bcdedit
/store bcd /set {5841949e-415a-11e7-bff0-d43d7e05f256} device
ramdisk=[boot]\sources\MyPE_x86.wim,{7619dcc8-fafe-11d9-b411-000476eba25f}
この操作を正しく終了しました。
C:\A>bcdedit
/store bcd /set {5841949e-415a-11e7-bff0-d43d7e05f256} osdevice
ramdisk=[boot]\sources\MyPE_x86.wim,{7619dcc8-fafe-11d9-b411-000476eba25f}
この操作を正しく終了しました。
C:\A>bcdedit
/store bcd /displayorder {5841949e-415a-11e7-bff0-d43d7e05f256} /addlast
この操作を正しく終了しました。
C:\A>bcdedit
/store bcd
Windows ブート マネージャー
--------------------------------
identifier {bootmgr}
description Windows Boot Manager
locale ja-jp
inherit {globalsettings}
default {default}
displayorder {default}
{5841949e-415a-11e7-bff0-d43d7e05f256}
toolsdisplayorder {memdiag}
timeout 30
Windows ブート ローダー
--------------------------------
identifier {default}
device
ramdisk=[boot]\sources\boot.wim,{7619dcc8-fafe-11d9-b411-000476eba25f}
path
\windows\system32\boot\winload.exe
description Windows Setup
locale ja-jp
inherit {bootloadersettings}
osdevice
ramdisk=[boot]\sources\boot.wim,{7619dcc8-fafe-11d9-b411-000476eba25f}
systemroot \windows
detecthal Yes
winpe Yes
ems Yes
Windows ブート ローダー
--------------------------------
identifier
{5841949e-415a-11e7-bff0-d43d7e05f256}
device
ramdisk=[boot]\sources\MyPE_x86.wim,{7619dcc8-fafe-11d9-b411-000476eba25f}
path
\windows\system32\boot\winload.exe
description MyPE_x86
locale ja-jp
inherit {bootloadersettings}
osdevice
ramdisk=[boot]\sources\MyPE_x86.wim,{7619dcc8-fafe-11d9-b411-000476eba25f}
systemroot \windows
detecthal Yes
winpe Yes
ems Yes
C:\A>
登録:
投稿 (Atom)

