Sign in to follow this  
Followers 0
rahuroy

Help needed

6 posts in this topic

Hi Manadar,

Small help needed to complete my script

I am writing script for installation of application. Before starting installing i have to verify existence of database and if it exists then i have to drop it.Below is snippet of code where i am connecting to server and running query.But after querying , how to verify if database exists already? Please provide some suggestions.Thanks in advance.

; $fAuthMode - Authorization mode (0 = Windows Logon, 1 = SQL) (default = 0)

OnAutoItExitRegister("_Exit")

Func _Exit()

MsgBox(0,"@ExitCode",@exitCode)

EndFunc

Global $Ignore, $Ini, $Installer, $Pid,$GUID,$squery,$result,$fAuthMode,$xnn,$ynn,$query

$Ini = @ScriptDir & "\Install.ini"

Global $username = IniRead($INI, "EMSettings", "IS_NET_API_LOGON_USERNAME", "")

Global $password = IniRead($INI, "EMSettings", "IS_NET_API_LOGON_PASSWORD", "")

Global $sqlserver = IniRead($INI, "EMSettings", "IS_SQLSERVER_SERVER", "")

Global $sqlusername = IniRead($INI, "EMSettings", "sqlloginname", "")

Global $sqlpwd = IniRead($INI, "EMSettings", "sqlpassword", "")

Global $emdbname = IniRead($INI, "EMSettings", "IS_SQLSERVER_DB", "")

Global $fAuthMode = IniRead($INI, "EMSettings", "AuthMode", "") ; $fAuthMode - Authorization mode (0 = Windows Logon, 1 = SQL) (default = 0)

Global $sQuery="select * from master.dbo.sysdatabases where name =' & $emdbname & '"

If $fAuthMode=0 Then

$xnn="Provider=SQLOLEDB;Data Source= " & $sqlserver & ";Trusted_Connection=Yes;"

$sqlCon = ObjCreate("ADODB.Connection")

$sqlCon.Open($xnn)

if @error Then

MsgBox(0, "ERROR", "Failed to connect to the database")

Exit

Else

MsgBox(0, "Success!", "Connection to database successful!")

EndIf

$query=_SQLQuery($sqlCon,$sQuery)

If $query=1 Then $sqlCon.Execute("DROP DATABASE " & $emdbname)

else

$ynn="Provider=sqloledb;Data Source=" & $sqlserver & ";Network Library=DBMSSOCN;User ID=" & $sqlusername &";Pwd=" & $sqlpwd & ";"

$sqlCon = ObjCreate("ADODB.Connection")

$sqlCon.Open($ynn)

if @error Then

MsgBox(0, "ERROR", "Failed to connect to the database")

Exit

Else

MsgBox(0, "Success!", "Connection to database successful!")

EndIf

$query=_SQLQuery($sqlCon,$sQuery)

MsgBox(0,"",$query)

If $query=1 Then $sqlCon.Execute("DROP DATABASE " & $emdbname)

EndIf

Func _SQLQuery($sqlCon, $sQuery)

If IsObj($sqlCon) Then Return $sqlCon.Execute($sQuery)

Return

EndFunc

Share this post


Link to post
Share on other sites



Hello rahuroy,

after the "DROP DATABASE" you could just end the connection and try reconnecing to it. If it fails then your DB is no longer existant.

:)

Regards,

Hannes

;)


Regards,Hannes[spoiler]If you can't convince them, confuse them![/spoiler]

Share this post


Link to post
Share on other sites

Just two other hints:

Use headlines that are more specific then "Help Needed"

Don't address topics directly to Forum members, use PM for this. People tend to ignore when they don't feel addressed.

:)

Regards,

Hannes

;)


Regards,Hannes[spoiler]If you can't convince them, confuse them![/spoiler]

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

Don't address topics directly to Forum members, use PM for this.

I personally wouldn't recommend PM'ing them either. :) As mentioned in the past, having code in the Public domain gives new users the ability to learn. Edited by guinness

_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_BinaryBin()_CheckMsgBox()_CmdLineRaw()_ContextMenu()_ConvertLHWebColor()/_ConvertSHWebColor()_DesktopDimensions()_DisplayPassword()_DotNet_Load()/_DotNet_Unload()_Fibonacci()_FileCompare()_FileCompareContents()_FileNameByHandle()_FilePrefix/SRE()_FindInFile()_GetBackgroundColor()/_SetBackgroundColor()_GetConrolID()_GetCtrlClass()_GetDirectoryFormat()_GetDriveMediaType()_GetFilename()/_GetFilenameExt()_GetHardwareID()_GetIP()_GetIP_Country()_GetOSLanguage()_GetSavedSource()_GetStringSize()_GetSystemPaths()_GetURLImage()_GIFImage()_GoogleWeather()_GUICtrlCreateGroup()_GUICtrlListBox_CreateArray()_GUICtrlListView_CreateArray()_GUICtrlListView_SaveCSV()_GUICtrlListView_SaveHTML()_GUICtrlListView_SaveTxt()_GUICtrlListView_SaveXML()_GUICtrlMenu_Recent()_GUICtrlMenu_SetItemImage()_GUICtrlTreeView_CreateArray()_GUIDisable()_GUIImageList_SetIconFromHandle()_GUIRegisterMsg()_GUISetIcon()_Icon_Clear()/_Icon_Set()_IdleTime()_InetGet()_InetGetGUI()_InetGetProgress()_IPDetails()_IsFileOlder()_IsGUID()_IsHex()_IsPalindrome()_IsRegKey()_IsStringRegExp()_IsSystemDrive()_IsUPX()_IsValidType()_IsWebColor()_Language()_Log()_MicrosoftInternetConnectivity()_MSDNDataType()_PathFull/GetRelative/Split()_PathSplitEx()_PrintFromArray()_ProgressSetMarquee()_ReDim()_RockPaperScissors()/_RockPaperScissorsLizardSpock()_ScrollingCredits_SelfDelete()_SelfRename()_SelfUpdate()_SendTo()_ShellAll()_ShellFile()_ShellFolder()_SingletonHWID()_SingletonPID()_Startup()_StringCompact()_StringIsValid()_StringRegExpMetaCharacters()_StringReplaceWholeWord()_StringStripChars()_Temperature()_TrialPeriod()_UKToUSDate()/_USToUKDate()_WinAPI_Create_CTL_CODE()_WinAPI_CreateGUID()_WMIDateStringToDate()/_DateToWMIDateString()Au3 script parsingAutoIt SearchAutoIt3 PortableAutoIt3WrapperToPragmaAutoItWinGetTitle()/AutoItWinSetTitle()CodingDirToHTML5FileInstallrFileReadLastChars()GeoIP databaseGUI - Only Close ButtonGUI ExamplesGUICtrlDeleteImage()GUICtrlGetBkColor()GUICtrlGetStyle()GUIEventsGUIGetBkColor()Int_Parse() & Int_TryParse()IsISBN()LockFile()Mapping CtrlIDsOOP in AutoItParseHeadersToSciTE()PasswordValidPasteBinPosts Per DayPreExpandProtect GlobalsQueue()Resource UpdateResourcesExSciTE JumpSettings INISHELLHOOKShunting-YardSignature CreatorStack()Stopwatch()StringAddLF()/StringStripLF()StringEOLToCRLF()VSCROLLWM_COPYDATAMore Examples...

Updated: 04/09/2015

Share this post


Link to post
Share on other sites

Well, what to say except... right, 100 of 100 Points. :)


Regards,Hannes[spoiler]If you can't convince them, confuse them![/spoiler]

Share this post


Link to post
Share on other sites

Maybe it was more like "Good morning Vietnam".

Manadar.


♡♡♡

.

eMyvnE

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0