化妝品銷售管理系統(tǒng)(編輯修改稿)
2025-05-05 13:57 本頁面
【文章內(nèi)容簡介】 .=RGB(255,255,190) .=保質(zhì)期 .=50 .=160 .=50 endwith =sele * from 資料 into cursor tempENDCASE=grid1：recordsource=資料 recordsourcetype=4text1———————— interactivechange:WITH .ColumnCount=8 .=編號 15 / 34 .=RGB(255,255,190) .=RGB(255,255,190) .=品名 .=RGB(255,255,190) .=價格 .=RGB(255,255,190) .=規(guī)格 .=RGB(255,255,190) .=數(shù)量 .=RGB(255,255,190) .=產(chǎn)地 .=RGB(255,255,190) .=生產(chǎn)日期 .=RGB(255,255,190) .=保質(zhì)期 .=50 .=160 .=50 endwith =SELECT * FROM 資料 WHERE 品名 like ALLTRIM( .value) +39。%39。 INTO CURSOR tempmand2:click: WITH .ColumnCount=8 .=編號 .=RGB(255,255,190) .=RGB(255,255,190) .=品名 .=RGB(255,255,190) .=價格 .=RGB(255,255,190) .=規(guī)格 .=RGB(255,255,190) .=數(shù)量 .=RGB(255,255,190) 16 / 34 .=產(chǎn)地 .=RGB(255,255,190) .=生產(chǎn)日期 .=RGB(255,255,190) .=保質(zhì)期 .=50 .=160 .=50 endwith=SELECT * FROM 資料 INTO CURSOR temp mand3:click:a=messagebox(是否接入網(wǎng)絡？,4+32+0,溫馨提示)if a=6(endif 數(shù)據(jù)環(huán)境：Command1—————————click:a=alltrim()b=alltrim()if a==.==messagebox(輸入不能為空！,48,溫馨提示)else 17 / 34append blankreplace 姓名 with areplace 密碼 with bmessagebox(注冊成功！)endifmand2———————— click:==數(shù)據(jù)環(huán)境：Combo1: rowsourcetype=6 Rowsource=Command1————————click:aa=bb=trim()if aa==and bb==messagebox(數(shù)據(jù)不能為空！)elseloca for 姓名=aa and 密碼=bba=trim()if .=aa or .=bbmessagebox(輸入的用戶名或者密碼錯誤！,48,溫馨提示)else repl 密碼 with a 18 / 34messagebox(密碼修改成功！)endifendifrelease thisformCommand2————————click:release thisform數(shù)據(jù)環(huán)境：Command1————————click:USE EXCLUSIVE LOCATE ALL FOR 姓名=ALLTRIM()IF EOF()MESSAGEBOX(注銷用戶不存在！,48,溫馨提示)ELSEIF ==MESSAGEBOX(注銷不能為空！,48,溫馨提示)elsea=messagebox(是否刪除？,4+32+0,溫馨提示)if a=6dele ALL FOR 姓名=ALLTRIM() packmessagebox(刪除成功！)ENDIFENDIF 19 / 34ENDIF 數(shù)據(jù)環(huán)境：Command1————————click:do case case =1 select * from 資料 where 編號=alltrim() into cursor tempcase =2 select * from 資料 where 品名 like alltrim()+% into cursor tempcase =3 select * from 資料 where 單價= and 單價= into cursor temp endcasedo form mand2————————click:release thisform 20 / 34 Form1————————init:=temp數(shù)據(jù)環(huán)境：Form1————————init:= .F.= .F.= .F.= .F.= .F.= .t.= .t.= .t.= .t. 21 / 34= .t.Command1————————click:GO to
公司管理相關推薦
鄂ICP備17016276號-1