|
|
?????????
???????????????
????
1
2
3
4
5
???????????
????????
??
??????????????????(MIS),???????????????????????????????????????????????????????????????????????????????,???????
????,???? MICROSOFT??? VISUAL FoxPro????,?????????????????,??????????????????????????,???????????????,??,?????????????,???????,??????????????
?????????????
--------------??--------------
??????????????????????,???????????????????????,?????????????????????????????????????????????????????????????????????,?:????????,??????,???????????,?????????????????????
???????????,?????????,??????????????,?????????????????????????????????????,????????????????,???????????????.??:??????????????????????????????????????????????????????,??????????????,???????????
??????????????????????,?????????????????????????,?????????????????????
1??????
????????????????????????????????????????????????????????????????????????????????????????????????????????
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
???????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
1.1??????
?????????????????????????????????????????????????????????????????????????????????????
1.1.1:??
????????,????,????????????,?????????,?????????????????????????????.?????,????????????.
1.1.2:??
????????????????,??????????????,?????????,????????????????????.
1.1.3:????
??: ??, ??????;
??: Visual Foxpro6.0 , win2007.
1.1.4:????????
????????????????????????,???????????????????,???????????????????????,????????????,????,????,??????.
1.1.5:????????
1.1.6: ????????????
a:??????,???????????,????????????.
b:????????????????,???????????????,???????????????,???????????????.c:??????????????????,???????????,????????????????????????????. 1.2: ??????
???????????????????????????,??????????????????,???????,???????????
1.2.1:????:
??????????????:????,????????,??:???????,???????,???????,??????,????.??????????????.???????????????????????.
1.2.2:?????????
???????
?????????????????????????????????????????????????????????????????
??????????????
????????????????????????????
??????????????
????????????????
????????????????
???????
?????????????????
1.2.3:??
??: Student.exe ??Visual Foxpro6.0??.
??:??????,???????.
1.2.4:????
(1):?????????????,?????????????.
(2):??????????.
1.2.5:????
??????,????? (??)
???? (??)
???? (??)
????,??????? (??)
???? (??)
1.2.6:????
1):???????????
2):??????????????
3):?????????????????
4):????????????
1.2.7:????
2004?6?7?
1.3:????
????????????????????????????????,???????????????.
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
1.3.1:????
????????????????????,????,??????????: ????????,????,????????????,?????????,?????????????????????????????.?????,????????????.???????????????????????????????????????
1.3.2:????????:
????????????:
??????????????:
??????????????????
???????
1???
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
1.1 ????
????????????????????????????????????? ??????????????????????????????????
1.2 ??
???????????????
??????????????????
????: ???????????
???????????????
1.3 ??
?????Information Retrieval?????????????????????????????????????????????????????????????????????????????????????????????Information Search ?Information Seek??
?????????????????????????????????????????????????????????????????????????????
1.4????
a.??????????????????
b.???????????????????
c.?????????????????
d.?????????????????
e.?GB8567-88 ??????????????
f.?GB 8567-88 ????????????????
2. ??????
?????????????????????????????????????????????
3.??1?????????
3?1????
???????????INTERNET ?????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
???????????????????????????????????????????????????????????????????
3?2??
??????????????????????????????????????????????????????Word???Excel??????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
3?3??
a.??????
????????????????????5?????????????????????????2????????2????????2????????2?????????4????????4?????????????16????
b.??????
A. ???????1??
B. ??1????20????
c.????
?????????????????????????????????????????????????????????
d.????
??????????????????????????????????
e.???
???????????????????????????????????????????????????,???????
3?4???
??????????6???
3? 5???
??????????????????????????
3?6??
???locate for ?????a
If found ()
Wait windows????
Return
Else
Insert into
???
aaa=alltrim(thisform.pageframe1.????.text1.value)
select * from xs where ????=aaa into cursor wjc1
thisform.pageframe1.????.text1.value=????
thisform.pageframe1.????.text2.value=??
thisform.pageframe1.????.text3.value=??
thisform.pageframe1.????.text4.value=????
thisform.pageframe1.????.text5.value=????
thisform.pageframe1.????.text6.value=????
thisform.pageframe1.????.text7.value=????
thisform.pageframe1.????.text8.value=??
zhaopian=alltrim(??)
THISFORM.PAGEFRAME1.????.image1.picture=zhaopian
???
a=thisform.pageframe1.????.text1.value=????
b=thisform.pageframe1.????.text2.value=??
c=thisform.pageframe1.????.text3.value=??
d=thisform.pageframe1.????.text4.value=????
e=thisform.pageframe1.????.text5.value=????
f=thisform.pageframe1.????.text6.value=????
g=thisform.pageframe1.????.text7.value=????
N=MESSAGEBOX("?????????"+CHR(13)+CHR(13)+"????? "+a+CHR(13)+"??? "+b+chr(13)+"??? "+c+chr(13)+"????? "+d+chr(13)+"????? "+e;
+chr(13)+"????? "+f+chr(13)+"????? "+g,4+32+256,"????")
*N=MESSAGEBOX("?????????"+CHR(13)+CHR(13)+????? "+szh+chr(13)+"??? "+xm,4+32+256,"????")
IF N=6
DELETE FROM xs WHERE ????=a
ENDIF
SELECT * FROM xs INTO CURSOR XSTEMP WHERE NOT DELETED()
SELECT XSTEMP
GOTO TOP
THISFORM.PAGEFRAME1.????.TEXT1.VALUE=????
THISFORM.PAGEFRAME1.????.TEXT2.VALUE=??
THISFORM.PAGEFRAME1.????.TEXT3.VALUE=??
THISFORM.PAGEFRAME1.????.TEXT4.VALUE=????
THISFORM.PAGEFRAME1.????.TEXT5.VALUE=????
THISFORM.PAGEFRAME1.????.TEXT6.VALUE=????
THISFORM.PAGEFRAME1.????.TEXT7.VALUE=????
???
OPR=THISFORM.PAGEFRAME1.????
IF THIS.CAPTION="??"
THIS.CAPTION="????"
OPR.GRID1.VISIBLE=.T.
OPR.GRID1.COLUMNCOUNT=8
FOR I=1 TO 8
CLM="COLUMN"+ALLTRIM(STR(I))
OPR.GRID1 . &CLM . WIDTH=75
ENDFOR
OPR.GRID1.COLUMN1.HEADER1.CAPTION="????"
OPR.GRID1.COLUMN2.HEADER1.CAPTION="??"
OPR.GRID1.COLUMN3.HEADER1.CAPTION="??"
OPR.GRID1.COLUMN4.HEADER1.CAPTION="????"
OPR.GRID1.COLUMN5.HEADER1.CAPTION="????"
OPR.GRID1.COLUMN6.HEADER1.CAPTION="????"
OPR.GRID1.COLUMN7.HEADER1.CAPTION="????"
OPR.GRID1.COLUMN8.HEADER1.CAPTION="??"
OPR.GRID1.RECORDSOURCETYPE=4
OPR.GRID1.RECORDSOURCE="SELECT * FROM xs INTO CURSOR TEMP2" ELSE
THIS.CAPTION="??"
OPR.GRID1.VISIBLE=.F.
SELECT wjc
GOTO xsjlh
OPR.GRID1.COLUMN1.HEADER1.CAPTION="????"
OPR.GRID1.COLUMN2.HEADER1.CAPTION="??"
OPR.GRID1.COLUMN3.HEADER1.CAPTION="??"
OPR.GRID1.COLUMN4.HEADER1.CAPTION="????"
OPR.GRID1.COLUMN5.HEADER1.CAPTION="????"
OPR.GRID1.COLUMN6.HEADER1.CAPTION="????"
OPR.GRID1.COLUMN7.HEADER1.CAPTION="????"
OPR.GRID1.COLUMN8.HEADER1.CAPTION="??"
zhaopian=alltrim(??)
THISFORM.PAGEFRAME1.????.image1.picture=zhaopian
ENDIF
???REPORT FORM ??3 TO PRINT
3?7????
???????????????
??????????
???????????????????????
?????http://www.850500.com/news/2927.html
?????,??! |
|
发表于 2019-9-13 23:46:11