moosty

Hello again, It is my foo, excuse me about misguiding you. Here is the right code: Option Explicit Private DisplayGotFocus As Boolean Private Sub Display_Click() DisplayGotFocus = Not DisplayGotFocus ' Reverse status before controlling If DisplayGotFocus Then Exit Sub ' /// Write your code here ' /// End of your code End Sub

Hello, Do you have an SSTab component on your form? If you have, you may face some troubles, some keyboard and mouse event can trigger twice. Microsoft accepts this bug, and offers avoid using SSTab component Also, Microsoft offers using a global variable to store event trigger status as follows: Option Explicit Private DisplayGotFocus As Boolean Private Sub Display_Click() If DisplayGotFocus Then Exit Sub ' /// Write your code here ' /// End of your code DisplayGotFocus = Not DisplayGotFocus End Sub I don't know why display_click does not work, try either: * Right click on "Display" and choose "Bring to front" * Program may see your "Click" as "DoubleClick", try to see if DoubleClick event triggered. I can't offer any more. If you find the reason, we will be glad if you share it in forum. Best Regards,

With eMbedded Visual Basic, it is possible to send Fins commands via UDP packets. However, it seems a little hard to program it. Winsock for PocketPC is not stable enough. Best Regards

Hello Friends, Has any one experiences with OMRON CJ/CG series with LabView? What is the best way to read / write data memories of a CJ/CG series PLC? Best Regards

If you only want to read inputs by VB, the best solution is host link. You can find some VB examples of reading data memory via hostlink in OMRON forums, changing only a few command in samples makes you able to read inputs. You can find my sample VB module for host link by clicking here Hope this helps

Hello, I am writing an HMI program in VB. Which will be replaced by an NT screen. I have not investigated in details, but I think NT screen always polls some data memories related to labels on NT screen, possibly host link protocol. May be you can write a VB program acts like a PLC and answers to read / write requests of NT/NS screen.

You can download a sample program here Thanks to Jay for this link. Hope this helps.

I have searched and could not find any documentation about vs720s hmd11. Are you sure that you have vs720s hmd11 ? I have found V700-HMD11 (Compact Reader), and read the related document about it. It seems that communicates via RS 232 and needs 5 VDC power supply. And its protocol is not very complicated. A software can easily be developed by VB. Best Regards

You do not need any driver. You can access to your CF slot as an ordinary serial RS232 port. Refer to your PocketPC manual to find out which serial port number is assigned to CF slot. Also you can try to open and communicate to ports one by one. I have found in may CASIO IT-700 that CF slots port number is 2. Find the attached document about your device. If you search previous posts, you can find some sample source codes in Microsoft eMbedded Visual Basic (eVB). I can help you if you need more assistance. OMRON_CF_Manual.pdf

Hello Haipro, I have experiences with CD1D, which is RS232 version of CD2D. Could you tell me more about what you want to do? I have tried CD1D by Protocol Macro (PLC), TXD-RXD commands (PLC) and Visual Basic (PC) I you tell me more, may be I can help you.

Hello, Smart cards communicate with TTL level (0-5 Volts) Asynchronus or synchronus serial communication. You can do a simple smart card reader interface circuit by using MAX 232 , some NAND & XOR logic gates an a crystal with 3.78 MHz. I have googled and find a sample in: http://www.technick.net/public/code/cp_dpa...ir_smartcard_rw this circuit seems like one I have done for a homework 5 years ago. Altough this circuit is very cheap, you need to use ISO 7816 communication protocols, and you have to build one for your self. And it is not easy to handle with PLC. So, the best solution may be finding a traditional smart card reader & writer with dirvers and simplified read & write protocols. If you find smart card reader & writer which is RS232 compatible (better if you find RS485 compatible) so it would be easy to integrate with PLC or PC. Best Regards

Can you send the binary file to the forum? May be exploring it by an Hex editer helps, may be we can find some hints for PLC type, software version etc.

Thanks Korhan, If I have free time, I will try to code a VB module for ZEN series. Thank you again

Hello Massimo, I was in a hurry and could not wind any chance to explain about the module. I am not in trust with CX-Server Lite, it sometimes hang the communication to PLC and do not give any feedback about the lost connection. And it is not light at all, runs much on system resources. So I have decided to develop the attached module. I have made only data memory read, write ,change and read PLC status functions. Place an MSComm object and change name to cmmPLC on a form named frmMain. "OpenPLC" function opens the communication port, however you need to do communication port settings in this function. I have loaded the settings from an ini file to global variables. Here is the code: Public Function OpenPLC() As Boolean On Error GoTo errHandler frmMain.cmmPLC.CommPort = CommPort frmMain.cmmPLC.Settings = Settings frmMain.cmmPLC.Handshaking = Handshake frmMain.cmmPLC.PortOpen = True OpenPLC = frmMain.cmmPLC.PortOpen Exit Function errHandler: PrintLog 0, "OpenPLC> " & Err.Description OpenPLC = False Exit Function End Function You need to change CommPort, Settings and Handshake values. (Also please see the timeout global variable at the beginning of module; Public TimeOut As Integer, I have also loaded this setting from ini file, however you can define it as constant.) If OpenPLC returns true, you can use other commands. You can read the DM by ReadDM function. Eg. Dim Data As String Data = ReadDM("2000", 5) If Len(Data) > 4 Then ' At least 1 word read successfully. If returned data length is smaller than 4, it is the error code MsgBox "Data read successfully:" & Data Else MsgBox "Error:" & Data End If Above sample shows how to read 5 words from DM2000. Below sample shows how to write "1234" to DM2000 and "ABCD" to DM2001 Dim Status As String Status = WriteDM("2000","1234ABCD") If Status = "00" THen MsgBox "Write operation successfull" Else MsgBox "Error on writing. Error:" & Status End If However, with this code you can read / write max. 28 words. For continuos data areas, you need to call the functions with the new parameters. And I agree sleepy, 19200 is enough and safe. If the distance is long and you are working in electromagnetical noisy environment, 115200 may cause problems. And another note, I have never tried my codes with CJ series, this codes are working with C200HE for 5 months without error. Best Regards,

Hello, Find the attached module for Hostlink communication. mdlPLC.zip

Hello, It seems fantastic. 5 years ago, I had my graduation thesis about developing a smart card reader/writer circuit controlled by linux. I have used Mandrake Linux, and developed program on ANSI C and compiled by GCC. It was a console application. A console application is not suitable for HMI and scada systems, so you have to develop and support your program with another way. Possibly KDevelop may be suitable for you especially if you are familiar to Microsoft Visual C. May be, the most difficult part is the linux side of the project. Do not afraid of PIC development. You can use Hi-Tech's PIC C compiler. This compiler has a free version with limited features like limited floating point operations, however for prototype production PIC C compiler can be used easily. Possible working time depends on your C / C++ knowledge and ability to search on the net.

Hi Sim, I have tries and noticed that the page corresponding to QUIET/EAS is not page "0008", it corresponds to page 4 in chip. QUIET/EAS page is page E, so I have tried to change my page specification to binary "0100 0000 000 000" equals to 4000 Hex, unfortunately I get a 14 error. I don't know how I made it, but my QUIET/EAS area turn in to "0000 0000" from "0300 0000", I have never succeeded any write operation in this area. I have only tried to use EAS Activate/deactivate command. Try to use EAS Activate : "0800" EAS Deactivate "0801" Try this, I could not find another solution. Sorry

Oww, I have never tried to use this bit. I have never used Reset Quiet bit before, it is interesting. I always had my I-CODE chips "Not Quiet". So, let's try something. Let me look at to I-CODE manual of Phillips. OK, it says that the first command to be executed is Reset QUIET bit. Now, let's search for "How to reset Quiet bit by OMRON" in manual. Not found. So, let me think When I read all the contents from my I-CODE, I saw that my block 3 seems as "03 00 00 00", so we can try to write the same value in to your chips in block 3. Now, let's build the request string, Read -> 02 (Look into page 4-21 of CF manual) Com. Options -> 00 Page Specification -> 00 08 Data -> 03 00 00 00 Can you try to send the following string: "0200000803000000" If you get an answer as "00", it means that Also I will try to do this. Hope this helps.

And here is the screen captures of the sample program.

All right guys, Here is a sample program for V720S-HMF01. String 310000FFFF works for old I_CODE. Program is in the zip file. It is strange bu I have received "70" when no tag around, I was surprised because waiting "72" Hope this helps. I_CODE.zip

Sorry, forgot to attach picture

Hello Sim & Concorde, It seems that your tag is I-CODE inside, old version. So, it is better to try 310000FFFF string to send. I have not exactly same 472PI-**-PDM model, but an I-CODE sample (credit card size) with me. I will try to read this chip. If successful, I will submit the sample program. Please try to test your tag closer to the reader. And do not forget that reading direction is in the downward. See attached picture. Your tag seems small and small tags require closer reading distances. I am trying to read I-CODE Best Regards,

Finally, I forgot to attach the manual. Here it is. Best Regards, OMRON_CF_Manual.pdf

OK I have found the manual, Now, lets divide my string into meaningful parts: 412000FFFF 41 : Read UID and memory data simultaneously for I-CODE SLI 20 : Communications option, (0010 0000) means that ISO/IEC15693 (4byte/page type), Show in HEX, (it is important here, DO NOT USE JIS MODE, otherwise you may read 8 as 0 or vice versa. Please use HEX. ), read in single trigger mode. Read bank 0, all available pages. So, if you are using old I-CODE cihps, your string can be as follows: "310000FFFF" Hope this helps. Note: Please tell me which PocketPC you are using. Best Regards,

Omron V720S-HMF01 reader/writer can be used by Phillips I-CODE and I-CODE SLI (ISO 15693) It seems that if your model is 472PT-**-PDM then V720S-HMF01 may not be used for this thpe of tag. I have tried V720S-HMF01 on both I-CODE and I-CODE SLI (ISO 15693) versions, it is working. So I am sure that 472PI-**-PDM model is compatible with your device. I am using: frmMain.cmmOMRON.Output = "412000FFFF" + Chr(13) For ISO 15693 I-CODE SLI chip. I have developed this program for CASSIOPEIA IT-700 model 4 ~ 5 months ago, and I dont remember how I build the string, I have to read the manual of V720S-HMF01 again. If you have 72 error, it seems that you are able to communicate to CF card, so your parameters are correct. I think you will only have to check your read and write requests, especially for tag types. If you tell me about the model of PDC Smart™ SuperBand®, I can tell you about the correct request for your tag. Also, which PocketPC are you using? CASIO? Symbol? Intermec? Which model? Because I am searching an alternative for my CASIO. Best Regars,