From e31e7b27aa21772ddc48ca506b4006b0de0f4b28 Mon Sep 17 00:00:00 2001 From: Kurt Zenker Date: Wed, 19 May 2004 12:24:25 +0000 Subject: INTEGRATION: CWS qwizards1 (1.11.58); FILE MERGED 2003/11/14 13:08:07 tv 1.11.58.1: changed resources to dbwizres --- wizards/source/tools/UCB.xba | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/wizards/source/tools/UCB.xba b/wizards/source/tools/UCB.xba index 69010dbdea7d..7b8a171615b2 100644 --- a/wizards/source/tools/UCB.xba +++ b/wizards/source/tools/UCB.xba @@ -268,8 +268,8 @@ Dim oUcb as Object CreateFolder = True NOSPACEONDRIVE: If Err <> 0 Then - If InitResources("", "com") Then - ErrMsg = GetResText(1000) + If InitResources("", "dbw") Then + ErrMsg = GetResText(500) ErrMsg = ReplaceString(ErrMsg, chr(13), "<BR>") ErrMsg = ReplaceString(ErrMsg, sNewFolder, "%1") Msgbox(ErrMsg, 48, GetProductName()) @@ -278,4 +278,4 @@ NOSPACEONDRIVE: Resume GOON End If GOON: -End Function \ No newline at end of file +End Function -- cgit v1.2.1