Jump to content

Sky Slate Blueberry Blackcurrant Watermelon Strawberry Orange Banana Apple Emerald Chocolate
Photo

Sql mit ahk


  • Please log in to reply
19 replies to this topic
Voign
  • Members
  • 54 posts
  • Last active: Sep 08 2015 07:49 PM
  • Joined: 20 Oct 2014

ich hab leider noch keine lösung 

 

aber ich wäre dir echt dankbar wenn du mir ein beispiel zu sqllite_exec schreiben könntest das ich dann

 

TestInsert(mydb){
}
 
hier einfügen kann :)
 
ich griegs nicht gebacken ;/


hd0202
  • Members
  • 709 posts
  • Last active: Feb 14 2016 08:05 PM
  • Joined: 13 Aug 2006

Moin,

 

hier mein Code-Beispiel:

TestInsert(mydb){
	
	oldname := "Name3"
	sql := "delete from test where Name = '" oldname "'"
	msgbox, % sql
	runsql(sql)
	
	oldname := "Name4"
	oldfname := "Fname4"
	newname := "Tester"
	newfname := "Hugo"
	sql := "update test set Name = '" newname "', Fname = '" newfname "' where Name = '" oldname "' and Fname = '" oldfname "'"
	msgbox, % sql
	runsql(sql)
}

Da ich annehme, dass du mit "DBAExampleOOP.ahk" testest, heisst es hier "RUNSQL(sql-statement)" statt "SQLite_Exec(db, sql-statement)".

 

Viel Erfolg!

 

Hubert



Voign
  • Members
  • 54 posts
  • Last active: Sep 08 2015 07:49 PM
  • Joined: 20 Oct 2014

danke hd0202 hat mir sehr geholfen ;)

 

meine lösung:

 

TestInsert(mydb){
 
oldname := "name3"
sql := "delete from player where playerid = '" oldname "'"
runsql(sql)
 
;Table Layout: Name, Fname, Phone, Room
 
record := {}
record.playerid := "name5"
record.accountstatus := "Wayland2"
record.accountprivileges := "1337"
record.LastUpdateTime := "No idea for what this is good for"
record.avatar := "No idea for what this is good for"
record.GameObjects := "No idea for what this is good for"
 
mydb.Insert(record, "player") ; insert a single record into table test
 
 
RunSQL("SELECT * FROM player")
}
 
 
Nur vielleicht noch eine frage ist es sehr aufwendig die komplette datenbank in eine text datei zuspeichern
 
und dann einzelne sachen zulöschen wenn vorhanden und wieder reinzuspeichern?


hd0202
  • Members
  • 709 posts
  • Last active: Feb 14 2016 08:05 PM
  • Joined: 13 Aug 2006

abgeleitet von ShowRecordSet:

unload(mydb)

unload(db, sQry := "select * from player", file := "unload.csv"){
    rs := db.OpenRecordSet(sQry)

    ; Delete existing data
    fileh := fileopen(file, "w")

    ; fetch all data
    columns := rs.getColumnNames()
    columnCount := columns.Count()
    
    line =
    for each, colName in columns
        line .= colName ","
    stringtrimright, line, line, 1
    fileh.writeline(line)
    
    while(!rs.EOF){    
        line =
        Loop, % columnCount
            line .= rs[A_index] ","
        stringtrimright, line, line, 1
        fileh.writeline(line)
        rs.MoveNext()
    }
    fileh.close()
}

Hubert



Voign
  • Members
  • 54 posts
  • Last active: Sep 08 2015 07:49 PM
  • Joined: 20 Oct 2014

Danke werd ich mir die tage mal anschaun, wenn ich sql dann benötige.

hast mir wirklich sehr geholfen 

Aber schau mal in dein Postfach :)