Comments by Luiey Ichigo (Top 200 by date)

If the total promotion's data is 10:

lngTotPage = arr_promotions.Count Mod 3 'Equal to 1
If lngTotPage * 3 <> arr_promotions.Count Then
    lngTotPage += 1 'Equal to 2
End If

But in my long lines code, it shows on 4 pages it will be.

The "New" part use to create a something in formatting (json). I have done something like this before, but not as complex as this. Like nested dictionary.

Dim telemetryDataPoint = New Object
telemetryDataPoint = New With {Key .Data1 = "ABC1",
.Data2 = "ABC2"
.Data3 = "ABC3"}

Dim messageString = JsonConvert.SerializeObject(telemetryDataPoint)

Type of ScoreRequest? you mean CType things?

I want to extract the Properties name so I can combine as header for JSON format. This Properties name is dynamic. Some properties also having nested properties so I want to like automate by pass and extract to another function.

Its return nothing

the response is returning a set of web service structure instead of response data structure. the structure having nested xml variable before can get the data

I have try using Web Reference, HTTP Request but none return the data structure. Instead, it returning calling structure. Updated code block that I have tried several days

I was not encourage to use 3rd party software to be run on clients. The programming is the best way, but to accomplished it,is the hard way since I can't find one tutorial for this. But I have seen this JOIN things in here:
http://weblogs.sqlteam.com/jeffs/archive/2004/11/10/2737.aspx

Just wondering how to put those query to JOIN on both local and cloud server into one connection to perform it. Do you know how VS2015 Data Comparison works? I mean, how it be done to until there is view of Identical Record, Differential Record, Only in Sources/Target..

I guess something bad because I use SSMS and Export Data to Azure SQL but the copied data and table creation from LocalSQL does not passing the primary and foreign key..is it legit as what I'm facing now?

index? how to add it to current query sir?

Again, thanks for your guide! You idea is very helping

Hi Richard,

Thank you for your guide. It's work and perfect meet!

Hi Garth,

I'm opening to both C# and Visual Basic. I'm writing in Visual Basic but I can translate those C# and apply on my VB. That's why I'm tagging both language. Currently I'm applying one code. Which actually catch any character and filter it for exit purposes. And it catch combine key also.


Private bExit As Boolean
Private input As String
Sub Main(ByVal args() As String)
bExit = False
Console.TreatControlCAsInput = True
StartTaskHere 'My main task function will be called here
Do
input = Console.ReadLine()
If input = "P" Then
bExit = True
Console.WriteLine("Exiting!")
Task.Delay(3000)
End If
Loop While (Not (bExit))
End Sub

Great..thanks!

Hi Maciej..

This queries only works on 6 digits number as minimum 10:00:00am which will be 100000. But if the time is 09:59:59 and the value in the row is 095959 or 95959, SQL will return error "The conversion of a varchar data type to a datetime data type resulted in an out-of-range value"

Because my client convert 24hours format time to number which if current time is 00:00:01 (12:00:01PM 12Hr format) the data on row will be 1 only.

This statement is works to convert it back to time:-
SELECT CAST(STUFF(STUFF(STUFF(RIGHT('00000000' +
CAST(101 AS VARCHAR),8),3,0,':'),6,0,':'),9,0,'.') AS TIME) as sqltime

How do I merge this time convert and date convert to be as datetime data?

Yes.. I find it can be done. Lol.. I modified something too on the code.

Dim val1, val2 As Integer
Dim colname As String
For i = 0 To dt_A.Columns.Count - 1
colname = dt_A.Columns(i).ToString
dt_C.Columns.Add(colname)
Next
Dim int(dt_C.Columns.Count - 1) As Integer
For i = 0 To dt_C.Columns.Count - 1
val1 = dt_A.Rows(0).Item(i)
val2 = dt_B.Rows(0).Item(i)
int(i) = val1 - val2
Next
Dim ndr As DataRow = dt_C.NewRow
For i = 0 To int.Length - 1
ndr(dt_A.Columns(i).ToString) = int(i)
Next
dt_C.Rows.Add(ndr)

All shows single line

It will load configuration from settings.ini file. The sample data that will fill into structure:-

With udt_config
.kioskid = "K001"
.kiosklevel = "GF"
.kioskloc = "A1"
End With

udt_config.kiosklevel is a string structure when first Application_Startup that retrieve program setting from App.Config file..

This was my structure declare in global module:-

<pre lang="VB.NET">
Public udt_config As CONFIG

Public Structure CONFIG
Dim kioskid As String
Dim kioskloc As String
Dim kiosklevel As String
End Structure</pre>

Ok dave, I understand. Now I want to share my finding. I put a breakpoint on devloc= udt_config.kiosklevel and yes it will pass the value and I step into every line of code. Yes the floor with have value.

But if I delete the breakpoint which it will running normally, ahaa devloc will be nothing.

Stepping through each line start from assigning value to the devloc on breakpoint, all is well. Retract back breakpoint, nothing.

I just want to know how this problem is called in programming side. I search for "wpf value is nothing when first time load" and it just an article of some VS. Might wrong on my keywords

Dave,

That is what I'm curious about. The function will be use on the same page but on different button so each button will assign value of it to the parameters. There will be a LG, GF, L1, L2 button. I try to move the code to private sub. But same exception occur when running the program and go to the map page.

Apologies to 3 of you sir.
I already update my code. I have try another options and it still failed. So those are my current code.

I have try your approach, yes it clean well the object. But for a long run, continuous torture the program navigation forward and back, it will increase and not decrease. I also put in Disposal Finally in my code. Same things happen..

Hi Rick,

I'm totally need its functionality since I'm doing a interactive kiosk directory system. That's the worst part

I try to put a break point on string displayName = (string)data; but I don't know why the breakpoint was not being hit

Hi Dave,

I understand about not troubling people for solving my code. so thats why I post about some hint that I can do which is other programmer do to make their software running good on lower spec hardware especially eith IPC comes from China.

Never overcome this matter on previous 5 projects which using local assembly of well-known hardware and NUC. Not a single crash for 12hours running for since 2011

Hi Matt,

Somehow from task manager(again sorry for looking at it) like the image sample task manager image[^] the RAM Graph and of left panel is at Max but in word "In Use" like 900MB in image is just 2.5GB where graph is at 3.9GB and thats what make me weird

Hi Dave, I have seen some information about creating same instance over and over in forum or blog if I'm not mistaken. Still I don't know where to start digging the cause.

How to post a code?I can't post the code here as it might prolong this page. Any site to paste code?

Hi CHill,

I'm using Visual Studio to perform Schema Comparison because in VS2015 Pro, it don't have "Data Compare & Schema Compare". Now I can perform schema update which it detect which part of the target data that differ from source.

Now I'm hanging on how to perform automation script to running on some interval. Do you have any thought/idea/suggestion/recommendation?

Ah..my bad. Thanks for remind me

Hi CHill,

The database is on another place e.g. server but seems you are giving two things. So I try googling for "sql server replication vs synchronization" so I need to understand the details first before start. Thanks :-)

Hi Chill,

THe video file is not downloading from any network. It was placed in the same main folder as program executable e.g. /debug/video/video1.mov

By the way since u mention protected folder, if the drive is running on C:\ partition only and the executable folder is place on the desktop, is it consider as protected too?

Hi SA,

I'm showing both because C# is my previous staff in my office use to write code, while VB.NET is what I'm writing and try to do it in VB.NET and I don't know how to write it using VB.NET in WPF since it write in C# and WinForms. The code of Args if write on Program.cs

And I'm wondering if Win8 is stable or not. Not having this kind of problem on Win7. When activation is appear, program sometimes not stable. Like orientation; windows suddenly change it's orientation to origin before my program is launching and I see the Activation is there.

And I'm wondering if Win8 is stable or not. Not having this kind of problem on Win7. When activation is appear, program sometimes not stable. Like orientation; windows suddenly change it's orientation to origin before my program is launching and I see the Activation is there.

On the event viewer under Application, my program logged under Error with Application Hang. Also there is PerfLib, ESTENT error too.

Hi Dave,

Thanks for explanation. Luckily from start, my program only accept JPEG/JPG/PNG only. Lol I'm a bit relief on that.

Thank you sir

Hi Dave,

Thanks for the explanation. Yes so far I'm observing using Task Manager to see how the RAM is increase and reduce over time. I'll take a look on that .NET CLR.

Regarding the image size, my client is selecting JPEG/JPG file format for image and PNG for logo. Is PNG is better than JPEG? I've seen someone in a blog said memory is using for displaying image by formula 1 pixel * 4bytes. So which type of image that works well to reduce the byte other than BMP?

Hi SA,

Because my system is an interactive kiosk. So the customer placed the design so much on image to be display at "PageList.xaml" the problem on display the converted image is one thing. Another thing is when query all possible list BLOB is also make the the system freeze for 2-4 seconds

@Ralf, sorry for that. Not very familiar with forum things much. Thanks for the advise

Yes it is now been answered and work perfectly but a bit differ. I'll put in solutions. If you have another approach, you may add it too for other references.

Thanks

This is what I do and it add perfectly:


Private Sub ResizeThis(ByVal imgpath As String, ByVal newpath As String)
Try
Dim fs As New FileStream(imgpath, FileMode.Open)
Dim original As Image = Image.FromStream(fs)
fs.Close()
Dim intWidth As Integer = original.Width : Dim intHeight As Integer = original.Height
Dim newWidth, newHeight As Integer
If intWidth > 1000 Then
newWidth = 1000
newHeight = 1000 * (intHeight / intWidth)
File.Delete(imgpath)
Using ResizedImage As New Bitmap(original, newWidth, newHeight)
ResizedImage.Save(imgpath, Drawing.Imaging.ImageFormat.Png)
End Using
End If
Catch ex As Exception
str_errmsg = "Oops! Something is problem with resize logo dimension."
MessageBox.Show(str_errmsg & vbCrLf & "Err: " & ex.Message)
End Try
End Sub

from your question for my question:-
Q1: The image save to mysql blob is having multi dimension especially logo since logo size is various. So, I want to resize it to new width only and the height will auto adjust to aspect ratio. Because if I fix the width and height to the image component in my program, it will look stretch/fat look.

Q2: Yes, you have give me a hint. Delete old image and save with new. Yes. I will try that

Hi, where should I declare the DLLImport? In App.xaml/Global/New Class/Every page?

Hi johan,
1) What mean by strong/weak reference?
2) Every event is using within single page only. Not sharing and be used by another page. When the page is unloaded, I will empty every variable that been declared and use from the page e.g. Screen Timer, BackgroundWorker, Byte().
3) I load every DynamicResource from ResourceDictionary page. All page have same button/control for some function e.g. Continue, Back, Next, Previous.
4) On timer timeout, the page will navigate back to home page. At new instance of the page, I will clear all global variable/declaration e.g Structure, Arraylist.

The byte that im holding contains image of each ID. I will store the ID and image to arraylist and stream each byte to imagebrush on program. Is it mean that after I'm navigating to other page, the arraylist is not release as nothing?

I want to post my code but which part, that I dont know where to start. Since every navigation to other page will increase the memory usage. When navigating back to home screen, its still stay at last memory usage. If navigate again, then it will increase more

Hi, thanks for recommendation. I see the task manager because pc is hang and when I see the memory use for my application is around 200MB. I'm now try to inspect using memory profiler but I dont know how to read the snapshot. I will update back the image

Did you mean that by the temp file being large because of the program crash? Yes sometimes my program crash because hardware spec cant handle my interactive program. And is laggy in program while using also made the temp file become large? Thanks for the advice for suggesting temp file. Its really helpful.

Oh..apologize for not mention it before. actually I'm designing the page using Blend and control it using VS. Because of running all animation and show only one path, that makes the system lag, that's why I'm deciding to put the animation on code rather than make it trigger on page load. Thanks for your explanation under solutions. Appreciate it

I'm actually made all the animation in Blend. To apply 1 animation that animate about 200 paths made the computer lag(animate all but showing 1path only depends on user selection on previous page). So, I want to made it in code to perform animation on specific path only.

Yeah man, its work. Thanks. But I made a little bit modification which combines the with yours:-
Dim mypath As New Shapes.Path()
Dim offset_animation As New DoubleAnimation()

offset_animation.From = 0
offset_animation.To = -14
offset_animation.Duration = New Duration(TimeSpan.FromSeconds(1))
offset_animation.RepeatBehavior = RepeatBehavior.Forever
mypath.StrokeDashOffset = ("-14")
mypath.BeginAnimation(Shape.StrokeDashOffsetProperty, offset_animation)

Hi, no this one not online yet.so I made the localhost. Installing MySQL database to the kiosk. Can you explain to me how to cut the blob size? The image size is 256kb and after convert the image to byte, the size of bytes are 2mil something e.g 20049591 and the blob which I set to Tiny,Blob can't accept the bytes unless it is MediumBlob or LongBlob..

No..in tablename.sql

Hi sergey,

I do have a log for this exception. This problem occur on runtime not debugging. So the message of exception were write on log before program crash showing "My application has stopped working".. The name of page for navigation are stored in variable depends on button user clicked. If clicking once, not a problem. But click using godspeed hand (system are used by public at various age from children to veteran) the system unable to handle link it should go and goes exception before crash and back to desktop.

THis code i use and it works perfect. I dont know why when even I set the image stretch to Uniform, it still like rescale the rectangle. WHen using border, it center the image on it. Thanks

using background worker?

OMG..I forgot already since it is two years apart from my question. Apologies for this as that time, I'm developing and manage a couple of hardware..

Not the image, but the exe become smaller where image are not embed to the exe but refer to the link which dynamic

My man, you are a savior. Many great thanks for the idea. I open the vbproj using notepad and see not a character. So based from your idea, I open back previous backup(same old program),full copy and paste to null vbproj and save. Open back the solution, rebuild and it went just like before. Thanks man. Very-very thanks to you. May God bless you.

ok thanks m8

like this? http://wpf.2000things.com/tag/zindex/

already edit.all the control is locate under main layout when creating a new page/window

Where can I find the MySQL log? Where should I find it? In sender PC or retrieve PC? It happen here: mb.ImportFromFile(sqlpath). I already check back the Inbound Rules in Firewall and I check all rules(Private,Domain and Public). But another thing occur, regarding timeout. What should I for timeout? Should I insert the timeout on connstring or commandtimeout(MySQLCommand) in VB code before sending the file?

Hello Philippe, the exception occur at Dim sequence As FixedDocumentSequence = xps.GetFixedDocumentSequence() ''//////////Exception in here on Public Sub xpsToBmp(). If I skip using background worker and direct to Private Function DoSelectWork() As Boolean, ssytem able to convert xps file to bitmap but my application will be freeze until all page is convert to bitmap. That's why I try to put it on background worker. But it stop with exception as per title.

Hello sir, this word appear when I debug the code within my solutions and it stop at comment on xpsToBmp() function.

I'm having error when deleting the directory: IO.Directory.Delete(Path.GetDirectoryName(Assembly.GetExecutingAssembly().Location) & "\XPS", True)

This error occur IF I load from database and then I select the XPS file. Because both function will goes on same folder. Eg: Assume my debug on C:\Debug. I load the data from database, it will stream the byte to file and I save it in C:\Debug\XPS\x_001.bmp and until last image eg: x_021.bmp..Then let's assume client want to change the display data with new XPS. The select the XPS file and I will convert XPS to Bitmap in the same folder C:\Debug\XPS\. But before I convert the XPS, I will check if the folder XPS exist, I will delete it first. And that's the problem comes. I already dispose the panel,picturebox,image control,arraylist. But still occur.

I already debug the code and hover every variable to see if the value still hold the previous value, and it is nothing.

I hope my explanation can be understand though I'm not good at explaining..

thanks..manage to deal with it as your advise. When saving the filename into database, I format it to string as:-

strName = pageCount.ToString("0000")

And it's work. Thanks for advise

Yeah..it's work! I'm converting the image to bitmap and when saving, I stream each images as byte and save to mysql. And to display it back, I get all images byte and stream it to file to location and read it from there(method to display is same as converting to images and display it)..thanks

Sorry SA. Closing this thread. I misslook this symbol "()" to be apply to all byte declaration..

why don't you try to use background worker and timer? If you desired to check the connection status let's say every 5minutes, start the timer. Every timer tick, call background worker to do the checking. Why background worker? To prevent your interface is freeze(hang) while the system is check for connection..

i suggest you to create an ID(unique) or tags (if you divide the image by category) so when you search back, using that ID to find the image. Everything need to have unique ID for easy finding and prevent showing wrong images

Reason why I don't want to use binding is that the data from database is separate in many column for backend management app. But at front, I will conclude let's say 5 column to be 1 statement which mean at datagrid, it will be shown as 1 column. That's what I'm thinking. Any help?

In add new item, there are Window (WPF). Page (WPF) and the other things. I use page. Not window. And in my page, i put a browser control. My page xaml starts with (Page x:Class=Page1) where Window xaml start with (window x:class=Window1). the one that you show is for using window.i use page. page not have windows closing as my application set kiosk evironment(full screen). apologies if are clear with question.

Because I don't have much experience on manipulate using binding. That's bad for me..

update the post..

And another things is, how to cancel the background process so anything that it done can be stop? Right now, I put the code on btn_cancel as below:-

If BackgroundWorker1.IsBusy = True Then
'If it supports cancellation, Cancel It
If BackgroundWorker1.WorkerSupportsCancellation Then
' Tell the Background Worker to stop working.
BackgroundWorker1.CancelAsync()
AppendNormal("Sending cancel by user...")
lbl_progress.Text = "Transfer task cancel by user."
End If
End If

the transfer process is still going through.

I have place the arr_sendkiosk = Nothing at RunWorkerCompleted before BackgroundWorker1.Dispose() but it still DoWork twice. I mean, after sending the image at DoWork, it not goes to RunWorkerCompleted and run it again. Even I put

If IsNothing(arr_sendkiosk) Then
Exit Sub
End If

before "If cbx_images.Checked = True Then", it not empty as it not goes to RunWorkerCompleted..

- StartSendingImages is Sub which done the transfering file to selected computer

But...I don't use Window. I use Page. This application is full screen without any border or titlebar. So, Page offer Page_Unloaded only

Ok.. I will try to do what you suggested and will update later. Thanks

Hi SA,

I already able to open a onscreenkeyboard but it has all function in keyboard. Is there any possibilities to show wanted keychars on it?

On your second approach, that is a better option to give what is needed on my own keyboard. But how to send characters let's say user press into input; how to detect the textbox? And when user press my keyboard, how to send the characters into the webpages input?

??? Lol..most give a 'way' to do it, not programming it..

Hi Dave,

Thanks for the remind. Exception message "Access is denied. (Exception from HRESULT: 0x80070005 (E_ACCESSDENIED))"

i'm using this because if there is any file require update, then I will select a folder an copied all inside folder to the other PC. The main program is running on flash. There is another vendor do this. While me, doing the distribution for any update to the content. Can my situation implement it too?

thanks man..

That code is for WinForm sample to view a another form in my current form. That code is run good for me. I'm asking is there any way that equivalent this view to be use in WPF. At WinForm, it will be form in a form. So in WPF, it will be Window in Window. I don't use Page.

yeah man..awesome!

Thanks man..it's work!!!! Great

I can't see the idea :(

thanks man..try it..and it was good :)

So the "computername.subdomain.domain.com" you said is maybe eg: "\\myuser.localplace". Because I saw some kind of this on their 'Run' dialog.

their ip said sometimes is changing because they have a huge building. So each PC has a unique computer name which not changing itself unless we change it. That's the reason I asking this question..

yes i do.. i find it in COM. It has the Shockwave checkbox. even I check the box, it not appear in toolbox

simple as that?

It error said out of bound of array.

May I have your advise Xaver? How to do it?

yes ledtech3..the code is to read what the byte number of the specific index. Because vendor has stated that on bytes(38) is the condition where the UPS is OK or not.

I have select 1 image that will place on the picturebox (PB) when the form load. Whenever I bring the .exe file, it will show where there is no image besides the .exe file. I know it embed into the program. That is the image that I want to display when I remove an image that I load to the PB. 1 image per PB. But if I dispose the image, it will show a blank PB on my program. Not a default image that appear when I load the form

Exception occur when ExecuteNonQuery. Syntax error "INSERT INTO" statement it said.

Public Function MDBInsertFromSQL() As Boolean
Dim strSQL As String
Dim cmd As New OleDbCommand
Dim intRec, icnt As Integer
Try
Dim connect As New OleDb.OleDbConnection
connect.ConnectionString = strcLocalProp.m_strLocalDBConnStr
For i = 0 To (arrDirInfo.Count - 1)
strSQL = "INSERT INTO tblMallDir(dirno,dirname,dirdetails,category,level,lotno) VALUES (@dirno,@dirname,@dirdetails,@category,@level,@lotno);"
Dim command As New System.Data.OleDb.OleDbCommand(strSQL, connect)
command.Connection = connect
connect.Open()
command.Parameters.AddWithValue("@dirno", arrDirInfo.Item(i).strShopNo)
command.Parameters.AddWithValue("@dirname", arrDirInfo.Item(i).strShopName)
command.Parameters.AddWithValue("@dirdetails", arrDirInfo.Item(i).strShopDetails)
command.Parameters.AddWithValue("@category", arrDirInfo.Item(i).strCategory)
command.Parameters.AddWithValue("@level", arrDirInfo.Item(i).strLevel)
command.Parameters.AddWithValue("@lotno", arrDirInfo.Item(i).strLotNo)
command.ExecuteNonQuery() 'Exception here
command.Dispose()
connect.Close()
Next
Catch ex As Exception
strErrMsg = "Oops! Something is wrong with inserting data from server to local database"
MessageBox.Show(strErrMsg & vbCrLf & "Err: " & ex.Message)
MDBRollbackTrans()
Return False
Finally
If (Not IsNothing(cmd)) Then
cmd.Dispose()
cmd = Nothing
MDBCloseConnection()
End If
End Try
End Function

It error at command.ExecuteNonQuery at first loop before it dispose..yes I do insert statement to insert data store in arraylist to be filled into Ms Access database. The MDBBeginTrans(),MDBCommitTrans() is use to proceed to commit trans. Safe procedure so when the intRec = 0 i will rollback the insert transaction.

I have many data for each strSQL..so I use 6 to see why this problem occur. But still same. I never do this before. Does the strSQL that I put is correct where the values should put question mark for each data that I want to insert?

It goes for exception "Number of query values and destination fields are not the same."

Please look at my new code above see what I lack..thanks

I also do this and it works :)

arrStr = str.Split()

I conclude both of jerrykid and krunal answer and got the screen that I want.
For jerry: I can't do the "Screen.PrimaryScreen.Bounds.Height - value" because running on Vista or XP or 7 or 8 will give a differ height

For Krunal, I do as your suggestion, it fill the whole area that I want :) but it not start as centerscreen event I set it on StartPosition. So I combine both of your answer as below;

Me.Size = New Size(Screen.PrimaryScreen.Bounds.Width, Screen.PrimaryScreen.WorkingArea.Size.Height) and all good. Thanks to both of you..

Oh..so the is some differ from database?is it sql statement is same to all database regardless it is oracle,mysql,mssql etc?

I try this and work..SELECT * from malldir.tblUser WHERE userid !='user';

tq for giving the idea.

I try this and work..SELECT * from malldir.tblUser WHERE userid !='user';

tq for giving the idea.

it not view other data..all not shown at database.. i test this query on mysql workbench..i try your way and this SELECT * from malldir.tblUser WHERE userid <> 'admin'; but nothing show in result. any other way?

it not view other data..all not shown at database.. i test this query on mysql workbench..i try your way and this SELECT * from malldir.tblUser WHERE userid not in (@'admin'); but nothing show in result. any other way?

Nice..test it and got it perfectly..thanks man

thanks danish..its work..more better.thanks

Sir, may I have a details explanation on this? I seem not quite understand. Forgive me

Hi peter..thank you sir..u are awesome. This code works.many thanks for the solution and for the link :)

Nice one sir..thanks :)

Native is meaning the final DLL? This is the DLL use to operate a device. From your explanation, the answer is no. Thank you Griff

totally.. I got a C++ code and I translate the code using a software. When I paste into VB.NET, it get blue string error on:

Dim bmp As System.IntPtr = CType(LoadImage(0, file_name, IMAGE_BITMAP, row, col, LR_LOADFROMFILE Or LR_SHARED), System.IntPtr)
m_bmpPicture1.SetBitmap(bmp)
DeleteObject(bmp)

The code from C++ is : rsp[i+11] -= 0x30;
The code convert to VB is : rsp(i + 2) -= &H30

Now, can u help me to describe how to overcome this? I got error for "rsp(i + 2) -= &H30" which stated that: Operator '-' is not defined for types 'Char' and 'Integer'

On supplied C++ code there is more come for this calculation. I want to know the proper way to handle this kind of operation. Thank you

Hye Griff,

Still appear blue string noted that "Operator '-' is not defined for types 'Char' and 'Integer'"

Hi Sergey,

I'm totally not know that. Yes.. my program able to save the scanned image from inserted check. But I'm not able to reinforce using OCR mode. Did the forcing OCR mode need some special calling to the hardware?

Hi SA,

The RunAccept will call the event from dll function. This is the sample of code that vendor provide. How to handle the bytes that return from the device? Which mean I want to count the bytes receive first before assign to to my declaration.

Actually this is my first time handling hardware engineering..

Hi Zoltan,

Sorry to make you misunderstanding. I want to create a program that can replace button to perform action. Let's say user key in an ID on textboxt1. User will click on button Enter to perform searching. I want user to press Enter on keyboard so when it perform, I will detect user press that Enter key and I will perform search.

Oh is that so? OK understand. Thanks Ron

Hi Zoltan,

I apologize for making a confuse question here. Actually I create a simple program using WinForm for VB.net 2010 which when I press a certain key on keyboard, it will perform action such as refresh listview(F5),cancel input (Esc),saving (Ctrl+S) and so on. I guest this integrate mean I need to specify which key is press to perform specific action as stated before. I assume that I will perform all those function using keyboard not by mouse to click. I dont want to use the Alt + XXXX where I can put it on the button function with the _ on the character (if you got what I mean)

Awesome..it's works...tq :)

Thank you Mr. Griff,

It is all good

I can't extend the segment by myself since the customer database is run by another vendor to handle..whether they extend the temp size or give me another query to optimize the join table searching

Yup sir,

I guess the best approach is sort automatically when query the data.tq

Please forget all the green (as comment). It's all use in code. That's VB language detect ' on code project

Hi Mr. Griff,

I already test the try cast, but anyhow it show blue string "'TryCast' operand must be reference type, but 'modGlobal.Details' is a value type"

Anyway, I finally found the way to retrieve the data by using:

For i = 0 To (strucStatementInfo.strMaster.Count - 1)
With strucStatementInfo.strMaster(i)
strText1 = .strTarikh
strText2 = .strStatus
End With
Next


Therefore, the value will be retrieve.. Thank you Mr. Griff for your help

Sample of my code are here http://www.codeproject.com/Questions/586785/Hardwareplusprogrammingplus-comport

everytime I send a command until it return ack2 data, it take times..the manufacturer prgram does not provide with source code because my current project is d-level programming.i need to refer to all of their documentation. That's why, the code is build with logic from document..

Sorry guys...my bad,it because the Parity that should be even but I read 0 from INI files..

it start since objComport.Write where at ReadBytes is 0 while the windows form is showing 2 when i breakpoint in it.why?

I also have the develop a money changing note module to give change for any exceed payment. My module manufacturer don't give me SDK but they give test program and D-Level spec. It's hard to program it. Takes 3 days to understand and 1 week development

yes..the error means,another action to perform if user not interact

I'm running a hardware check status. Which when the events come, it will start the timer every 5 seconds for 30 seconds which at every 5 seconds, it will check the status whether is there any action from user or not. If i check at 30seconds, it takes to long (for public uses). So let's say at 10 seconds user interact, i will do the next command. if after check at 30 seconds still don't have any interact, i will raise error events.

what i mean is when the myTimer.Tick,should i add the value of current (5000) into iTimer and use condition if iTimer=30000 then ,my code here to raise or run any events? and if the iTimer<>30000 then timer.start again?

Hi Sergey,

I already use the code from your link at stakeflow by running the batch with vb script anddddddddd it's work. thank man. you rock. +5 for u..

I've no experience in PowerShell. Looking to it's code make me feel dizzy. LOL :) better with vbs

Instead of that, the compress only folder, but what if i want to compress multi extension file in a single compress. Means *.dll and *.ini will be compress into Application.zip (example)..is it possible? or I just copy the file into new folder and compress the new folder only?

What's your recommended?

Sir, thank you for your assistance. I've found the way from the page,this is the way I use:

Dim Reader As StreamWriter
Reader = New StreamWriter("C:\Test.txt")
Reader.Write(TextBox1.Text)
Reader.Close()

Lemme try first with a simple program..then I'll feedback you..

Sir, I've seen through the page. But I can't even see the code how to clean all content on current textfile. Let's say the textfile content a text with this:

Please refer to nearest counter
for further assistance

This line of code is for example the current text on the textfile. If I want to edit the thing using my program (use for Support Engineer if there any changes on this) to:

If you have any inquiry
please call 1-800-8585

So this is what I mean. I'm glad for your assistance sir

Yeah sir..I'll look forward on it

haha..I'll try to read first and feedback to you what I'm see through the page..tq

I'm sorry Christian..btw thank for giving some solution here

It's okay Ashok, I have found. By using Math.Floor(dblUderPaid/10)

I try to use it in VB but it show invalid character.

Thanks Ashok, your MOD returning me the correct value. Thank a lot. Btw I have another one question regarding on my issue. Let's say I have another variable name intTicketCount as Integer.

The $25 / 10 is equal to $2.5 rite? how can I get the value infront of point?means if 2.5 it will return 2, if 2.7 it will return 2, if 6.7 it will return 6 by using math operation?

I'm having this because it need to know the count of ticket to be print and the balance need to be returned. Your solution solve my balance returned. But if you could help me to find the count ticket?

already done before I post this question. I have no idea why it doesn't read that in the database has value.

Hey man,

Thank..btw I've just got another option for this..

Mybe someone will refer to this as well as yours.

Private Sub SetMerchantValue()
Dim strArr(2) As String
Dim strSplitter As Char = ","

Try
strArr = objScreenSetting.Merchant1.Split(strSplitter)
clsGlobVars.strucMerchant.bMerch1 = strArr(0)
clsGlobVars.strucMerchant.strMerchID1 = strArr(1)
clsGlobVars.strucMerchant.strMerchName1 = strArr(2)

strArr = objScreenSetting.Merchant2.Split(strSplitter)
clsGlobVars.strucMerchant.bMerch2 = strArr(0)
clsGlobVars.strucMerchant.strMerchID2 = strArr(1)
clsGlobVars.strucMerchant.strMerchName2 = strArr(2)

strArr = objScreenSetting.Merchant3.Split(strSplitter)
clsGlobVars.strucMerchant.bMerch3 = strArr(0)
clsGlobVars.strucMerchant.strMerchID3 = strArr(1)
clsGlobVars.strucMerchant.strMerchName3 = strArr(2)

strArr = objScreenSetting.Merchant4.Split(strSplitter)
clsGlobVars.strucMerchant.bMerch4 = strArr(0)
clsGlobVars.strucMerchant.strMerchID4 = strArr(1)
clsGlobVars.strucMerchant.strMerchName4 = strArr(2)

strArr = objScreenSetting.Merchant5.Split(strSplitter)
clsGlobVars.strucMerchant.bMerch5 = strArr(0)
clsGlobVars.strucMerchant.strMerchID5 = strArr(1)
clsGlobVars.strucMerchant.strMerchName5 = strArr(2)

strArr = objScreenSetting.Merchant6.Split(strSplitter)
clsGlobVars.strucMerchant.bMerch6 = strArr(0)
clsGlobVars.strucMerchant.strMerchID6 = strArr(1)
clsGlobVars.strucMerchant.strMerchName6 = strArr(2)

strArr = objScreenSetting.Merchant7.Split(strSplitter)
clsGlobVars.strucMerchant.bMerch7 = strArr(0)
clsGlobVars.strucMerchant.strMerchID7 = strArr(1)
clsGlobVars.strucMerchant.strMerchName7 = strArr(2)

strArr = objScreenSetting.Merchant8.Split(strSplitter)
clsGlobVars.strucMerchant.bMerch8 = strArr(0)
clsGlobVars.strucMerchant.strMerchID8 = strArr(1)
clsGlobVars.strucMerchant.strMerchName8 = strArr(2)
Catch ex As Exception

End Try
End Sub

Thank again for helping me Rob

5*..thank you for your help.now i can save my data just like i need..

Thank you Richard for your reply. but it's not working..

Thanks Griff..solving my problem..5 for u and many2 thanks..

because I add the new form inside the current form and set new point location when it show..so that's why I use Me.blaa3...i've try before where the startup page is the menu, it can be done. But when the startup page is login, it can't display which it will close the login form(because when call form Menu, it will hide the login page with Me.Hide correct? I've try to close the login form but it will end the application before the Menu display)..That's why bro I want a code which check the open form within the Menu form only,not the entire program

I'm sorry Hendra..I can't find a solution..I've tried it.thanks for helping

Tq VJ for your solution. Both of you and Pablo solution works for me.I give u 5! Thanks

I already use your steps..it's work.TQ pablo..5

Which mean this is the designer property code for every toolbox item? I understand your explanation..thank you Pablo

Thanks Richard..your link is helpfull..

Tq Nelek for adding..

Tq Dhanamanikandan..

I'm sorry Nilesh..the code not even run..

This is the code that I will actually want to put

If txtAdminPwd.Text <> String.Empty Then
If txtAdminPwd.Text = txtConfirmPwd.Text Then
pbxGreen.Visible = True
Else
pbxRed.Visible = True
End If
End If

Ok..tq samar

This is for ASP.NET but I'm using windows form application. I don't have any experience in Asp.NET code

tq kschuler..

Thank you sir..

Oh! That explain to me..now I totally understand..send a parameter and put the new value then return true. so if i want to grab the value after it, i just call the parameter that send the value to this function.am i right? tq SA

it's a function a located in other project of the main system

Okay..thank you for your support. I appreciate that :)

I already visit the site before but I can't use this code in VB.NET

objModal.Owner = Me

the .Owner is not show in the suggestion after "objModal."

:D Now I get it..the number that stored in database is in string type because it is not declare as amount. Just account number which contain only numeric value, not alphanumeric. But what my friend explain and some of your explanation, I just need to convert the string to integer IF I use the number for check digit.. This is the requirement to save the data to database. It must contain 7 digit and include 0 where the account number start with 1 and from database it will format it to 0000001..TQ for your explanation :)

Addition: I use command to upload the data into database from text file..

Currently there are a lot of data in it such as name, address, phone number and annual fee for membership..this data contains at least 8000 line in text file a.k.a notepad. The data is listed as line by line. Some of the data contain the special character as I ask question above. So I need some guide to handle this because it got error when it reach to data that contains special char. I'm not sure whether I suppose to include the special char but handle the events OR get rid of special char (check for special char and remove it)..please help me.

Is this will view all data that store in dataset?or it need to loop to find every details to be viewed?anyway, thanks for the code..

TQ Nikul..I'll try this

tq prerak

TQ rais..

TQ Griff

not banned, SA. But some of the result from what we search are not related to what we want..so that's why i said that i don't refer to google. i want to refer with some developer itself and if they have a link to the solution, then i will view it..

Tq Prdshukla

Yeah now i get what you say.
1) I declaring x as DataRow.
2) Then I use For..Next condition to fill the data from database to x and 3) After that I use:-
If (Not (data) is Nothing)

just because I want to check the database and if the data from database is not null, the data will be filled up in the form.

Dear Prasad. Tenkiu a lot.. Your method is working. Now I know. It must not put anything behind the second line syntax such as messageboxbuton or messageboxicon..if not, the underline blue string will appear..Tq prasad

Dear Kelvin,
I've tried it. But it doesn't work. I get it now. But I already try the Prasad method. It work.. Anyway, Tq Kelvin for helping

thank you Prerak.

oh..i see it.it okay because i also don't wat user able to edit because i'm afraid they will make mistake and chaos the data. So better let it like as viewed..thank you sir

.pdf format..because i already experience some application or data; when we click review, it will be displayed by PDF. Is there any coding to generate report by Crystal report and view it with PDF?

Tq Prdshukla..but right now, i want a coding to view data to PDF. Is there any code to command the button to find the data and view it with PDF?

Tq Uma

Tq Adit

Oh i see..thank you for you information Suresh

windows application..

Tq Bun Leap. I'll try this code.

perfect lesson..TQ sant

Thank you Toniyo

Thanks Prerak

thank you wayne

TQ Pravin..

Hi adit,

Is listbox able to view some sort of data that have 3 column? Right now, I try to put a data from textbox and datetimepicker to the listbox. But it failed. Also i try using listview. It also failed. The error appears is "because no accessible "Add" can be called without narrowing conversion."