Ace Master

thanks for the quick reply Database is Mysql server ODBC installed. I made the permissions for database, but maybe I missed something. Please tell me all the places where I can set permisions for that DB. thanks a lot.

so....there is no hope to get out that stupid login window? :(

I have the same problem and I did this: Dim rpt As New CrystalDecisions.CrystalReports.Engine.ReportDocument rpt.Load("CrystalReport1.rpt") rpt.SetDatabaseLogon("user", "pass", "server", "db") is not working :( . On the dev pc is working, but when I deploy the kit to other pc , the login apears.

done....silly me.. :) I haved the problem with "can't open raw set" ..or something like that, and I spend a couple of minutes to see where the problem was. That was a verry weird thing.

hi. I have the same problem. I installed the mysql ODBC for VB.NET, the connection works well, but in the CR data sources I can't see anything about mysql. Why? thanks

well.....the "wait" is a form...and maybe you don't have a form named wait.

Hi. I used afte all a form which is shown in a do until code. After the condition is true..the form is closed....

Hi there I tried to find a sample code for a simple grid print and to be honest I didn't find one. Everywhere I look are ..lines ..lines ..and more lines of code for making a simple print. I don't want to set the font, char size�.etc�just to print a grid with default parameters I take a look at print document class and they�re 2 pages with code for a print. Is this possible with a simple code? Thanks

is working now..thanks a lot.

hi , and thanks for the answer sjn78 but....you code you give me isn't working because the values_status1(0) is "ID" and can't be converted to integer. another ideea is to skip the first line in counting, and then the values_status1(0) will be a int value and then will work, but don't know how to skip a line in a txt file counting. sugestions ? thanks

Hello. I have this txt file: ID NAME VALUE 10 NAME1 15 12 NAME2 30 16 NAME3 50 How to count lines in this file, but lines who start with id smaller then 15? in my example I need to return just 2 I know how to count lines but can't make it work with this. thanks

done.... and yes ..It was easy. I made a function for monitoring the values, which are making the chart. In that function I put a counter who decrease for each "0" values in my values, and I made the average values by that counter.

Hi. I have a little problem here, and I don't know how to resolve it. I have a chart for display some data, and a label for displaying the average values for that chart. My chart has �let�s say 3 columns. value 1 (10) value 2 (15) value 3 (6) the label average for this chart is : (10+15+6) / 3 = 10.3 But, my chart is dynamically created, and don�t know if I will receive the all values for the chart and in some cases I will receive just 1 value in my chart, like this: Value 1 (10) nothing nothing Of course my average value will be 10 / 3 and this is not good J My question is how is possible to know in a chart which columns has values for calculate the average by this. Thanks a lot

True..... don't need to show the form for each loop. :) thanks.

thanks to all for the help you give me. After I make a small analisys of the answers I made this code which works fine. oCP.Write(Encoding.ASCII.GetBytes("D" & Chr(13))) Dim stai As New wait Do Until verifica_mesaj() = True stai.TopMost = True stai.Show() If output.EndsWith("F") Then Exit Do End If Application.DoEvents() 'MsgBox("please wait...") Loop oCP.Write(Encoding.ASCII.GetBytes("F" & Chr(13))) stai.Close()

bri189a >> I don't know if that will going to work. I need a loop to keep checking the verifica_mesaj if true or not, until the string is over from the serial If I put the code you suggested, the first calling will not have verifica_mesaj true because is not waiting for later checking...and will not work. I think.. Anyway ...if anybody has other code idea for this I will appreciate verry much . do this : line code 1 wait until verifica_mesaj = true do this : line code 2

Yes. The loop is not working. this is the code now oCP.Write(Encoding.ASCII.GetBytes("D" & Chr(13))) Do Until verifica_mesaj() = True Application.DoEvents() ' msgbox("please wait...") Loop oCP.Write(Encoding.ASCII.GetBytes("F" & Chr(13))) "verifica_mesaj" check if my receiving RS232 string has the last char = ">" If output.EndsWith(">") Then Return True Else Return False End If The weird stuff here is that if I use the msgbox the loop is working and the msgbox stays until the verifica_mesaj = true. After that if you press the ok from the msgbox the next command is send to the serial. Maybe you need to know more about my code. I have other function, which receive char by char from the serial. In this function, I call verifica_mesaj until the last char is out from the serial , because I need to know what output has. If output has the last char ">" is ok and the trimite_mesaj is true and then exit loop and send the other command to the serial.

thanks for the answer, but... this code Do Until verifica_mesaj() = True Application.DoEvents() Loop ...has no effect . Is like I don't have it.

iceplug > what do you mean by that ?

I see.... But why in my loop only the msgbox is working? What if I want nothing to happen in my loop ? like below.. Do Until verifica_mesaj() Loop or what code to write to wait until the condition is true and then to go further with code..

isn't working... this code work only in a "if ... then" statment.. I think....

Hi. I have a loop code for waiting a condition to be true. In that loop I have a msgbox. For every msgbox, I need to have automatically �press ok� because after true condition is valid to exit the loop without user to press ok. This is the code oCP.Write(Encoding.ASCII.GetBytes("D" & Chr(13))) Do Until verifica_mesaj() MsgBox("Loading in progress...", MsgBoxStyle.Information) Loop oCP.Write(Encoding.ASCII.GetBytes("F" & Chr(13))) thanks ps. later edit I can have something like this : do nothing until condition true code loop

thanks. one more thing .... I have 2 functions. public sub function1 () code 1... check in function2 code2.... end sub public sub function2 () if a>b then code2 line end if end sub basicaly I want to read the code 1 in F1 and after that to check the if in F2 and if it's true to continue with code 2 in F1. I have a serial connection. I send a command for receiving the info but I don't want to send the next command until the receiving for the first one is done. I realy don't know how to do this in other way :( thanks

Thanks... In the same way as I know the last char ....it is some way to find the char in front of him ???? something like : myString.EndsWith-1("X") it is possible ? thanks