Sign in to follow this  
Followers 0
Edifice

[Resolved]SQLite help

6 posts in this topic

#1 ·  Posted (edited)

I did a bit of reading on SQLite. Then I found some examples. Then I found a good one:

CODE

#include <GUIConstants.au3>

#include <EditConstants.au3>

#include <SQLite.au3>

#include <SQLite.dll.au3>

$form_num = 1

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Sqlite GUI test", 223, 359, 267, 119)

$count = GUICtrlCreateInput($form_num, 144, 10, 33, 21, BitOR($ES_AUTOHSCROLL,$ES_READONLY))

$b_right = GUICtrlCreateButton(">", 176, 8, 27, 25, 0)

$b_left = GUICtrlCreateButton("<", 120, 8, 27, 25, 0)

$lname = GUICtrlCreateLabel("Name:", 8, 48, 48, 17)

$iname = GUICtrlCreateInput("", 64, 48, 145, 21)

$ladress = GUICtrlCreateLabel("Adress:", 8, 88, 45, 17)

$iadress = GUICtrlCreateInput("", 64, 88, 145, 21)

$iemail = GUICtrlCreateInput("", 64, 128, 145, 21)

$lemail = GUICtrlCreateLabel("E-mail:", 8, 128, 46, 17)

$lother = GUICtrlCreateLabel("Other:", 8, 168, 46, 17)

$eother = GUICtrlCreateEdit("", 64, 168, 145, 121)

$badd = GUICtrlCreateButton("Add", 48, 312, 75, 25, 0)

$bdel = GUICtrlCreateButton("Delete", 128, 312, 75, 25, 0)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

_SQLite_Startup()

If NOT FileExists("W:\testdatabase.db") Then

$dbn=_SQLite_Open("W:\testdatabase.db")

_SQLite_Exec($dbn,"CREATE TABLE datas (id,name,adress,email,other);")

Else

$dbn=_SQLite_Open("W:\testdatabase.db")

EndIf

dataquery($form_num)

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

progend()

Case $b_right

$form_num = $form_num + 1

GUICtrlSetData($count,$form_num)

dataquery($form_num)

Case $b_left

If $form_num == 1 Then

$form_num = 1

GUICtrlSetData($count,$form_num)

Else

$form_num = $form_num - 1

GUICtrlSetData($count,$form_num)

dataquery($form_num)

EndIf

Case $badd

IF GUICtrlRead($iname) == "" Then

MsgBox(0,"ERORR","Empty name!")

Else

dataadd($form_num)

EndIf

Case $bdel

datadel($form_num)

EndSwitch

WEnd

Func progend()

_SQLite_Close()

_SQLite_Shutdown()

Exit

EndFunc

Func dataadd($id)

Local $retarr

$str1 = GUICtrlRead($iname)

$str2 = GUICtrlRead($iadress)

$str3 = GUICtrlRead($iemail)

$str4 = GUICtrlRead($eother)

_SQLite_QuerySingleRow($dbn,"SELECT id FROM datas WHERE id='"&$id&"'",$retarr)

If $retarr[0] <> "" Then

_SQLite_Exec($dbn,"UPDATE datas SET name='"&$str1&"', adress='"&$str2&"',email='"&$str3&"',other='"&$str4&"' WHERE id='"&$id&"'")

Else

_SQLite_Exec($dbn,"INSERT INTO datas (id,name,adress,email,other) VALUES ('"&$form_num&"','"&$str1&"','"&$str2&"','"&$str3&"','"&$str4&"');")

EndIf

EndFunc

Func dataquery($id)

GUICtrlSetData($iname,"")

GUICtrlSetData($iadress,"")

GUICtrlSetData($iemail,"")

GUICtrlSetData($eother,"")

Local $retarr

If _SQLite_QuerySingleRow($dbn,"SELECT * FROM datas WHERE id='"&$id&"'",$retarr) == $SQLITE_OK Then

If $retarr[0] == "" Then

;MsgBox(0,"ERROR","Query error!")

Else

GUICtrlSetData($iname,$retarr[1])

GUICtrlSetData($iadress,$retarr[2])

GUICtrlSetData($iemail,$retarr[3])

GUICtrlSetData($eother,$retarr[4])

EndIf

EndIf

EndFunc

Func datadel($id)

Local $retarr

GUICtrlSetData($iname,"")

GUICtrlSetData($iadress,"")

GUICtrlSetData($iemail,"")

GUICtrlSetData($eother,"")

_SQLite_QuerySingleRow($dbn,"SELECT id FROM datas WHERE id='"&$id&"'",$retarr)

If $retarr[0] <> "" Then

_SQLite_Exec($dbn,"DELETE FROM datas WHERE id='"&$id&"'")

EndIf

EndFunc

This example always creates the *.db file.

Then I thought I could use parts of it in my own script:

CODE

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****

#AutoIt3Wrapper_icon=add.ico

#AutoIt3Wrapper_Compression=4

#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

#include <WindowsConstants.au3>

#include <GUIConstantsEx.au3>

#include <Date.au3>

#include <GUIConstants.au3>

#include <EditConstants.au3>

#include <SQLite.au3>

#include <SQLite.dll.au3>

$buffer = 0

Global $input_hrdwr1price, $input_hrdwr2price, $input_hrdwr3price, $input_hrdwr4price, $input_hrdwr5price, $input_tlfnr, $color, $accesory, $dbn

Global Const $CBS_DROPDOWNLIST = 0x0003

Dim $salesman = ""

Dim $client = "ADD-Data "

Dim $date = @MDAY & "-" & @MON & "-" & @YEAR

Dim $time = @HOUR & ":" & @MIN & ":" & @SEC

Dim $overslagheadline = "Overslag på reperationens pris (ikke bindende)"

Dim $int_ialtprice = $input_hrdwr1price + $input_hrdwr2price + $input_hrdwr3price + $input_hrdwr4price + $input_hrdwr5price

Dim $id = $input_tlfnr & @MDAY&@MON&@YEAR&@HOUR&@MIN&@SEC

Dim $row1 = 30

Dim $row2 = $row1 + 30

Dim $row3 = $row2 + 30

Dim $row4 = $row3 + 30

Dim $row5 = $row4 + 30

Dim $rowheight = 20

Dim $colom1 = 20

Dim $colom2 = $colom1 + 120

Dim $colom3 = $colom2 + 120

Dim $colom4 = $colom3 + 120

Dim $smallcolom1 = 30

Dim $smallcolom2 = $smallcolom1 + 80

Dim $smallcolom3 = $smallcolom2 + 80

Dim $smallcolom4 = $smallcolom3 + 80

Dim $smallcolom5 = $smallcolom4 + 80

Dim $smallcolom6 = $smallcolom5 + 80

Dim $smallcolom7 = $smallcolom6 + 80

Dim $colomwidth = 110

Dim $smallwidth = 70

$hGUI = GUICreate ($client & "RMA System", 500, 670)

GUISetIcon("add.ico")

GUIRegisterMsg($WM_MOVE, "WM_MOVE")

$hTabs = GUICtrlCreateTab (0, 0, 500, 675)

$hTabPage1 = GUICtrlCreateTabItem ("Ny Indlevering")

$label_ditnavn = GUICtrlCreateLabel("Dit Navn: ", 10, 33, 100, 20, 2)

$combo_modtager = GUICtrlCreateCombo("Alf", 110, 30, 70, 20, $CBS_DROPDOWNLIST) ; create first item

GUICtrlSetData($combo_modtager, "Claus|Lasse|Per|Jacob|Toke") ; add other item

GUICtrlCreateLabel("Date : " & $date & " Time: " & $time, 190, 33, 300, 20, 0)

$label_navn = GUICtrlCreateLabel("Navn: ", 10, 58, 100, 20, 2)

$input_navn = GUICtrlCreateInput("", 110, 55, 300, 20, 0)

$label_tlfnr = GUICtrlCreateLabel("Telefonnummer: ", 10, 83, 100, 20, 2)

$input_tlfnr = GUICtrlCreateInput("", 110, 80, 150, 20, 0)

$input_email = GUICtrlCreateInput("E-Mail", 270, 80, 140, 20, 0)

$label_indleveret = GUICtrlCreateLabel("Indleveret produkt: ", 10, 108, 100, 20, 2)

$combo_indleveret = GUICtrlCreateCombo("Almindelig PC", 110, 105, 170, 20, $CBS_DROPDOWNLIST) ; create first item

GUICtrlSetData($combo_indleveret, "B?rbar Computer|Hardware|Andet") ; add other item snd set a new default

$chkbx_garanti = GUICtrlCreateCheckbox("Garantireperation", 10, 130, 100, 20)

$combo_faknr = GUICtrlCreateCombo("Faktura nr.", 110, 130, 100, 20, 2) ; create first item

GUICtrlSetData($combo_faknr, "Ukendt") ; add other item snd set a new default

$label_overslag = GUICtrlCreateLabel($overslagheadline, 10, 450, 300, 15)

$input_antaltimer = GUICtrlCreateInput("", 10, 475, 30, 17)

$label_antaltimer = GUICtrlCreateLabel("Arbejdstimer", 45, 477, 100, 17)

$label_hrdwrlabel = GUICtrlCreateLabel("Reservedel", 10, 485, 360, 15, 1)

$input_hrdwr1 = GUICtrlCreateInput("", 10, 500, 360, 20)

$input_hrdwr1price = GUICtrlCreateInput("", 369, 500, 100, 20)

$input_hrdwr2 = GUICtrlCreateInput("", 10, 519, 360, 20)

$input_hrdwr2price = GUICtrlCreateInput("", 369, 519, 100, 20)

$input_hrdwr3 = GUICtrlCreateInput("", 10, 538, 360, 20)

$input_hrdwr3price = GUICtrlCreateInput("", 369, 538, 100, 20)

$input_hrdwr4 = GUICtrlCreateInput("", 10, 557, 360, 20)

$input_hrdwr4price = GUICtrlCreateInput("", 369, 557, 100, 20)

$input_hrdwr5 = GUICtrlCreateInput("", 10, 576, 360, 20)

$input_hrdwr5price = GUICtrlCreateInput("", 369, 576, 100, 20)

$label_ialtprice = GUICtrlCreateLabel("Pris i alt: ", 10, 600, 360, 20, 2)

$input_ialtprice = GUICtrlCreateInput($int_ialtprice, 369, 595, 100, 20)

$gemogudskriv = GUICtrlCreateButton("Gem og Udskriv", 200, 630, 100, 25)

$hTabPage2 = GUICtrlCreateTabItem ("Tjek Status")

$hindleveret = GUICreate ("", 500, 280, 0, 180, $WS_POPUP, $WS_EX_MDICHILD, $hGUI)

$hSubTabs = GUICtrlCreateTab (0, 0, 500, 280)

$hSubTabPage1 = GUICtrlCreateTabItem ("Beskrivelse")

$check_color_black = GUICtrlCreateCheckbox("Sort", $smallcolom1, $row1, $smallwidth, $rowheight)

$check_color_silver = GUICtrlCreateCheckbox("Søvl", $smallcolom2, $row1, $smallwidth, $rowheight)

$check_color_blue = GUICtrlCreateCheckbox("Blå", $smallcolom3, $row1, $smallwidth, $rowheight)

$check_color_yellow = GUICtrlCreateCheckbox("Gul", $smallcolom4, $row1, $smallwidth, $rowheight)

$check_color_green = GUICtrlCreateCheckbox("Grøn", $smallcolom5, $row1, $smallwidth, $rowheight)

$check_color_red = GUICtrlCreateCheckbox("Rød", $smallcolom6, $row1, $smallwidth, $rowheight)

$combo_brand = GUICtrlCreateCombo("Mærke", $colom1, $row2, $colomwidth, $rowheight, $CBS_DROPDOWNLIST) ; create first item

GUICtrlSetData($combo_brand, "Asus|MSI|Toshiba|Clevo|HP|Shuttle|Aopen|Calvin|Acer|Packard Bell|Samsung|Lenovo|IBM|NZXT|Antec|Apevia") ; add other item snd set a new default

$diversebskrvls = GUICtrlCreateInput("", $colom1, $row4 - 10, 450, 150)

$hSubTabPage2 = GUICtrlCreateTabItem ("Tilbehør")

$recoverymedier = GUICtrlCreateCheckbox("Recovery Medier", $colom1, $row1, $colomwidth, $rowheight)

$PSU = GUICtrlCreateCheckbox("Str?mforsyning", $colom2, $row1, $colomwidth, $rowheight)

$taske = GUICtrlCreateCheckbox("Taske", $colom3, $row1, $colomwidth, $rowheight)

$memorystick = GUICtrlCreateCheckbox("Memorystick", $colom4, $row1, $colomwidth, $rowheight)

$eksternhdd = GUICtrlCreateCheckbox("Ekstern Harddisk", $colom1, $row2, $colomwidth, $rowheight)

$eksterndvdrw = GUICtrlCreateCheckbox("Ekstern DVD/RW", $colom2, $row2, $colomwidth, $rowheight)

$manual = GUICtrlCreateCheckbox("Manual", $colom3, $row2, $colomwidth, $rowheight)

$3gmodem = GUICtrlCreateCheckbox("3G Modem", $colom4, $row2, $colomwidth, $rowheight)

$andetTlbhr = GUICtrlCreateLabel("Andet:", $colom1, $row3, $colomwidth, $rowheight)

$diversetlbhr = GUICtrlCreateInput("", $colom1, $row4 - 10, 450, 150)

$hSubTabPage3 = GUICtrlCreateTabItem ("Fejlbeskrivelse")

$fejlbeskrivelse = GUICtrlCreateInput("",0, 20, 500, 260)

GUISetState (@SW_SHOW, $hGUI)

While 1

$nMsg = GUIGetMsg ()

GUICtrlSetData($input_ialtprice, $int_ialtprice)

Select

Case $nMsg = $GUI_EVENT_CLOSE

progend()

Case $nMsg = $gemogudskriv

dataadd($id)

Case GUICtrlRead ($hTabs, 1) = $hTabPage1

If Not $buffer Then

$buffer = True

GUISetState (@SW_SHOW, $hindleveret)

GUISwitch ($hGUI)

EndIf

Case GUICtrlRead ($hTabs, 1) = $hTabPage2

If $buffer Then

$buffer = False

GUISetState (@SW_Hide, $hindleveret)

GUISwitch ($hGUI)

EndIf

EndSelect

WEnd

Func WM_MOVE($hWnd, $Msg, $wParam, $lParam)

_WinAPI_RedrawWindow($hindleveret)

EndFunc

Func generatecolor()

If GUICtrlread($check_color_black) = 1 Then

$color = $color & "Black, "

EndIf

If GUICtrlread($check_color_blue) = 1 Then

$color = $color & "Blue, "

EndIf

IF GUICtrlread($check_color_green) = 1 Then

$color = $color & "Green, "

EndIf

If GUICtrlread($check_color_red) = 1 Then

$color = $color & "Red, "

EndIf

IF GUICtrlread($check_color_silver) = 1 Then

$color = $color & "Silver, "

EndIf

If GUICtrlread($check_color_yellow) = 1 Then

$color = $color & "Yellow, "

EndIf

EndFunc

Func generateaccesory()

If GUICtrlread($recoverymedier) = 1 Then

$accesory = $accesory & "Recoverymedier, "

EndIf

If GUICtrlread($PSU) = 1 Then

$accesory = $accesory & "Strømforsyning, "

EndIf

If GUICtrlread($taske) = 1 Then

$accesory = $accesory & "Taske, "

EndIf

If GUICtrlread($memorystick) = 1 Then

$accesory = $accesory & "Memorystick, "

EndIf

If GUICtrlread($eksternhdd) = 1 Then

$accesory = $accesory & "Ekstern Harddisk, "

EndIf

If GUICtrlread($eksterndvdrw) = 1 Then

$accesory = $accesory & "Ekstern DVD/RW, "

EndIf

If GUICtrlread($manual) = 1 Then

$accesory = $accesory & "Manualer, "

EndIf

If GUICtrlread($3gmodem) = 1 Then

$accesory = $accesory & "3G Modem, "

EndIf

EndFunc

_SQLite_Startup()

If NOT FileExists("C:\RMAdatabase.db") Then

$dbn=_SQLite_Open("C:\RMAdatabase.db")

_SQLite_Exec($dbn,"CREATE TABLE datas (id,modtager,timeanddate,navn,telefonnummer,email,indleveret,garanti,fakturanummer,color,brand,diver

sebeskrivelse,accesory,diversetlbhr,fejlbeskrivelse,antaltimer,reservedel1,pris1,reservedel2,pris2,r

eservedel3,pris3,reservedel4,pris4,reservedel5,pris5,ialtprice);")

Else

$dbn=_SQLite_Open("C:\RMAdatabase.db")

EndIf

Func progend()

_SQLite_Close()

_SQLite_Shutdown()

Exit

EndFunc

Func dataadd($id)

generateaccesory()

generatecolor()

Local $retarr

$str1 = GUICtrlRead($id)

$str2 = GUICtrlRead($combo_modtager)

$str3 = GUICtrlRead($time & $date)

$str4 = GUICtrlRead($input_navn)

$str5 = GUICtrlRead($input_tlfnr)

$str6 = GUICtrlRead($input_email)

$str7 = GUICtrlRead($combo_indleveret)

$str8 = GUICtrlRead($chkbx_garanti)

$str9 = GUICtrlRead($combo_faknr)

$str10 = GUICtrlRead($color)

$str11 = GUICtrlRead($combo_brand)

$str12 = GUICtrlRead($diversebskrvls)

$str13 = GUICtrlRead($accesory)

$str14 = GUICtrlRead($diversetlbhr)

$str15 = GUICtrlRead($fejlbeskrivelse)

$str16 = GUICtrlRead($input_antaltimer)

$str17 = GUICtrlRead($input_hrdwr1)

$str18 = GUICtrlRead($input_hrdwr1price)

$str19 = GUICtrlRead($input_hrdwr2)

$str20 = GUICtrlRead($input_hrdwr2price)

$str21 = GUICtrlRead($input_hrdwr3)

$str22 = GUICtrlRead($input_hrdwr3price)

$str23 = GUICtrlRead($input_hrdwr4)

$str24 = GUICtrlRead($input_hrdwr4price)

$str25 = GUICtrlRead($input_hrdwr5)

$str26 = GUICtrlRead($input_hrdwr5price)

$str27 = GUICtrlRead($input_ialtprice)

_SQLite_QuerySingleRow($dbn,"SELECT id FROM datas WHERE id='"&$id&"'",$retarr)

If $retarr[0] <> "" Then

_SQLite_Exec($dbn,"UPDATE datas SET id='"&$str1&"', modtager='"&$str2&"',timeanddate='"&$str3&"' ,navn='"&$str4&"' ,telefonnummer='"&$str5&"',email='"&$str6&"' ,indleveret='"&$str7&"',garanti='"&$str8&"' ,fakturanummer='"&$str9&"' ,color='"&$str10&"' ,brand='"&$str11&"' ,diversebeskrivelse='"&$str12&"' ,accesory='"&$str13&"' ,diversetlbhr='"&$str14&"' ,fejlbeskrivelse='"&$str15&"' ,antaltimer='"&$str16&"' ,reservedel1='"&$str17&"' ,pris1='"&$str18&"' ,reservedel2='"&$str19&"' ,pris2='"&$str20&"' ,reservedel3='"&$str21&"' ,pris3='"&$str22&"' ,reservedel4='"&$str23&"' ,pris4='"&$str24&"' ,reservedel5='"&$str25&"' ,pris5='"&$str26&"' ,ialtprice='"&$str27&"' WHERE id='"&$id&"'")

Else

_SQLite_Exec($dbn,"INSERT INTO datas (id,modtager,timeanddate,navn,telefonnummer,email,indleveret,garanti,fakturanummer,color,brand,diver

sebeskrivelse,accesory,diversetlbhr,fejlbeskrivelse,antaltimer,reservedel1,pris1,reservedel2,pris2,r

eservedel3,pris3,reservedel4,pris4,reservedel5,pris5,ialtprice) VALUES ('"&$str1&"','"&$str2&"','"&$str3&"','"&$str4&"','"&$str5&"','"&$str6&"','"&$str7&"','"&$str8&"','"&$str9&"','"&$str10&"','"&$str11&"','"&$str12&"','"&$str13&"','"&$str14&"','"&$str15&"','"&$str16&"','"&$str17&"','"&$str18&"','"&$str19&"');")

EndIf

EndFunc

I know I still need to be able to get data from my database, and this brings my to my question. Why doesn't my version of the script create any *.db file?! I just don't get it?!

You already know it, but it doesn't hurt to say it: Any help would be greatly appreciated! :)

Edited by Edifice

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

I would recommend that you add an error check to your _SQLite_Open() function... I would also recommend that you have the else statement as they do in the above example, or more as I do below. You don't really require the "If FileExists()" section due to if the file exists it will open, if it doesn't exist it will create it. Next you may want to check to see if a particular table exists before you continue to create a table. I wrote a small script to "re-create" my database as I was testing an application. See in my second code box below.

_SQLite_Startup()
If @error > 0 Then
    _ErrorMsg("Error Loading Library")
    _TerminateApp()
EndIf

_SQLite_Open("C:\RMAdatabase.db")
If @error > 0 Then
    _ErrorMsg("Error Loading Database")
    _TerminateApp()
EndIf

Func _ErrorMsg($message, $timeout = 0)
    MsgBox(48 + 262144, "Error!", $message, $timeout)
EndFunc

Func _TerminateApp()
    _SQLite_Close()
    _SQLite_Shutdown()
    Exit
EndFuncoÝ÷ Ù­æ­yÖ­i¶¬y«­¢+ØìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐì(ì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì(íAɽɴ9µè%
ÉÑ%µ(íÍÉ¥ÁÑ¥½¸è%
ÉÑÌ¥±µ%¹àµ¥¹Ñͽȥ±¥¹á¥¹¸(í¥±¹µè$%
ÉÑ%µ¹ÔÌ(íUÍ]¥Ñ è$$(í
ÉÑäè%)ÉÙ¥Ì(MÑÕ±¥±¡ÍÕÁÁ½ÉÐÅÕ½ÐíÐÅÕ½ÐìÙ½ÉÑáÉÙ½±ÕÑ¥½¹ÌÅÕ½Ðí½ÐÅÕ½Ðì½´¤(í
Éѽ¸è$ÀÔ¼ÄܼÈÀÀØ(í5½¥¥½¸è$(í5½¥¥äè$(íYÉÍ¥½¸è$$ĸÀ¸À(í
½ÁåÉ¥¡Ðè$%
½ÁåÉ¥¡Ð¡¤ÈÀÀØY½ÉÑàIÙ½±ÕÑ¥½¹Ì¸±°I¥¡ÑÌIÍÉÙ¸(ì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì±Ðì(ìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐìÐì(¥¹±ÕÅÕ½ÐíME1¥ÑÀäÈíÍű¥Ñ¹ÔÌÅÕ½Ðì((ÀÌØíÑ¥µÈôQ¥µÉ%¹¥Ð ¤)}ME1¥Ñ}MÑÉÑÕÀ ¤)%ÉɽÈÐìÀQ¡¸(%5Í ½à À°ÅÕ½ÐìÅÕ½Ðì°ÅÕ½ÐíÉɽȱ½¥¹ME1¥Ñ¹±°ÅÕ½Ðì¤(%á¥Ð)¹%)}ME1¥Ñ}=Á¸ ÅÕ½Ðí¥¹ÅÕ½Ðì¤()}ME1¥Ñ}EÕÉå9½IÍձР´Ä°ÅÕ½ÐíI=@Q 1%¹àÅÕ½Ðì¤)}ME1¥Ñ}EÕÉå9½IÍձР´Ä°ÅÕ½Ðí
IQQ 1%¹à¡%%9QHAI%5Id-dUQ=%9
I59P°AÉ¥%9QH°M±±ÈQaP9=P9U10°    ÕåÈQaP9=P9U10°
±½ÍQaP9=P9U10°AÉÍÌQaP9=P9U10°1¹ÐQaP9=P9U10°M¹ÐQaP9=P9U10°AÑ QaP9=P9U10°¥±QaP9=P9U10¤ìÅÕ½Ðì¤()}ME1¥Ñ}
±½Í ¤)}ME1¥Ñ}M¡Õѽݸ ¤(ÀÌØí¥ôQ¥µÉ¥ ÀÌØíÑ¥µÈ¤()5Í   ½à À°ÅÕ½ÐíQÍÐÅÕ½Ðì°ÀÌØí¥

Edit: Added code, and changed some wording...

I hope that helps,

Jarvis

Edited by JSThePatriot

AutoIt Links

File-String Hash Plugin Updated! 04-02-2008 Plugins have been discontinued. I just found out.

ComputerGetInfo UDF's Updated! 11-23-2006

External Links

Vortex Revolutions Engineer / Inventor (Web, Desktop, and Mobile Applications, Hardware Gizmos, Consulting, and more)

Share this post


Link to post
Share on other sites

Thanks man! - I now Realize my stupid mistake :)

Share this post


Link to post
Share on other sites

Thanks man! - I now Realize my stupid mistake :)

Edifice,

Was what I suggested the solution or another mistake? I just wanted to clarify for anyone else that may search the forum.

Thanks,

Jarvis


AutoIt Links

File-String Hash Plugin Updated! 04-02-2008 Plugins have been discontinued. I just found out.

ComputerGetInfo UDF's Updated! 11-23-2006

External Links

Vortex Revolutions Engineer / Inventor (Web, Desktop, and Mobile Applications, Hardware Gizmos, Consulting, and more)

Share this post


Link to post
Share on other sites

Edifice,

Was what I suggested the solution or another mistake? I just wanted to clarify for anyone else that may search the forum.

Thanks,

Jarvis

Partly both. When putting in those error check-thingies i wondered why I didn't get any of them. Then I realized that the function wasn't called anywhere in the script, and I just placed in aaaaallllllll the way in the top :)

Now I am getting my beloved *.db file :)

Share this post


Link to post
Share on other sites

Most excellent! Great work!

Jarvis


AutoIt Links

File-String Hash Plugin Updated! 04-02-2008 Plugins have been discontinued. I just found out.

ComputerGetInfo UDF's Updated! 11-23-2006

External Links

Vortex Revolutions Engineer / Inventor (Web, Desktop, and Mobile Applications, Hardware Gizmos, Consulting, and more)

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