Getting quote ID from Database - Urgent

Prashant.k.m · May 12th, 2005, 05:31 AM

hi,

First change the function to (not related to compiler error)

[code]
       Function Quote() As string

        Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data Source=\\boston.co.uk\"& _
"storage\users\Dhwiren\quote.mdb"
        Dim dbConnection As System.Data.IDbConnection = New System.Data.OleDb.OleDbConnection(connectionString )

        Dim queryString As String = "SELECT MAX(QuoteID) FROM Quotes "
        Dim dbCommand As System.Data.IDbCommand = New System.Data.OleDb.OleDbCommand
        dbCommand.CommandText = queryString
        dbCommand.Connection = dbConnection

        dbConnection.open
        string strID = dbCommand.ExecuteScalar()

        Return strID
    End Function
[\code]

Now remove the parameter while calling the function

Now to the compiler Error :
Remove the line breaks(-) in you code in the area ie, from line 400 and try
You have missed somthing there may be a paranthisis ...

Prashant

Dwizz · May 12th, 2005, 05:37 AM

Prashant, I need the line continuation,
the code below executes on button click, (its the write procedure to the DB)

Code:

Sub Button1_Click(sender As Object, e As EventArgs)
    ServerSpec( _
                (CType(DropDownList1.SelectedItem.Value, String)), _
                (CType(servercolour.SelectedItem.Value, String)), _
                (CType(DropDownList2.SelectedItem.Value, String)), _
                (CType(DropDownList3.SelectedItem.Value, Integer)), _
                (CType(MemAmt.SelectedItem.Value, Integer)), _
                (CType(MemCfig.SelectedItem.Value, String)), _
                (CType(DropDownList5.SelectedItem.Value, String)), _
                (CType(DropDownList6.SelectedItem.Value, Integer)), _
                (CType(DropDownList7.SelectedItem.Value, String)), _
                (CType(raid.SelectedItem.Value, String)), _
                (CType(FDD.SelectedItem.Value, String)), _
                (CType(DropDownList8.SelectedItem.Value, String)), _
                (CType(CDType.SelectedItem.Value, String)), _
                (CType(DropDownList4.SelectedItem.Value, String)), _
                (CType(DropDownList15.SelectedItem.Value, String)), _
                (CType(Additional.Text, String)))
                msgbox("Quote Saved Successfully, QuoteID =" Quote)
End Sub

P.S I'm still getting the same Compiler error
Compiler Error Message: BC32017: Comma, ')', or a valid expression continuation expected.
pointing to line 403

Prashant.k.m · May 12th, 2005, 05:44 AM

hi,

Try to assign to some variables and call the function
Only this way you will be able to spot the problem.
Also you can print each value and see...

Prashant

Dwizz · May 12th, 2005, 05:52 AM

Hey Prashant,
I'm sorry for asking such a trivial question but how would I do that, (I'm still relatively new to VB.NET)

D

Prashant.k.m · May 12th, 2005, 05:54 AM

Wait,

msgbox("Quote Saved Successfully, QuoteID =" Quote)
Where is the & ot + before Quote

Prashant

Dwizz · May 12th, 2005, 05:58 AM

Sorry Prashant,
I know get the following compiler error,

Compiler Error Message: BC30109: 'String' is a class type, and so is not a valid expression.

Source Error:

Line 496:
Line 497: dbConnection.open
Line 498: string strID = dbCommand.ExecuteScalar()
Line 499:
Line 500: Return strID

Refering to line 498

Prashant.k.m · May 12th, 2005, 06:03 AM

hi,

Use -> dbCommand.ExecuteScalar().ToString()

Prashant

Prashant.k.m · May 12th, 2005, 06:05 AM

Wait,

Sorry, thats C# not vb style declaration

dim strID as string = dbCommand.ExecuteScalar().ToString

Prashant

Dwizz · May 12th, 2005, 06:22 AM

Thank you very much Prashant, that has seemed to cure the problem,
Thank you everyone who has helped me.

D