最近在學習vpf6版本比較低.不過我這裡都是用的這個版本.要寫乙個採購系統,今天才寫到 請購 這一塊.
dodefault()
if !enpty(this.value)
return .f.
endif
自動生成當天日期
由當天日期生成請購單號
local old
old=alias()
ddd=thisform.
請購日期
1.value
select max(right(
請購單號
),3) as
單號from
請購單where
請購日期
=ddd into cursor bbb
thisform.
請購單號
1=』a』+dtos(date())+strtran(str(val(bbb.
單號)+1,3),』 『 , 『0』)
select(old)
return .f.
在部門編號裡面,按
enter
鍵讀取部門資料裡面的資料來輸入.
if lastkey<>13
return .f.
endif
lacal old
old=alias()
m.data= 『』
m.data1= 『』
do form
讀取部門
with this.value
replace
部門編號
with m.data
replace
部門名稱
with m.data1
thisform.refresh
在讀取部門資料裡面實現
vfp與
sql的連線
c1= 「select
部門編號
,部門名稱
from
部門資料
order by data1」
rr=sqlexec(ynlink_b,c1, 『temp』)
if rr<1
messagebox(「
讀取部門資料錯誤」)
endif
select temp
scan
scatter menvar
insert into data1 from menvar
endscan
select data1
go top
key_tab
希望看到的多提些意見,共同學習,共同分享.
python內容摘要 Python學習摘要 列表
ctrl p 上一行指令 ctrl n 下一行指令 tab 補齊 聯想 good 表示字串 good movies name1 name2 name3 print movies 0 print len movies movies.insert 0,name0 for迴圈 for each item ...
文章標題 內容 摘要的處理函式
imports system.data imports system.text.regularexpressions imports system.data.oledb public class showarticle inherits system.web.ui.page region web 窗...
關於完成埠，部分內容摘要
它之所以叫 完成 埠，就是說系統會在網路i o操作 完成 之後才會通知我們，也就是說，我們在接到系統的通知的時候，其實網路操作已經完成了，就是比如說在系統通知我們的時候，並非是有資料從網路上到來，而是來自於網路上的資料已經接收完畢了 或者是客戶端的連入請求已經被系統接入完畢了等等，我們只需要處理後面...