` Printed Icetips Article
Icetips Article

SQL Related Articles: Create a MSDE database from Clarion
2003-01-20 -- Greg Berthume
Newsgroups: comp.lang.clarion

I used PowerRUN to execute the following after MSDE is installed:

!Button Code
BEEP(BEEP:SystemExclamation)  ;  YIELD()
Btn#=MESSAGE('WARNING:  MS SQL Server 7 or MSDE must first be running on '&|
     ' the PC.'&|
     '||Do you really want to Create the Database and User Logins?', |
     'Create SQL Database and User Logins', ICON:Exclamation, |
      BUTTON:Yes+BUTTON:No, BUTTON:Yes, 0)
IF Btn# = BUTTON:Yes
   GetServer    ! Prompt for Server Name
   IF GLO:ServerName
      CreateDB
   End
End

!CreateDB Procedure's PowerRUN Extension setting
!'c:\mssql7\binn\osql.exe -S' & GLO:ServerName & ' -Usa -P -i qde30.sql'

I embedded the following code to install MSDE:

! Button Code
BEEP(BEEP:SystemQuestion)  ;  YIELD()
Btn#=MESSAGE('Do you really want to install MSDE?', |
     'MS Data Engine Installation', ICON:Question, |
      BUTTON:Yes+BUTTON:No, BUTTON:Yes, 0)
IF Btn# = BUTTON:Yes
   BEEP(BEEP:SystemAsterisk)  ;  YIELD()
   MESSAGE('A status bar is displayed during part of the installation, but '&|
           'the setup will continue for several minutes after the status bar '&|
           'is no longer displayed.'&|
           '||To verify MSDE has been completely installed, \MSSQL7 should have '&|
           'been created, there should be a new group on the Start\Programs menu '&|
           'called MSDE and \windows\setup.log should contain a ResultCode setting '&|
           'of 0 and a Completed Status of 1 indicating a successfull installation.'&|
           '||Please reboot the computer after the installation is complete so '&|
           'that the \MSSQL7 folder is added to the PATH.', |
           'MS Data Engine Installation Message', ICON:Asterisk)
   TIPath=path()
   P#=LEN(TIPath)
   IF P#>3
      IPath=TIPath & '\'
   ELSE
      IPath=TIPath
   End
   LOC:MSDECMD = 'msdex86.exe -a -f1 "' & IPath & 'unattend.iss"'      ! prefix -s for
silent install
   RUN(LOC:MSDECMD)
End

Here's some code for "SQL Server Client Connectivity":

BEEP(BEEP:SystemQuestion)  ;  YIELD()
Btn#=MESSAGE('Do you wish to install silently (no interface) ?', |
     'MS SQL Server 7 Client Connectivity Installation', ICON:Question, |
      BUTTON:Yes+BUTTON:No+BUTTON:Cancel, BUTTON:Yes, 0)
IF Btn# = BUTTON:Yes
   BEEP(BEEP:SystemAsterisk)  ;  YIELD()
   MESSAGE('Please wait while the installation occurs.', |
           'MS SQL Client Install', ICON:Asterisk)
   SETCURSOR(CURSOR:Wait)
   RUN('mdac_typ.exe /q:a /c:"setup.exe /qt"',1)
   SETCURSOR()
   BEEP(BEEP:SystemAsterisk)  ;  YIELD()
   MESSAGE('Installation Completed!', |
           'MS SQL Client Install', ICON:Asterisk)
ELSIF Btn# = BUTTON:No
    ?Window{PROP:Hide}=True
    RUN('mdac_typ.exe')
    ?Window{PROP:Hide}=False
ELSIF Btn# = BUTTON:Cancel
End


Greg Berthume
Berthume Software
www.berthume.com

Coming Soon: cpTracker 2003 (Software Project Management System)

"KEVIN PLUMMER"  wrote in message
news:3e2b5101@news.softvelocity.com...
> Hi,
>
> I'm looking to move a TPS application across to SQL. Most of my users are
> less than 5 users so I thought MSDE was a good option with bigger users
able
> to scale up using MSSQL2000.
>
> It is easy enough to create a MSDE installation disk, but how do I create
a
> database from an install disk ? Even using FM3 you have to create the
> Database first which is easy if you have the tools installed on your
machine
> but I don't want my users to have to do anything - just install and start
> using like TPS installation.
>
> Has anyone had any experience with this ?
>
> Cheers,
>
> Kevin
>
>
>
>
>
Printed May 12, 2024, 7:41 am
This article has been viewed/printed 35123 times.
Google search has resulted in 137 hits on this article since January 25, 2004.