summaryrefslogtreecommitdiff
path: root/wizards
diff options
context:
space:
mode:
authorKurt Zenker <kz@openoffice.org>2004-05-19 12:24:25 +0000
committerKurt Zenker <kz@openoffice.org>2004-05-19 12:24:25 +0000
commite31e7b27aa21772ddc48ca506b4006b0de0f4b28 (patch)
tree6f8c81001ab8ff40b9ec260b46c8ef2d0b91b506 /wizards
parentba68dd36c3f8567a761a95ef3d9195dece1e87ef (diff)
INTEGRATION: CWS qwizards1 (1.11.58); FILE MERGED
2003/11/14 13:08:07 tv 1.11.58.1: changed resources to dbwizres
Diffstat (limited to 'wizards')
-rw-r--r--wizards/source/tools/UCB.xba6
1 files 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 &lt;&gt; 0 Then
- If InitResources(&quot;&quot;, &quot;com&quot;) Then
- ErrMsg = GetResText(1000)
+ If InitResources(&quot;&quot;, &quot;dbw&quot;) Then
+ ErrMsg = GetResText(500)
ErrMsg = ReplaceString(ErrMsg, chr(13), &quot;&lt;BR&gt;&quot;)
ErrMsg = ReplaceString(ErrMsg, sNewFolder, &quot;%1&quot;)
Msgbox(ErrMsg, 48, GetProductName())
@@ -278,4 +278,4 @@ NOSPACEONDRIVE:
Resume GOON
End If
GOON:
-End Function</script:module> \ No newline at end of file
+End Function</script:module>