Files
loongoffice/odk/examples/DevelopersGuide/FirstSteps/FirstUnoContact/basic/FirstUnoContact.bas
Hossein bc5c767e9a Separate folders for DevelopersGuide/FirstSteps
This patch creates separate folders for 3 different SDK examples in
DevelopersGuide/FirstSteps:

1. FirstUnoContact
2. FirstLoadComponent
3. HelloTextTableShape

Each one of these are ported to 4 languages: Java, C++, BASIC, Python.
The Java Makefile in the top folder is now separated into 3 different
Makefiles for Java programs.

Change-Id: Ifb2003be2aafb4caec4810eb21fbb4708b9a0628
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/159591
Tested-by: Hossein <hossein@libreoffice.org>
Reviewed-by: Hossein <hossein@libreoffice.org>
2023-11-20 14:59:10 +01:00

17 lines
542 B
QBasic

'
' This file is part of the LibreOffice project.
'
' This Source Code Form is subject to the terms of the Mozilla Public
' License, v. 2.0. If a copy of the MPL was not distributed with this
' file, You can obtain one at http://mozilla.org/MPL/2.0/.
'
Sub Main
Set oContext = GetDefaultContext()
MsgBox "Connected to a running office..."
Set oServiceManager=oContext.GetServiceManager()
If IsNull(oServiceManager) Then
bAvailable = "not "
End If
MsgBox "ServiceManager is " + bAvailable + "available"
End Sub