|
hi nasir,
if you want to extract second occurance then you can try something like that
Dim str As String<br />
str = yourStringVariableValue<br />
Dim FirstLocation As Integer<br />
FirstLocation = str.IndexOf("a")<br />
str = str.Substring(FirstLocation + 1)<br />
Dim SecondLocation As Integer<br />
SecondLocation = str.IndexOf("a")<br />
SecondLocation = SecondLocation + FirstLocation + 1<br />
MsgBox(SecondLocation)
hope this helps
Rupesh Kumar Swami
Software Engineer,
Integrated Solution,
Bikaner (India)
My Company
|
|
|
|
|
You can use the IndexOf method of the String class to find the index of the first occurance of your string. Then you can call it again, passing in the position to start the search from, namely the position of the previous occurance of the string.
' Look for the first occurance of "a" in a string
Dim pos As Integer = SomeString.IndexOf("a"c)
' Look for the next occurance of "a", starting at the position of the first occurance +1.
Dim pos2 As Integer = SomeString.IndexOf("a"c, pos + 1)
Or, if you already know the positions, you can use the SubString method of the String class.
|
|
|
|
|
Dear
Can anyone help me? I want to get the day of the week and it will return week number.
Example
if today is 5th in first week, it will show First week
Socheat
|
|
|
|
|
if VB.NET, read up on Calendar and DateTime types.
Calendar.GetWeekOfYear will interest you.
|
|
|
|
|
This will help U
syntex: weekday(#date#)
example: weekday(now)
week of the year : cint(now.DayOfYear /7)
Thanks
Rajesh B --> A Poor Workman Blames His Tools <--
modified on Saturday, May 10, 2008 9:16 AM
|
|
|
|
|
hai friends
my project is like this ..
i have to watch the operations done by the user (employee) in the company .......
i want to watch on the user..
wt he done today in the company....
i.e he is working on the project related tasks or his personnal,
which files he created or deleted or modified in his system
or how much of time he kept system idle....
totally i need the operation done by the user
plz help me ...
THANKS IN ADVACNE
|
|
|
|
|
Not with this project. There's way too much possiility for abuse (keyloggers). There are other ways to monitor users without resorting to standing directly over their shoulders.
|
|
|
|
|
Look up "Processes", specifically a function called GetProcesses or GetProcess or something like that. That will get the names of processes running on the computer. Deleted or modified files are more of a task for the server than client machines; I know idle time is recorded somewhere in Users and Groups on a Windows Server 03 OS.
An old dirty trick I've seen used is to check the title of an Internet Explorer window, as it has a value specified by the site the user is on. This sort of thing is not wise, however, as it may violate privacy laws.
|
|
|
|
|
I actually want to login to a web server on Local Area Network through HttpWebRequest Class, I am using the following code but can't seems to work...
<code>
Dim wr As HttpWebRequest
Dim wrs As HttpWebResponse
wr = CType(WebRequest.Create("http://192.168.2.142/"), HttpWebRequest)
wr.Method = "POST"
Dim postData = "frmUserName=myUserName...&frmUserPass=myPassword..."
wr.ContentLength = postData.Length
wr.ContentType = "application/x-www-form-urlencoded"
wr.AllowAutoRedirect = False
Dim buffer() As Byte = System.Text.Encoding.ASCII.GetBytes(postData)
Dim dataStrm As Stream = wr.GetRequestStream()
dataStrm.Write(buffer, 0, buffer.Length)
dataStrm.Close()
Try
wrs = wr.GetResponse
Dim sr As New StreamReader(wrs.GetResponseStream)
Me.rtxtData.Text = sr.ReadToEnd.ToString()
sr.Close()
Catch ex As Exception
MsgBox(ex.ToString())
End Try
</code>
Thanks in advance !
AliAmjad(MCP)
First make it Run THEN make it Run Fast!
|
|
|
|
|
AliAmjad wrote: Dim postData = "frmUserName=myUserName...&frmUserPass=myPassword..."
You're joking, right?? This website requires you to send the username and password IN PLAIN TEXT in the URL string?? So much for security...
Without knowing what the website requires, or how you login to it, it's impossible to tell you how to fix this. Everything depends on how the website works.
|
|
|
|
|
 Actually this is the only line in code i don't understand how to arrange the post data, I saw some examples but can't seems to work as far as website goes it's an Easy File Sharing web server http://www.sharing-file.com/ on LAN, read their whole site but didn't find the solution i think they receive username and password in plain text. But again I have made a login form in ASP.NET and then tried to login there but again can't! what's the problem is there something wrong with my code???
AliAmjad(MCP)
First make it Run THEN make it Run Fast!
|
|
|
|
|
How does the site ask for a username and password?? Is it in a web page?? Is it in a small popup window?? How??
|
|
|
|
|
|
OK. You can't take the approach you're using to fill in the username and password. You have to write code that gets this page, then finds the username and passwords HTML input boxes in the form, fill them in, then "click" on the Login! button to submit the filled in page back to the webserver.
|
|
|
|
|
Thanks for putting me in a right direction but can you please give me a hint which class i should use to fill the input boxes and to invoke the click event of Login button.
AliAmjad(MCP)
First make it Run THEN make it Run Fast!
|
|
|
|
|
Sorry, but you use a Web Browser control to do this.
|
|
|
|
|
Thank you very much I'll try to figure it out.
AliAmjad(MCP)
First make it Run THEN make it Run Fast!
|
|
|
|
|
I am trying to make a epos for a bar as a uni project have spoke to my tutor but he’s of no help and tells me to look it up on the net so here i am
Situation
On the First Sales screen i have 24 buttons (speedbar) the names will come from a db but if there are not 24 items in the database it stops due to it being out of range
This is my current code
<br />
<br />
Dim speedbar As New Collection<br />
Dim sql As String<br />
Dim ds As DataSet = New DataSet<br />
Dim cmd As OleDb.OleDbCommand = OleDbConnection1.CreateCommand<br />
cmd.CommandType = CommandType.Text<br />
sql = "select * from Drinks"<br />
cmd.CommandText = sql<br />
<br />
Dim da As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter<br />
da.SelectCommand = cmd<br />
da.Fill(ds, "Drinks")<br />
<br />
Dim dc As DataColumn, dr As DataRow<br />
<br />
<br />
<br />
For Each dr In ds.Tables("Drinks").Rows<br />
speedbar.Add(dr.Item("Name"))<br />
Next<br />
As you can see a items for the speed bar are stored in a collection what i cant do (where i need your help please) is make the buttons dynamical or add the name to some and make the rest invisible
Thanks
aj
|
|
|
|
|
You create button the same way you create an instance of any other class, with New. You then set a bunch of properties on the button for size, location, Text, whatever, ... Then you add the button to the container form's Controls collection.
Dim newButton As New Button
newButton.Location = New Point(x, y)
newButton.Size = New Size(50, 75)
newButton.Text = someText
Me.Controls.Add(newButton)
Next, you have to wire up the button's Click event so you can get notified when the user clicks on it. That you do with the AddHandler statement:
AddHandler newButton.Click, AddressOf myButtonClickHandler
Of course, myButtonClickHandler has to have the signature of the appropriate event handler:
Private Sub myButtonClickHandler(ByVal sender As System.Object, ByVal e As System.EventArgs)
... code to handle the button click goes here
End Sub
Multiple buttons can be wired up to the same event handler.
|
|
|
|
|
how do i get it to make the right amount of buttons and name them all and put them in the right place
modified on Friday, May 9, 2008 2:16 PM
|
|
|
|
|
jacko873 wrote: how do i get it to make the right amount of buttons
Iterate over the returned rows in your datatable. One button for each row.
jacko873 wrote: put them in the right place
Simple math. All you have to do is calculate an offset from a fixed point multiplied by the count of buttons you've put down already.
|
|
|
|
|
Thank you Got the buttons working the names are right and the positions are great but I do have one last think to ask
How do I create an event for each button?
What I want the buttons to do is when they are clicked and an item to a list box and add the price to a variable for later
|
|
|
|
|
I already told you how to wire up the button's Click event.
|
|
|
|
|
I get that I can create event but each button has the same event
I what each event to be different dependant on the text of the button
|
|
|
|
|
Like was said before:
AddHandler newButton.Click, AddressOf myButtonClickHandler
but change myButtonClickHandler to the name of the method you want to be called onClick.
Edit:
pseudo code:
if button.text == string1 then
AddHandler newButton.Click, AddressOf myButtonClickHandler1
else if button.text == string2 then
AddHandler newButton.Click, AddressOf myButtonClickHandler2
etc etc
At university studying Software Engineering - if i say this line to girls i find they won't talk to me
Dan
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
