|
Ok, that works, but how do I take the ASCII and display the text?
I can't think of anything cool and nerdy to say.
|
|
|
|
|
Hi,
To reverse the process, you need to perform the reverse of the same steps, in reverse order.
AFAIK the reverse of Strings.Asc is Strings.Chr, and the reverse of int16.ToString("X2") is int16.Parse() where you will want the right NumberStyle. I leave the details for you to work out.
Luc Pattyn [Forum Guidelines] [My Articles]
- before you ask a question here, search CodeProject, then Google
- the quality and detail of your question reflects on the effectiveness of the help you are likely to get
- use the code block button (PRE tags) to preserve formatting when showing multi-line code snippets
|
|
|
|
|
Got it! Thank you.
I can't think of anything cool and nerdy to say.
|
|
|
|
|
I would like to save the data logs from the serialport received events into a filename. The problem is, I am running a series of test using the queue collection and I want to save each test in a different filename, (e.g Test 1, Test 2, Test 3, etc). Is it possible to use savefiledialog with it? Or is there some other ways to get around to doing this?
|
|
|
|
|
Hi,
the SerialPort.DataReceived event runs on a separate thread since it is asynchronous to anything you are doing; as such you are not allowed to touch any Control (including Forms, dialogs, and SaveFileDialog object) unless you use the proper InvokeRequired/Invoke method.
Also it does not seem like a good idea to interact with the user from within the DataReceived event, since more data will be arriving while you are waiting for the user's reaction.
Furthermore, the SaveFileDialog is *not* for saving data to a file, it is intended for letting the user *choose* a filename. When you need several file names, you probably want an algorithm to generate a series of filenames (say test###.log where ### is a sequence number)
What you should do is collect the data as it comes in, using whatever means appropriate (maybe a List<string> or a List<byte[]> depending on whether you accept text or arbitrary bytes); and in a different part of your app process or save the data, and interact with the user if and when necessary.
Luc Pattyn [Forum Guidelines] [My Articles]
- before you ask a question here, search CodeProject, then Google
- the quality and detail of your question reflects on the effectiveness of the help you are likely to get
- use the code block button (PRE tags) to preserve formatting when showing multi-line code snippets
|
|
|
|
|
|
Before any off your settings are called so best bet is the application startup event.
|
|
|
|
|
I can only now delete numbers from acces 2003 and not text. I have tryd this diffrent code, and all of them only delete numbers Eg "888".
It cant delete "myname" or "1 myname" only if everthing is numbers
MyOledbCommand.CommandText = "DELETE * FROM tblokkies WHERE leidraad='" & ListBox1.Items(ListBox1.SelectedIndex) & "'"
MyOledbCommand.CommandText = "DELETE * FROM tblokkies WHERE leidraad = """ & ListBox1.Items(ListBox1.SelectedIndex) & """"
MyOledbCommand.CommandText = "DELETE * FROM tblokkies WHERE leidraad='" & ListBox1.Items(ListBox1.SelectedIndex).ToString() & "'"
My colums is only set to text and leidraad is the primary key.
I don't know if it has to do with my insert to the table, here is the code I am using.
MyOledbCommand.CommandText = "Insert Into Tblokkies " & "(leidraad,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12) " _
& "Values (" _
& "'" & String1 & "', " _
& "'" & String2 & "', " _
& "'" & String3 & "', " _
& "'" & String4 & "', " _
& "'" & String5 & "', " _
& "'" & string6 & "', " _
& "'" & string7 & "', " _
& "'" & string8 & "', " _
& "'" & string9 & "', " _
& "'" & string10 & "', " _
& "'" & string11 & "', " _
& "'" & string12 & "', " _
& "'" & string13 & "')"
|
|
|
|
|
What are you populating ListBox1 with? A collection of objects or are they just strings?
|
|
|
|
|
I am usinf this to fill my listbox1
Do While MyDataReader.Read
ListBox1.Items.Add(MyDataReader("Leidraad"))
Dim MyItem = ListView1.Items.Add(MyDataReader("Leidraad".ToString))
With MyItem
.SubItems.Add(MyDataReader("A1").ToString)
.SubItems.Add(MyDataReader("A2").ToString)
.SubItems.Add(MyDataReader("A3").ToString)
.SubItems.Add(MyDataReader("A4").ToString)
.SubItems.Add(MyDataReader("A5").ToString)
.SubItems.Add(MyDataReader("A6").ToString)
.SubItems.Add(MyDataReader("A7").ToString)
.SubItems.Add(MyDataReader("A8").ToString)
.SubItems.Add(MyDataReader("A9").ToString)
.SubItems.Add(MyDataReader("A10").ToString)
.SubItems.Add(MyDataReader("A11").ToString)
.SubItems.Add(MyDataReader("A12").ToString)
End With
Loop
and these also
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
Dim SqlStr As String
SqlStr = "Select * FROM tblokkies WHERE leidraad='" & ListBox1.Items(ListBox1.SelectedIndex).ToString() & "'"
'SqlStr = "Select * from tblokkies where leidraad = """ & ListBox1.Items(ListBox1.SelectedIndex) & """"
FillTextBox(SqlStr)
End Sub
|
|
|
|
|
OK. Well it all looks fine to me. What I would do is set a breakpoint just before your delete statement and check the value of ListBox1.Items(ListBox1.SelectedIndex) to make sure that you're getting the correct value. Sorry I can't be of more help.
|
|
|
|
|
you can try below below one
MyOledbCommand.CommandText = "DELETE * FROM tblokkies
WHERE leidraad=" & ListBox1.Items(ListBox1.SelectedIndex).ToString() & ""
|
|
|
|
|
Use parameters (oledb.oledbparameter)
Read up on sql-injunctions
|
|
|
|
|
 Hi Experts,
I call SAP RFC from VB (VS 2005) for uploading data from SQL Server to SAP custom table. Connection and even RFC call in SAP works fine but I dont understand how I can pass SQL table to RFC in my VB code.
Can you give me your thoughts or any link which will give me some info. on the same on sending table to SAP RFC...it is array insert..
Thanks in advance..
Yogi
|
|
|
|
|
|
Same response to the last time he asked - we don't know. lol.
Any suggestions, ideas, or 'constructive criticism' are always welcome.
"There's no such thing as a stupid question, only stupid people." - Mr. Garrison
|
|
|
|
|
We have third party software that has 20 MS Access database. The software resides on two boxes: 1 production and 1 for fail over.
I'm creating an app the copies the databases at different intervals; some monthly, some daily, and some every 30 sec to the fail over box. I plan to use a single class (CopyDB) to handle the copying. My question is: since I have three timers running how do I ensure that I do not get a race condition or that I do not miss one of the copies (monthly, daily) because the class was being used to copy (every 30 sec). Will SyncLock be sufficient?
Thanks in advance for you suggestions
|
|
|
|
|
Doug.Aliff wrote: We have third party software that has 20 MS Access database
If you have 3 timers to handle this those timers should run in there own thread and execute there own code (so each there own instance of the copydb class). So I don't think you'll have a problem with that.
The problems I see are:
0) file locking, but I don't think that's going to be a problem if you only copy the files.
1) time: 20 access database over network in 30sec?
2) performance: doing something this 'heavy' every 30sec is going to take a lot off power.
|
|
|
|
|
First let me offer you my sympathies and condolences, 20 Access DBs 
Why do you have 3 times, you may have 3 conditions and different processes for each condition but you only need 1 timer. In your tick event simply test the 3 conditions (duration from last copy for the 3 types), do any copies needed and move on.
I know you have no control over the access Dbs but this DR method actually sounds like a D. If failover is so critical that you need to copy a DB every 30 seconds you have a SERIOUS design problem. Also I think Access used to have a replicate function way back when, you might want to raise that with the vendor.
Never underestimate the power of human stupidity
RAH
|
|
|
|
|
Mycroft Holmes wrote: If failover is so critical that you need to copy a DB every 30 seconds you have a SERIOUS design problem.
Agreed. You might want to consider upgrading to SQL Server where possible. That won't break any applications that are embedded in the database - Access Forms (and query's and reports) can handle distant SQL-Server tables like they were local MS-Access tables
SQL Server would also make it easier to protect the data, using synchronization and backup-policies.
Good luck
I are troll
|
|
|
|
|
Agreed, agreed, agreed
How much data are we talking here? You download SQL server express for *free* which allows for DBs up to 4 gig in size (and still gain some performance, scalability, backups benefits).
If you just plunked down the $$, you could get a full version of SQL server in which you could do mirroring or log shipping. Or you could get Red Gate schema and data copy which have APIs for easily copying over the databases (although, you can create scripts yourself as well).
There are other options other than supporting 20 Access databases - yikes!
Any suggestions, ideas, or 'constructive criticism' are always welcome.
"There's no such thing as a stupid question, only stupid people." - Mr. Garrison
|
|
|
|
|
I agree with the others. If you need this kind of reliability, Access is NOT your solution. And, your solution is not even a solution. I'll tell you why in a second. Access is a desktop database with no facilities to replicate data for serious up-time requirements. Upgrade this thing to SQL Server if at all possible.
Copying the *.mdb files every 30 seconds will result in a major problem. If the production box fails during the copy, or the network path between the production and backup boxes fails for any reason, the copy of the database you're writing to will be destroyed. By doing a file copy, you've almost garanteed the failure of the backup database. Using Access, you really don't have a 100% redundancy solution.
Even reading the records from one copy of the database and writing them to the copy (NOT using file copy!), is not a solution. Well, not an easy solution. You'd have to read a record from one table, follow it's keys to other tables, and write each record to the appropriate tables, all in one transaction, to the copy of the database, then commit the transaction and move on to the next record in the table.
What you are trying to prevent by doing this is data corruption. What if you just read the records from one table and threw them into the copy, then the production box failes?? You haven't yet copied the data from related tables, thereby destroying the integrity of the data.
Your only solution is moving to SQL Server...
|
|
|
|
|
Thank everyone for you responses I'll try to reply to all in this one posting
Unfortunately, I am stuck with Access it is a third party package with paid support. I agree that this is a very poor design. I spoke to the vendor and they have been working on a SQL version for YEARS 
I know file copy is not ideal but, as soon as the application opens it locks all of the DB's, so i can't query. If it were SQL I could at least do a dirty read, but I can't find away to do that in Access. So I'm kinda forced to use File copy. actually Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal
lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long)
Monthly copies are on tables that rarely change if ever.(Just being safe)
Daily copies are on tables that hold system settings that are changes when then customer requirements change. Software controls machinery via 32 serial ports.
30sec copies are probably over kill. A new item is produced every 5 minutes, these DB's hold the characteristics of each every piece made.
Network Issues----- what do you think about placing copies of the tables on the fail over box in a separate folder. Then test for conditions such as update time and then copying into the correct locations if conditions are met?
Again thanks everyone for you responses.
|
|
|
|
|
Background: I have a class wrapping httpwebrequest/response and executing on it's own thread with an event handler for DataArrival.
I have 2 web addresses I can use. 1 is with test data and 1 is an internal site with the real data. If i run the code on the production machine the site will fail (since it's not on the internal network) but it works fine with the test site. When the internal site fails it just returns a webpage from opendns saying it can't find the site (which is what should happen), but for some reason it crashes the program.
ModemTests - is a string array holding the information coming in (currently only using index 0)
ShowModem - this is the sub where the data gets processed
Public Sub Modem_DataArrival(ByVal sender As Object, ByVal e As DataArrivalEventArgs)
ModemTests(0).ModemInfo += e.RecievedData 'there is data in here when it crashes
If e.IsComplete Then
If ShowingModem = sender.tag Then
ModemTests(0).ModemRunning = False
Dim d As New SetTextCallback(AddressOf ShowModem)
Invoke(d, New Object() {ModemTests(0).ModemInfo}) 'error occurs here
End If
End If
End Sub
Crash error:
System.ArgumentOutOfRangeException was unhandled
Message="Length cannot be less than zero. Parameter name: length"
ParamName="length"
Source="System.Windows.Forms"
StackTrace:
at System.Windows.Forms.Control.MarshaledInvoke(Control caller, Delegate method, Object[] args, Boolean synchronous)
at System.Windows.Forms.Control.Invoke(Delegate method, Object[] args)
at ConnectionTools.frmMain.Modem_DataArrival(Object sender, DataArrivalEventArgs e) in D:\VS2008\WindowsApplication10\WindowsApplication10\frmMain.vb:line 72
at ConnectionTools.HttpRequestResponse.OnDataArrival(DataArrivalEventArgs e) in D:\VS2008\WindowsApplication10\WindowsApplication10\clsHttpRequest.vb:line 51
at ConnectionTools.HttpRequestResponse.ReadCallBack(IAsyncResult asyncResult) in D:\VS2008\WindowsApplication10\WindowsApplication10\clsHttpRequest.vb:line 199
at System.Net.LazyAsyncResult..ctor(Object myObject, Object myState, AsyncCallback myCallBack, Object result)
at System.Net.ConnectStream.BeginReadWithoutValidation(Byte[] buffer, Int32 offset, Int32 size, AsyncCallback callback, Object state)
at System.Net.ConnectStream.BeginRead(Byte[] buffer, Int32 offset, Int32 size, AsyncCallback callback, Object state)
at ConnectionTools.HttpRequestResponse.ReadCallBack(IAsyncResult asyncResult) in D:\VS2008\WindowsApplication10\WindowsApplication10\clsHttpRequest.vb:line 191
at System.Net.LazyAsyncResult.Complete(IntPtr userToken)
at System.Net.ContextAwareResult.CompleteCallback(Object state)
at System.Threading.ExecutionContext.runTryCode(Object userData)
at System.Runtime.CompilerServices.RuntimeHelpers.ExecuteCodeWithGuaranteedCleanup(TryCode code, CleanupCode backoutCode, Object userData)
at System.Threading.ExecutionContext.RunInternal(ExecutionContext executionContext, ContextCallback callback, Object state)
at System.Threading.ExecutionContext.Run(ExecutionContext executionContext, ContextCallback callback, Object state)
at System.Net.ContextAwareResult.Complete(IntPtr userToken)
at System.Net.LazyAsyncResult.ProtectedInvokeCallback(Object result, IntPtr userToken)
at System.Net.Sockets.BaseOverlappedAsyncResult.CompletionPortCallback(UInt32 errorCode, UInt32 numBytes, NativeOverlapped* nativeOverlapped)
at System.Threading._IOCompletionCallback.PerformIOCompletionCallback(UInt32 errorCode, UInt32 numBytes, NativeOverlapped* pOVERLAP)
InnerException:
|
|
|
|
|
At a guess, I would say that ModemTests is not being initialized properly as an array. The String class has a default property such that MyString(x) returns the xth character; if MyString has no characters, you will get his error.
Added
I ran these two tests:
Dim s As String() = {}
Debug.WriteLine(s(0))
Dim s As String = ""
Debug.WriteLine(s(0))
Both returned IndexOutOfRangeException, which seems to blow my theory. The only other thing I can think of is that the problem is with the value of e.ReceivedData. You might want to stick in some diagnostic code to check the value before doing the assignment.
modified on Thursday, April 2, 2009 4:04 PM
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
