i ised char index of TSQL in vb.net This is my sample script..
strCreditCardName = case when substring(insertedset.EncryptedAccountData, 0, 13) <> 'AccountName=' THEN '' ELSE substring(REPLACE(substring(insertedSet.EncryptedAccountData, charindex('AccountName=', insertedSet.EncryptedAccountData) + 12, charindex('&AccountNumber=', insertedSet.EncryptedAccountData) - 13), '+', ' '), 0, 50) END
I have a string that goes like "abcdefg..."
I would like to find the index where the letter d is at, so I can get the number 3.
I managed to do it by looping through each letter in the string, but that doesn't sound very convenient.
I want to replace a char at a specified index of a string.
Short of using the .Remove and .Insert methods I was wondering if there is an easier way.[code]...
i get this error?
' Create the order and store the order ID
Line 175: Dim orderId As String = ShoppingCartAccess.CreateCommerceLibOrder(shippingId, taxId)
[code].....
i want to read a character 1 by 1 from a string and a .txt, i know all about stream reader so for the .txt would it be somthing like:textbox1.text = tr.readCharacter.i would prefer to be able to read from a textbox or String array though.
View 10 RepliesI need validation for string to comply with next: no space char starts with one delimiter char ends with one delimiter char has no other char as delimiter char. Updated sorry missed that should only be one delimiter char at start and at the end
View 2 RepliesPublic Shared Function UrlTokenDecode(ByVal input As String) As Byte()
If (input Is Nothing) Then
Throw New ArgumentNullException("input")[code].....
i am trying to increment a char in vb.net, eg: Dim letter As Char = "a"c. and i want to make it b, and so on. how can i do this?
View 1 RepliesI wanted to know what (if any) differences there are to using the SQL Transaction within the application versus written into the stored procedure using TSQL statement. We would need to restructure the stored procs and vb code to get this to work and I'm not sure it would be worth the effort at this time.
Public Sub RetrieveTData(ByVal cID As String, ByVal cnn As SqlConnection) As Boolean
Dim sqlTran As SqlTransaction
cnn.Open()
sqlTran = cnn.BeginTransaction
[code].....
We aren't certain whether the timeout is occurring in DataAlreadyTransferred() or usp_BigNasty_CopyDataFromDB1toDB2 due to how the try/catch is written. We can restructure this code, but will take a week or so to get it to production (no errors occur on test/dev today)
DB1 - permanent storage, used by other applications as well
DB2 - working set, used only by Web App
DataAlreadyTransferred(cID) first checks to see if DB2 has any copies of the records, if DB2 does and those records are clean it deletes them (data could have changed in DB1 and we want the most up-to-date version). If DB2's data is dirty it is left alone and no data is deleted.
usp_BigNasty_CopyDataFromDB1toDB2 copies rows from approximately 20-30 different tables and copies over the perm copies from DB1 into DB2, essentially creating a working set from which the Web App can access
We are aware this is inefficient and are examining ways to improve it, just haven't had time yet... I believe by having the transactions in the app code it's locking many more tables than is really needed. If we move them to the stored procs, less tables will be locked at one time thus improving our chances of removing deadlock conditions/timeout issues we're seeing today. Just not sure on this..
I have following code and I can filter data on grid but when I pick same date in 2 datepicker it shows nothing. How can I fix the problem.
[Code]...
I've found solutions to determine the length of an audio file using WMPLib.WindowsMediaPlayer (which seems quite ugly), by using a physical file path, but nothing to determine the duration of an audio file stored in a VARBINARY field (SQL Server 2008 R2).I'm using .Net WebForms. Maybe it'd be a better idea to do this client side with jQuery, but what if I only want to expose some controls to the web browser based off of the duration?
View 1 Repliesi'm using the following code in order to send the bytes of a picture into the stream table:
Dim FirstColumnNames As String = imTable(0) & "_Code, " & imTable(0) & "_Price, " & imTable(0) & "_Title, " & imTable(0) & "_Type, " & imTable(0) & "_Height, " & imTable(0) & "_Width, " & imTable(0) & "_Comments "
Dim FirstFieldsValues As String = "'" & imParam(1) & "', '" & imParam(2) & "', '" & imParam(0) & "', '" & imType.ToString & "', '" & imHeight & "', '" & imWidth & "', '" & imParam(3) & "' "
[code]....
The tables have the fllowing stracture Thats the First Table:
myCommand = New SqlCommand("CREATE TABLE " & TablesStat(0, 0) & _
" (" & TablesStat(0, 0) & "_ID int NOT NULL PRIMARY KEY IDENTITY(1,1), " & TablesStat(0, 0) & "_Code varchar(20) NULL, " & TablesStat(0, 0) & "_Price money NULL, " & TablesStat(0, 0) & "_Title varchar(50) NULL, " & TablesStat(0, 0)
[code]....
End the second table is:
myCommand = New SqlCommand("CREATE TABLE " & TablesStat(1, 0) & _
" (" & TablesStat(1, 0) & "_ID int NOT NULL PRIMARY KEY IDENTITY(1,1), " & TablesStat(1, 0) & "_GUID UNIQUEIDENTIFIER ROWGUIDCOL NOT NULL UNIQUE , " & TablesStat(1, 0) & "_" & TablesStat(0, 0) & "_ID int FOREIGN KEY REFERENCES " & TablesStat(0, 0) & " (" &
[code]....
My problem comes when i'm trying to read the 'filePathName' and the 'fileToken'the privious SELECT GET_FILESTREAM.... return me only one colomn to read the colomn 0 which has the GUID in binary format I know i'm doing something wrong but i don't know what My issue is that i'm not geting th 'filePathName' and the fileToken'?
i have a situation where I need to search a table for a specific record that matches an ID number the user will specify. I know 2 methods to accomplish this. The first would involve writing some VB.net code that would call a TSQL statement and return the value through the return parameter. The second method would involve creating a dataset and populating it with a select statement.
View 2 RepliesI have a VB.Net program that will basically make a query to a remote MS-SQL DB using TSQL, return two columns (normally 4 rows/records), 1 is a datetime and 1 is a double. I will then need to return the average of the doubles (which is easy in VB.NET).
As I will need to run this query perhaps 1000 times an hour (programmatically with different input parameters for the query), I am looking for the most efficient way to code this up so that it will take the shortest time to run. I tried SQLDataAdapter and then using dataAdapter.Fill and sometimes it returns an empty set although the raw select query has values returned.
In VB.NET, how do I do the following?
Execute a Stored Procedure
Read through the DataTable returned
Struggling again with doing in VB what I find simple in TSQL (sigh) - hoping that a forum member can point me in the right direction again. I have a datatable with three columns :- A, B & C I am looking to count the number of records in the datatable where columns B & C (both numeric) match specific criteria. eg :-
View 3 RepliesI built a prototype system with some database queries. Since it was just a prototype and I was very new to databases, I just used a direct string. This is the string I used and it works fine:
command = New OleDbCommand("SELECT * FROM " + prefix + "CanonicForms WHERE Type=1 AND Canonic_Form='" + item + "'", dictionary_connection)
Now, in putting it in a real system, I wanted to use the more secure parametized method, so after some googling I came up with this:
command = New OleDbCommand("SELECT * FROM @prefix WHERE Type=1 AND Canonic_Form=@form", dictionary_connection)
command.Parameters.AddWithValue("@prefix", prefix + "CanonicForms")
command.Parameters.AddWithValue("@form", item)
But all I get is an error for an incomplete query clause. What have I done differently between the two?
I have split a string into a char array, now i need to copy the char array to an int array with the ASCII values of each char.Donīt know how to do it without looping each value.
This is my code:
origen = RichTextBox1.Text.ToString
Dim valor As Char() = origen.ToCharArray
Dim numeros As Integer() = (How can i convert "valor" to an int array?????)
i have found [char] specified in some of the examples at msdn , what is the difference between char and [char]
View 2 Repliesi am having trouble putting a value in a textbox. Each time a ticket is sold i put the total price in a textbox, each time a ticket is sold for the same concert it increases by adding its self to the total price. It works at the first sale, but after that it breaks down. here is the code
Private Function DisplayMoneyTaken() As Integer
Dim totalMoney As Integer
'open the database connection
[Code].....
Getting error filling grid view from reading through data table:
Dim myDataTable As DataTable = myDataSet.Tables("SunTrust")
Dim myRow As DataRow
Dim i As Integer = 1
Try
[code]....
Error:Index was out of range. Must be non-negative and less than the size of the collection.Parameter name: index
I am using Sub to format datagridview but during Form_Load this error occur. There are rows in datasource and dg.row.count is > 0.
.Columns(0).Width = 50 <==== ERROR HERE
.Columns(1).Width = 150
.Columns(2).Width = 80
.Columns(0).HeaderText = "ID"
[code].....
What im trying to do is send vars to a flash file.The following is my code:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim oTitle As New ArrayList
Dim oSub As New ArrayList
Dim oRate As New ArrayList
[code]....
What I'm expecting the output to display is something like "t1=value&s1=value&r1=rate&t2=value&s2=value&r2=rat&t3=value&s3=value&r3=rat" But... i keep getting this exception: index was out of range. must be non negative and less than the size of the collection. Parameter name: INDEX.
I have a datagridview, with 3 columns, each containing dropdown filters (in the column header). Of the 3 columns, 2 are working perfectly fine, but whenever I try to filter the 3rd column, it gives me this error: (Also all of the column's have the ColumnType property set to: DataGridViewAutoFilterTextBoxColumn) "Index was out of range. Must be non-negative and less than size of the collection. Parameter name: index." The error points to the part that begins with "If dgv1.Rows(e.RowIndex)..."
Private Sub dgvWPS_CellFormatting(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellFormattingEventArgs) Handles dgv1.CellFormatting
If e.ColumnIndex = 1 Then
[code]....
i am trying to get the value into the cur_stock where item_id = datagrdiview.curentcell.value.I am lookin out for the solution since couple of days, but couldnt figure it out.Well, m trying to make this work on CellMouse click event
Below is my vb.net code:
Private Sub DataGridView_stockout_CellMouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles DataGridView_stockout.CellMouseClick
Dim i As Integer = Stock_checkDataSet1.Tables(0).Rows.Count - 1
[code]....
Trying to input a high setpoint, low setpoint, a % load, and number of compressors, then calculate the temp that all compressors are off. Then build a datagridview with the staging of compressors from all off to all on for each compressor up to 10 compressors.I am trying to insert headers from 1 to 10 compressors (Variable) with the text "Comp1", "Comp2", etc....Two rows with header. I am trying to use an array with index number to insert the text, but that is where my problem happens."Index was out of range".Here is my code
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Integer, num1, num2, num3, num4, alloff As Single, stg As Single
TextBox1.Focus()[code].....
I've got the web browser with tabs in all working fine, but there's one bug, i can add tabs, delete em, etc.. but when i delete a tab then go to create a new tab, it gives me the error: InvalidArgument=Value of '6' is not valid for 'index'. Parameter name: index '6' is the number of tabs i had open.Here's the bit of code i use to create the tabs with the browser in it:
vbcode
Dim browse As New WebBrowser
browse.Name = "b1"
browse.Dock = DockStyle.Fill
[code]....
When the selected index changes I for a second time this code errors.
vb.net
lvReports.SelectedItems.Item(0).SubItems.Item(2).Text
with this error message
InvalidArgument=Value of '0' is not valid for 'index'. Parameter name: index
Why is this?It worked for the listviews.click event perfectly.
I arrive from years with Oracle plsql. Now I'm trying vb.net I created a function that return a char value, so written:
[Code]...
The question: I will create a function get_type(...) in vb.net that calls the tsql function written above... how can I call the tsql function [abc].[GET_PERSON_TYPE] in vb.net function get_type(...) function?
I am coding a program for a movie trivia game that randomly shows a movie quote and the the user selects a movie name from a combo box that matches. I used a array for the movie quotes and a comboBox for the movie names. I have coded a portion of the program but I am stuck on how to compare the array quote being shown to what movie the user selects from the comboBox. I have tried numerous different things but none seem to work right. The way I have it coded now it shows that every movie I pick that it is right even if it is wrong. I am going to show part of the code here and also attach the entire solution for anyone that needs it .
[Code]...