Paul Hartland
paul.hartland at googlemail.com
Sun Feb 15 17:21:14 CST 2015
Ah eventually sorted this thank you for all replies, think I go code blind
sometimes lol
On 12 February 2015 at 18:34, Charlotte Foust <charlotte.foust at gmail.com>
wrote:
> My VB.Net is rusty, but the way you're setting the selected value should be
> fine. I'm just not clear on why you need to set a combobox value as
> selected. Is it to show the user that they're on the right record?
>
> In any case, updating the SQL table is a separate step from updating the
> data table you've built. You generally use an SP that adds a record to the
> SQL table for that or updates one, because that's all you're doing,
> appending or updating a record in the back end. As to updating the data
> table, you've bound the controls to it, so you should be able to just
> update it, assuming it's a virtual table, and keep working with it.
>
> Charlotte
>
> On Thu, Feb 12, 2015 at 7:41 AM, Paul Hartland <
> paul.hartland at googlemail.com
> > wrote:
>
> > Not quite, the combo box works perfect drops down the whole selection
> list,
> > if I select one I can show the ValueMember and DisplayMember and if I
> hard
> > code something like
> >
> > Me.cmbRequestCodes.SelectedValue = 4 then the combo box displays the
> > correct text 'Incorrect Description'
> >
> > I have a data table called 'tblPIPRequests' built as below:
> >
> > cmdPIPRequests.Connection = pADOPIPConn
> > cmdPIPRequests.CommandText = "phPIP_SelectSingleRequest"
> > cmdPIPRequests.CommandType = CommandType.StoredProcedure
> >
> > cmdPIPRequests.Parameters.AddWithValue("intRequestID", pLngPIPRequestID)
> >
> > dapPIPRequests.SelectCommand = cmdPIPRequests
> >
> > ' Create an instance of a DataSet, and retrieve data from the Requests
> > table.
> > dapPIPRequests.FillSchema(datPIPRequests, SchemaType.Source,
> "PIPRequests")
> > dapPIPRequests.Fill(datPIPRequests, "PIPRequests")
> >
> > tblPIPRequests = datPIPRequests.Tables("PIPRequests")
> >
> > drCurrent = tblPIPRequests.Rows.Find(pLngPIPRequestID)
> >
> > Now one of the fields that the data table brings back is RequestCode and
> I
> > need to assign this to the combo box to show the DisplayMember of the
> > corresponding RequestCode. I have tried
> >
> > Me.cmbRequestCodes.SelectedValue = drCurrent!RequestCode
> >
> > Which works, but not sure if this is the correct way to do all this, as I
> > say I am only just learning VB.net/Express.
> >
> > Any help on this is greatly appreciated.
> >
> > Also as you can see from the code where I create the data table
> > 'tblPIPRequests' I use a stored procedure to bring back the results, the
> > form will allow the user to edit one or two of the fields via bound text
> > boxes, being bound like below:
> >
> > Me.txtResolvedBy.DataBindings.Add("Text", tblPIPRequests,
> "ResolvedByName")
> >
> > What I haven't been able to figure out is, once the user clicks the save
> > button on the form, how to update the data table 'tblPIPRequests' and the
> > SQL Datasource. Do I have to change from using a stored procedure to a
> > basic select statment for the table ? (as I read somewhere that UPDATE,
> > INSERT & DELETE's would automatically be created !!!!!)
> >
> > Thanks again in advance for any help on this.
> >
> > Paul
> >
> >
> > On 12 February 2015 at 14:28, Bill Benson <bensonforums at gmail.com>
> wrote:
> >
> > > Paul, why not just set the bound columnwidths property such that the
> > column
> > > you want has a width of 0? That is what I normally do if I take your
> > > meaning.
> > >
> > > On Thu, Feb 12, 2015 at 3:01 AM, Paul Hartland <
> > > paul.hartland at googlemail.com
> > > > wrote:
> > >
> > > > To all,
> > > >
> > > > I have only really developed in MS Access and Visual Basic 6.0....I
> am
> > > on a
> > > > learning curve at work where we have Visual Studio Express 2012
> > installed
> > > > on my machine. I have the following code to populate a combobox :
> > > >
> > > > Dim adtRequestCodes As New SqlDataAdapter()
> > > > Dim dsRequestCodes As New DataSet()
> > > > Try
> > > > Dim cmdPIPRequestCodes As New SqlCommand()
> > > > cmdPIPRequestCodes.Connection = pADOPIPConn
> > > > cmdPIPRequestCodes.CommandText = "phPIP_RequestCodes"
> > > > cmdPIPRequestCodes.CommandType =
> > CommandType.StoredProcedure
> > > > adtRequestCodes.SelectCommand = cmdPIPRequestCodes
> > > > adtRequestCodes.Fill(dsRequestCodes)
> > > > adtRequestCodes.Dispose()
> > > > cmdPIPRequestCodes.Dispose()
> > > > Me.cmbRequestCodes.DataSource = dsRequestCodes.Tables(0)
> > > > Me.cmbRequestCodes.ValueMember = "ReasonID"
> > > > Me.cmbRequestCodes.DisplayMember = "ReasonCode"
> > > > Catch ex As Exception
> > > > MsgBox(ex.Message)
> > > > End Try
> > > >
> > > > This works as it populates the ComboBox. However I have datatable
> > called
> > > > tblPIPRequests which I use to populate textboxes with data using
> > > something
> > > > like '
> > > >
> > > > Me.txtResolvedBy.DataBindings.Add("Text", tblPIPRequests,
> > > "ResolvedByName")
> > > > '. But can't figure out how to have the combobox show the value of
> > > > RequestCode from the datatable
> > > >
> > > > I.e. in the datatable 'tblPIPRequests' say the 'RequestCode' is 4 I
> > need
> > > > the combobox to show the 'ReasonCode' associated with RequestCode 4
> > which
> > > > would be 'Incorrect Desription'
> > > >
> > > >
> > > > It may even be that I have set this all up wrong for what I need, I
> > have
> > > > been googling here and there just to get where I am now.
> > > >
> > > > Any help GREATLY appreciated.
> > > >
> > > > --
> > > > Paul Hartland
> > > > paul.hartland at googlemail.com
> > > > --
> > > > AccessD mailing list
> > > > AccessD at databaseadvisors.com
> > > > http://databaseadvisors.com/mailman/listinfo/accessd
> > > > Website: http://www.databaseadvisors.com
> > > >
> > > --
> > > AccessD mailing list
> > > AccessD at databaseadvisors.com
> > > http://databaseadvisors.com/mailman/listinfo/accessd
> > > Website: http://www.databaseadvisors.com
> > >
> >
> >
> >
> > --
> > Paul Hartland
> > paul.hartland at googlemail.com
> > --
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> >
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
--
Paul Hartland
paul.hartland at googlemail.com