Sure can.
FMain CODE:>>>>>>>>>>>>>>>>>>>>>>>>>
' Gambas class file
Public $hConn As Connection
Public Sub _new()
End
Public Sub Form_Open()
$hConn = New Connection
With $hConn
.Host = "/home/rocko/DataBases"
.Name = "my_test.sqlite"
.Type = "sqlite"
End With
Try $hConn.Open
If Error Then
Print "Database cannot be opened. Error = ", Error.Text
Else
Message.Info("You are now connected to the database.")
Endif
End
Public Sub btnAdd_Click()
FNew.Show
End
Public Sub btnClose_Click()
$hConn.Close
FMain.Close
End
+++++++++++++++++++++++++++++++++++++++++++++++++++++
FNew CODE:>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
' Gambas class file
'
Private rTable As Result
Public Sub btnCommit_Click()
FMain.$hConn = New Connection
FMain.$hConn.Open
rTable = FMain.$hConn.Create("inventory")
If rTable.Available Then
rTable!name = txtName.Text
rTable!type = txtType.Text
Try rTable.Update
If Error Then
Print "Update failed"
Message.Error(ERROR.Text)
Endif
Endif
DB.Commit
End
Public Sub btnCancel_Click()
FNew.Close
End
Hope that helps.
On Thu, 2012-08-09 at 21:25 +0200, Olivier Cruilles wrote:
> Can you put the code that you obtain now in a main Form and in the second
> Form please ?
>
> Cordialement,
>
> Olivier Cruilles
> Mail: [email protected]
>
> Le 9 août 2012 à 21:22, rocko <[email protected]> a écrit :
>
> > Ok I see,
> > I've added FMain.xxxx
> > but now I'm getting "Driver name missing" at FMain.Open
> >
> >
> > On Thu, 2012-08-09 at 21:08 +0200, Olivier Cruilles wrote:
> >> Hello,
> >>
> >> When you declare a variable as PUBLIC in a Form (Ex: FMain) and if you
> >> want to access to this variable from another Form you need to rewrite the
> >> first Form like that:
> >>
> >>
> >> In the second Form use this: FMain.$hConn (But only if the variable
> >> is declared as PUBLIC, not PRIVATE)
> >>
> >>
> >>
> >> Cordialement,
> >>
> >> Olivier Cruilles
> >> Mail: [email protected]
> >>
> >> Le 9 août 2012 à 20:26, rocko <[email protected]> a écrit :
> >>
> >>> If I declare a Public variable is it available across all Forms and
> >>> Modules??
> >>> I ask because I'm having difficulty with a $hConn variable
> >>>
> >>> I have a FMain form that connects to an sqlite database when the form is
> >>> opened.
> >>> Public Sub Form_Open()
> >>> $hConn = New Connection
> >>> With $hConn
> >>> .Host = "path to database"
> >>> and so on....
> >>> I have $hConn declared as Public at the top of the FMain.Class
> >>> This so far works fine, the form opens and I get the Message.Info
> >>> "You are connected to the database"
> >>>
> >>> It's when the second form loads, Have a 'Add New' button on FMain which
> >>> opens the FNew form which can be used to add a record to the database,
> >>> but I was getting an error when I click the 'Commit' button.
> >>>
> >>> Something about rTable and $hConn being NULL Objects, so I added an
> >>> $hConn = New Connection, but now I'm getting:
> >>> "Unknown Identifier" for $hConn.
> >>> here is the Code for the FNew form:
> >>>
> >>> ' Gambas class file
> >>>
> >>> '
> >>> Private rTable As Result
> >>>
> >>> 'Public $hConn As Connection
> >>>
> >>> Public Sub btnCommit_Click()
> >>>
> >>> $hConn = New Connection
> >>> ' $hConn.Open
> >>>
> >>> rTable = $hConn.Create("inventory")
> >>>
> >>> If rTable.Available Then
> >>> rTable!name = txtName.Text
> >>> rTable!type = txtType.Text
> >>> Try rTable.Update
> >>> If Error Then
> >>> Print "Update failed"
> >>> Message.Error(ERROR.Text)
> >>>
> >>> Endif
> >>> Endif
> >>>
> >>> DB.Commit
> >>>
> >>>
> >>> End
> >>>
> >>> Public Sub btnCancel_Click()
> >>>
> >>> FNew.Close
> >>>
> >>> End
> >>>
> >>> Was also getting an error on the rTable AS Result when I had in the Sub
> >>> as DIM rTable AS Result>>"Unexpected Dim"
> >>> So I moved to the top of the class, don't know if that was good Idea
> >>> though.
> >>> I thought if I declared $hConn as Public it would be available to the
> >>> Fnew form, but that doesn't seem to be the case
> >>> Any insight would be helpful..
> >>>
> >>>
> >>>
> >>>
> >>>
> >>>
> >>> ------------------------------------------------------------------------------
> >>> Live Security Virtual Conference
> >>> Exclusive live event will cover all the ways today's security and
> >>> threat landscape has changed and how IT managers can respond. Discussions
> >>> will include endpoint security, mobile security and the latest in malware
> >>> threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
> >>> _______________________________________________
> >>> Gambas-user mailing list
> >>> [email protected]
> >>> https://lists.sourceforge.net/lists/listinfo/gambas-user
> >>
> >> ------------------------------------------------------------------------------
> >> Live Security Virtual Conference
> >> Exclusive live event will cover all the ways today's security and
> >> threat landscape has changed and how IT managers can respond. Discussions
> >> will include endpoint security, mobile security and the latest in malware
> >> threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
> >> _______________________________________________
> >> Gambas-user mailing list
> >> [email protected]
> >> https://lists.sourceforge.net/lists/listinfo/gambas-user
> >
> >
> >
> > ------------------------------------------------------------------------------
> > Live Security Virtual Conference
> > Exclusive live event will cover all the ways today's security and
> > threat landscape has changed and how IT managers can respond. Discussions
> > will include endpoint security, mobile security and the latest in malware
> > threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
> > _______________________________________________
> > Gambas-user mailing list
> > [email protected]
> > https://lists.sourceforge.net/lists/listinfo/gambas-user
>
> ------------------------------------------------------------------------------
> Live Security Virtual Conference
> Exclusive live event will cover all the ways today's security and
> threat landscape has changed and how IT managers can respond. Discussions
> will include endpoint security, mobile security and the latest in malware
> threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
> _______________________________________________
> Gambas-user mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/gambas-user
------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and
threat landscape has changed and how IT managers can respond. Discussions
will include endpoint security, mobile security and the latest in malware
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
_______________________________________________
Gambas-user mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/gambas-user
