Private Sub ComboBox6_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox6.SelectedIndexChanged
con = New SqlConnection("Data Source=DEW-D63D9D2D032SQLEXPRESS;Initial
[code].....
I got a SQL statement where am selecting from an access database in vb but I get this error; "syntax error in query expression select sum(brought_qtty)" when I run my program. I imagine am doing the right thing but seems am not. How can I adjust this select? The code is below:
"select distinct(brought_price) as [Price], select sum(brought_qtty) as [Ordinary] from brought_coffee where " & _"coffee_grade=O, select sum(brought_qtty) as [Premium] from brought_coffee where" & _"coffee_grade=P, sum(brought_qtty) as [Total Qtty]" & _", sum(brought_paid) as [paid], " & _"sum(brought_bal) as [Balance]" & _"from brought_coffee, farmer where brought_date=#" & dtc.Text.Trim & "# and farmer_centre='" & cc.Text.Trim & _"' and farmer.farmer_num=brought_coffee.farmer_num"
Select Case currentNodeName
Case "string1","string2","string3","stringEtc"
Case Else
[Code]....
The above is a code snippet... of course I've already made my declarations earlier in the code. My issue is I get the error " 'Select Case' must end with a matching 'End Select'." It looks to me like VB is not liking my If statement with the "Next For" in the middle. I'm sure this is a basic syntax issue.
Basically, I have the following sql select statement in vb.net.[code]...
From the above statement, I would like retrieve several data and the count of Traceid from trn_Invt_Details where the traceid in trn_Invt_Details match with traceid in trn_Invt. By the way, it will also based on the criteria where the field of ErrorType in Trn_Invt_Details is Null or contain empty string. Then it will retrieve out the count of traceid.Finally, all the results will save to dataset in vb.net
[code]...
im getting an error with my SELECT statement. Cant see whats wrong, but i must be missing something?
I have a small vba in xls 2003:
[Code]...
The command works but im getting an incorect time It returns 15/9/2009 12:00:00 the date is fine (was ok when this thread was written)but the time is always the same 12:00:00 Is something wrong with the server or am i entering not the right command?
View 1 Replieswhy I am getting the error pictured below. In this case, the variable DT has the value "REAL"
View 2 Repliesit seems when the treeview loads I get an error [code]I cannot get the error in debug mode.
View 4 RepliesFor some sort of reason, which I can't seem to spot, this fails and I get a #Name? error. When I tried to do this, I use pretty much the same code in another place in my form; the only difference is the "cbo" and the names of my txt and alike.
[code]...
Can anyone spot my error? What I wish the code would do is when I Select something in my cboVarenummer, the TextBox txtVarenavn changes its text to what the sql statement returns.
Using vb2005 and .Net 2.0. I've been trying for some time to get my query to work. I've posted my issue on several forums but no one been able to asssist me. From code behing I need to query Active Directory and have following issues:
1. I need to select only where "title" is empty and
2. I need to do a LIKE on sAMAccountName
[Code]...
CODE:
And the following sub routine is load in the Listbox_selectedindexchanged event
CODE:
And listitem class
CODE:
And subsequently I want to Design the select query by adding the three column i.e. First Name, Middle Name and Last Name in the Listbox and by selecting the list item that will show in text box.
I am trying to select a row in a datatable using the datatable.select method as described in the help files. There are several examples and here is a typical one: Private Sub GetRowsByFilter() Dim t As DataTable t = DataSet1.Tables("Orders") ' Presuming the DataTable has a column named Date. Dim strExpr As String strExpr = "Date > '1/1/00'" Dim foundRows() As DataRow ' Use the Select method to find all rows matching the filter.foundRows = t.Select(strExpr) Dim i As Integer ' Print column 0 of each returned row. For i = 0 to foundRows.GetUpperBound(0) Console.WriteLine(foundRows(i)(0)) Next i End Sub The intellisense comes up with an error on the 'select' line: "value of type '1-dimensional array of system.data.datarow' cannot be converted to 'system.data.datarow'
View 5 RepliesI have a combobox the has12345in it, Does a function, Then changes to the next one
View 17 Replieswhile I am inserting the data through textbox of the selected item of the list box I want the when the user will input the data into textbox and then pressing the insert button the the selected item of list box (selected item only color change) color change white into blue or red.
View 1 RepliesHow can I catch error if the data that user select not in database?
This is my code.[code...]
Not sure what I am doing wrong, but here is the code.
SQL Server Express 2008 R2
VB 2010
Private Sub FillDataSetAndViewGrid()
[Code].....
I keep getting an error saying "there is an error in your sql syntax." when i use this sql statement:SELECT * FROM gsm_oceanwide_integrationEDIT:To put this in context heres the code im using this query statement in (VB.net):
Dim con As MySqlConnection = New MySqlConnection("Data Source=" & frmLogin.txtserver.Text & ";Database=stratocast;User ID=" & frmLogin.txtusername.Text & ";Password=" & frmLogin.txtpassword.Text & ";")
[code]......
in below code there is syntax error in from Clause but i think every thing looks fine iam using access database thx and relation is fine between thes two table
Public Function GetGridData() As DataTable
Dim dt As New DataTable
Try
[code].....
I use an XPathNavigator Select to get a node iterator in the code below and get an invalid token error. If I take out the @contract I do not get an error. I then have to use MoveToAttribute, which works, but shouldn't be needed. Why do I get an error when the @ syntax is valid XPath?
Const pth = "configuration/system.serviceModel/services/service/endpoint@contract"
Private Sub OpenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenToolStripMenuItem.Click
With OpenFileDialog1
[CODE]...
VBA error 1004 - select method of range class failed
View 2 RepliesI am using select command for one of my button
Dim edit1 As OleDbCommand = New OleDbCommand("select * from [exporter] where exp_id='" & t1.Text & "'", con1)
now:-
t1 is a textbox
and in my table exp_id is "Number" now when i run this i get an error at the time executing reader (Data type mismatch in criteria expression.) but when i change exp_id properties to "Text" it run's properly
i am trying to bind a dropDownList control to a select query that has a parameter.the query itself runs fine on sqlserver database when the paramter is replaced with an actual datetime variable.the basic query is: SELECT DISTINCT DeliveryZone FROM dbo.tblComplaints WHERE (DeliveryZone IS NOT NULL)AND (DeliveryZone NOT IN ('**', '??', 'EE', 'T', 'M'))[code]
View 1 Repliesi need to select some records from table Tr_cashbook between two date. the date field is newdt in which i need to compare data and the records should be shown in crystal report named rptCash2. the newdt field has datetime property. here is the code on the command button
bdcon.Open()
Dim QueryString As String
QueryString = "Select * from Tr_Cashbook where (Cast(newdt as date)>= " &
[Code]...
but this is not working when i press the command button it gives error as operand type clash: date is incompatible with int.
I'm trying to use a nested multi-line lambda Function in VB.NET and am getting an error. Here's what my code looks like:
cartItems = cartItems.Select(Function(ci) New With {.CartItem = ci, .Discount = discountItems.FirstOrDefault(Function(di) di.SKU = ci.SKU)})
.Select(Function(k)
If k.Discount Is Not Nothing Then
[code]....
I get this error at the Commit of a transaction in a desktop application:
This OleDbTransaction has completed; it is no longer usable.
Other posts I have seen with similar error suggests this can occur if it takes a long time, or contains large amounts of data. This is not the case here.Logging tells me it takes 140 ms from Begin to Commit and about 10 commands executed inside the transaction.It is using an Oracle database.This class is a simplified version of my database class:
Class MyDatabase
Private mConnection AS OleDbConnection
Private mTransaction AS OleDbTransaction
[code]....
Is it not allowed to run a select inside a transaction like this? Or can it be done by running the transaction in a specific isolation level (I see that the BeginTransaction method has an optional parameter for doing this) ? ..Or some other sollution..? In my case, it was not a problem to move the select to run before the transaction started, but what if you need to run selects that must run inside the transaction?
I am using/creating a DataTable so the "enforceConstrains" property is not avilable for DataTable.Error message: Failed to enable constraints. One or more rows contain values violating non-null, unique, or foreign-key constraints.
Windows Form Load Event:
Private Sub Expenses_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
expensesGV.DataSource = listExpenses()
expensesGV.Columns(0).Visible = False
End Sub
IT STILL GIVES A MSGBOX IF I SELECT THE CHECKBOX BOX OR NOT ....My code below will redirect to Google in both conditions: If the user selects the checkbox, then it will redirect to www.google.com, but if a user forgets to check the checkbox then it shows the msg box with an ok button. When I click on ok it should redirect to www.google.com
I want When a user forgets to check any of the checkboxes to show a msgbox with an ok button and stay on the same page. Otherwise if user selects any of the checkboxes then redirect to google
[code]...
i am trying to auto select the email value from a 2nd cbobox when the user selects a name from the first cbobox using the first cbobox's index. (the values all line up with each other just fine)This is my current code:
Private Sub cmbAnalyst_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbAnalyst.SelectedIndexChanged
theAName = cmbAnalyst.Text
[code].....
I have two drop down. SelCurrentManuf and selCurrentModel. I want the option in selCurrentModel to change depending on the option selected in selCurrentManuf. How do i do it?
<asp:DropDownList runat="server" ID="selCurrentManuf"></asp:DropDownList>
<asp:DropDownList runat="server" ID="selCurrentModel"></asp:DropDownList>
This is how i am currently populating selCurrentModel
Public Sub PopulateCurrentModel()
Dim mySelectQuery As String = "SELECT * FROM Model where ManufID = "+ selCurrentManuf.Text+";"
Dim myConnection As New MySqlConnection(Session("localConn"))
[Code]...
but it only populates the first selected manuf, and doesnt change after
Private Sub selCurrentManuf_SelectedIndexChanged(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles selCurrentManuf.SelectedIndexChanged
PopulateCurrentModel()
End Sub
