  | 
				VFP 愛用者社區 本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.   
				 | 
			 
		 
		 
	
		| 上一篇主題 :: 下一篇主題   | 
	 
	
	
		| 發表人 | 
		內容 | 
	 
	
		kechange
 
 
  註冊時間: 2004-12-16 文章: 81
 
  第 1 樓
  | 
		
			
				 發表於: 星期二 七月 05, 2005 7:21 pm    文章主題: 如何用VFP讀取盤點機的內的檔案出來? | 
				     | 
			 
			
				
  | 
			 
			
				有沒有辦法用VFP寫一個程式.讀取盤點機內的資料出來.盤點機接在 COM1 PORT?
 
 
我要如何透過 COM1 PORT 來去讀取資料.
 
 
盤點機型號為 PT630 精業的.
 
 
感激不盡!! | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		ruby
 
 
  註冊時間: 2003-06-03 文章: 25
 
  第 2 樓
  | 
		
			
				 發表於: 星期三 七月 06, 2005 3:01 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				*盤點機有安裝軟體,這部份是以前寫的,但只有測試過,沒實際用過,也忘記是不是跟你同一款的,不過精技應該都有附手冊才對,你可以以此研究看看,可以的話,記得通知一聲哦   
 
*
 
*mcom=通訊埠
 
*upfile=上傳檔名
 
*stfile=接收檔名
 
*
 
mstr='Easycom261\EASYCOM '
 
*通訊埠
 
mstr=mstr+str(mcom,1)+' A U '+upfile+' '+atfile   &&A U都是看其手冊來的,現在問我什麼意思,我也忘了   
 
*執行接收
 
run &mstr
 
*
 
i=0
 
do while file(atfile)
 
    =inkey(1)
 
    if i>50
 
       ans=messagebox('檔案傳輸失敗!!'+chr(13)+'是否繼續等待?',68,'訊息視窗')
 
       if ans<>6
 
          return .f.
 
       else 
 
          i=0
 
       endif
 
    endif
 
    i=i+1
 
enddo
 
sele 0
 
create cursor portable(pt1code c(13),porqty n(5),portime c(6))   &&盤點機資料
 
append from (atfile) type  DELIMITED WITH CHARACTER  ',' _________________ ruby | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		 | 
	 
 
  
  	 
	    
  	   | 
 	
您 無法 在這個版面發表文章 您 無法 在這個版面回覆文章 您 無法 在這個版面編輯文章 您 無法 在這個版面刪除文章 您 無法 在這個版面進行投票 您 無法 在這個版面附加檔案 您 無法 在這個版面下載檔案
  | 
   
  
		 |