版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、<p><b> 合同管理系統(tǒng)</b></p><p><b> 摘 要</b></p><p> 合 同 管 理 系 統(tǒng) 可 幫 助 管 理 人 員 對(duì) 合 同 進(jìn) 行 有 效 的 管 理 , 方 便 、快 捷 的 簽 訂 合 同 。 對(duì) 合 同 的 管 理 ,從 根 本 上 改 變 過(guò) 去 低 效 的 手 工 簽 訂 的 方
2、 式 ,使 工 作 更 規(guī) 范 化 ,完 全 采 用 人 員 和 數(shù) 據(jù) 庫(kù) 的 管 理 工 作 方 式 。</p><p> 經(jīng) 過(guò) 分 析 如 此 情 況 ,我 使 用 了 V F 開(kāi) 發(fā) 工 具 , 利 用 其 提 供 的 各 種 面 向 對(duì) 象 的 開(kāi) 發(fā) 工 具 , 尤 其 是 數(shù) 據(jù) 窗 口 這 一 能 方 便 而 簡(jiǎn) 潔 操 縱 數(shù) 據(jù) 庫(kù) 的 智 能 化 對(duì) 象 .</p>&l
3、t;p> 關(guān)鍵詞: 合同 管理 數(shù)據(jù)庫(kù)</p><p><b> 引 言</b></p><p> 隨 著 計(jì) 算 機(jī) 及 網(wǎng) 絡(luò) 技 術(shù) 的 飛 速 隨 發(fā) 展 ,網(wǎng) 絡(luò) 技 術(shù) 應(yīng) 用 在 全 球 范 圍 內(nèi) 日 益 普 及 ,當(dāng) 今 社 會(huì) 正 快 速 向 信 息 化 社 會(huì) 前 進(jìn) ,信 息 自 動(dòng) 化 的 作 用 也 越 來(lái)
4、 越 大 。從 而 使 我 們 從 繁 雜 的 事 務(wù) 中 解 放 出 來(lái) ,提 高 了 我 們 的 工 作 效 率 。</p><p> 今 天 ,計(jì) 算 機(jī) 的 價(jià) 格 已 經(jīng) 十 分 的 低 廉 , 性 能 卻 有 了 長(zhǎng) 足 的 進(jìn) 步 .它 已 經(jīng) 應(yīng) 用 于 許 多 領(lǐng) 域 ,計(jì) 算 機(jī) 之 所 以 如 此 流 行 的 原 因 主 要 有 以 下 幾 方 面 :首 先 ,計(jì) 算 機(jī) 可 以 代 替
5、 人 工 進(jìn) 行 許 多 繁 雜 的 勞 動(dòng) ;其 次 ,計(jì) 算 機(jī) 可 以 節(jié) 省 許 多 資 源 ;第 三 ,計(jì) 算 機(jī) 可 以 大 大 的 提 高 人 們 的 工 作 效 率 ;第 四 ,計(jì) 算 機(jī) 可 以 使 敏 感 文 檔 更 加 完 全 等 。</p><p> 管 理 信 息 系 統(tǒng) 就 是 我 們 所 說(shuō) 的 M I S ,在 強(qiáng) 調(diào) 管 理 ,強(qiáng) 調(diào) 信 息 的 現(xiàn) 代 社 會(huì) 中 它 變 得
6、 越 來(lái) 越 普 及 。M I S 是 一 門 新 的 學(xué) 科 ,它 跨 越 了 若 干 個(gè) 領(lǐng) 域 ,比 如 管 理 科 、運(yùn) 籌 學(xué) 、統(tǒng) 計(jì) 學(xué) 以 及 計(jì) 算 機(jī) 科 學(xué) 。在 這 些 學(xué) 科 的 基 礎(chǔ) 上 ,形 成 信 息 收 集 和 加 工 的 方 法 , 從 而 形 成 一 個(gè) 縱 橫 交 織 的 系 統(tǒng) 。</p><p> 20世 紀(jì) ,隨 著 全 球 經(jīng) 濟(jì) 的 蓬 勃 發(fā) 展 ,眾 多
7、經(jīng) 濟(jì) 學(xué) 家 紛 紛 提 出 了 新 的 管 理 理 論。20世 紀(jì)50年 代 ,西 蒙 提 出 管 理 依 賴 于 信 息 和 決 策 的 思 想 。同 時(shí)期 的 維 納 發(fā) 表 了 控 制 論 ,他 認(rèn) 為 管 理 是 一 個(gè) 控 制 過(guò) 程 。1958年 ,蓋 爾 寫 到 :“ 管 理 將 以 較 低 的 成 本 得 到 及 時(shí) 準(zhǔn) 確 的 信 息 ,做 到 較 好 的 控 制”。這 個(gè) 時(shí) 期 ,計(jì) 算 機(jī) 開(kāi) 始 于 會(huì) 計(jì)
8、 工 作 ,數(shù) 據(jù) 處 理 一 詞 已 經(jīng) 出 現(xiàn) 。</p><p> 1 V F簡(jiǎn) 介</p><p> VIsual FoxP ro 6.0是 經(jīng) 歷 了 FoxPro 2.5 、FoxPro 3.0 、FoxPro 5.0 等 主 要 階 段后 推 出 的 。 </p><p> Visual FoxPro 6.0 在 程 序 開(kāi) 發(fā) 的 靈
9、 活 性 和 開(kāi) 放 性 上 有 了 進(jìn) 一 步 的 提 高 .簡(jiǎn) 化 的 數(shù) 據(jù) 管 理 和 更 為 合理 的 應(yīng) 用 程 序 開(kāi) 發(fā) 流 程 使 新 系 統(tǒng) 在 數(shù) 據(jù) 組 織 、定 義 數(shù) 據(jù) 庫(kù) 規(guī) 則 和 建 立 應(yīng) 用 程 序 等 方 面 變 得 更 簡(jiǎn) 單 易 行 。利 用 可 視 化 的 設(shè) 計(jì) 工 具 和 向 導(dǎo) ,用 戶 可 以 快 速 創(chuàng) 建 表 單 、查 詢 和 報(bào) 表 。另 外 系 統(tǒng) 提 供 集 成 化 的
10、開(kāi) 發(fā) 環(huán) 境 ,同 時(shí) 擁 有 功 能 強(qiáng) 大 的 面 向 對(duì) 象 程 序 設(shè) 計(jì) 工 具 以 及 客 戶 / 服 務(wù) 器 能 力 ,支持 OLE 及 ActiveX .</p><p> 1.1 項(xiàng) 目 及 數(shù) 據(jù) 庫(kù) 管 理</p><p> 對(duì) 項(xiàng) 目 及 數(shù) 據(jù) 有 更 強(qiáng) 的 控 制 ,能 夠 使 用 源 代 碼 管 理 產(chǎn) 品 ,同 時(shí) 在 “項(xiàng) 目 管 理 器” 中
11、能 看 到 組 件 的 狀 態(tài) 。數(shù) 據(jù) 庫(kù) 容 器 允 許 幾 個(gè) 用 戶 在 同 一 個(gè) 數(shù) 據(jù) 庫(kù) 中 同 時(shí) 創(chuàng) 建 或 修 改 對(duì) 象 。按 需 刷 新 的 特 性 允 許 用 戶 更 新 數(shù) 據(jù) 庫(kù) 或 項(xiàng) 目 的 視 圖 ?!?數(shù) 據(jù) 庫(kù) 設(shè) 計(jì) 器 ” 中 查 找 及 重 排 等 特 性 允 許 用 戶 迅 速 更 改 數(shù) 據(jù) 庫(kù) 中 對(duì) 象 的 外 觀 。 用 戶 可 以 使 用 鍵 盤 訪 問(wèn) “ 項(xiàng) 目 管 理 器
12、 ” 及 “ 項(xiàng) 目 管 理 器 ” 中 的 圖 標(biāo) ,并且 “ 數(shù) 據(jù) 庫(kù) 設(shè) 計(jì) 器 ” 可 以 幫 助 用 戶 迅 速 地 區(qū) 分 對(duì) 象 .數(shù) 據(jù) 庫(kù) 引 擎 現(xiàn) 在 支 持 更 改 與 規(guī) 則 沖 突 的 值 。保 守 式 緩 沖 可 以 更 有 效 地 處 理 記 錄 的 鎖 定 2。</p><p> 1.2 調(diào) 試 工 具 </p><p> 調(diào) 試 及 監(jiān) 控 應(yīng)
13、用 程 序 組 件 變 得 更 簡(jiǎn) 便 ,在 Visual FoxPro 主 窗 口 中 打 開(kāi) 調(diào) 試 工 具 的 選 項(xiàng) ,同 時(shí) 可 以 選 擇 這 些 調(diào) 試 工 具 與 用 戶 的 應(yīng) 用 程 序 界 面 是 一 起 顯 示 還 是 顯 示 在 另 外 一 個(gè) 分 離 的 窗 口 中( 這 樣 他 們 可 以不 影 響 應(yīng) 用 程 序 的 工 作 空 間 ) 。新 的 調(diào) 試 器 提 供 了設(shè) 置 新 斷 點(diǎn) 、跟 蹤 事 件
14、 以 及 記 錄 執(zhí) 行 代 碼 的 工 具 ,看 起 來(lái) 與 Visual C 的 調(diào) 試 環(huán) 境 很 相 似 。在“監(jiān) 視”窗 口 以 及 “局 部”窗 口 中 ,用 戶 可 以 深 入 程 序 ,查 看 屬 性 設(shè) 置 值 ,對(duì) 象 以及 數(shù) 組 元 素 的 值 ?!?調(diào) 試 輸 出”窗 口 為 顯 示 交 互 的 或 代 碼 中 的 信 息 提 供了 方 便 的 途 徑 ,同 時(shí) 它 可 以 把 結(jié) 果 輸 出 到 應(yīng) 用 程
15、序 窗 口 之 外 的 另 一 個(gè)窗 口 。</p><p> 1.3 表 設(shè) 計(jì) 與 擴(kuò) 展 的 數(shù) 據(jù) 字 典 </p><p> 在 表 設(shè) 計(jì) 器 中 ,用 戶 可 以 在 創(chuàng) 建 字 段 時(shí) 方 便 地 添 加 索 引 ,用 戶 可 以 指 定 更 多 種 默 認(rèn) 值 ,它 們 可 以 使 表 的 設(shè) 計(jì) 迅 速 而 簡(jiǎn) 便 。在 同 一 個(gè) 選 項(xiàng) 卡上 用 戶 指 定 字
16、 段 的 行 上 ,可 以 定 義 一 個(gè) 普 通 索 引 。通 過(guò)“表” 選項(xiàng) 卡 ,用 戶 可 以 直 接 訪 問(wèn) 表 級(jí) 的 有 效 性 規(guī) 則 、觸 發(fā) 器 以 及 統(tǒng) 計(jì) 值 。新 的 默 認(rèn) 類 及 庫(kù) 屬 性 允 許 用 戶 把 一 個(gè) 字 段 指 定 為 某 個(gè) 控 件 類 型 :當(dāng) 用 戶 把該 字 段 添 加 到 表單 上 時(shí) ,用 戶 通 過(guò) 簡(jiǎn) 單 的 一 步 便 創(chuàng) 建 了 所 需 的 控 件 。另外 ,Inp
17、utMask 及 Format 屬 性 可 以 幫 助 用 戶 控 制 數(shù) 據(jù) 的 顯 示 。新 的 “連 接 設(shè) 計(jì) 器 ” 可 以 平 滑 地 與 ODBC管 理 器 一 起 工 作 ,使 創(chuàng) 建 連 接 更 加 簡(jiǎn) 便 。該 設(shè) 計(jì) 器 也 提 供 了 可 以 優(yōu) 化 連 接 的 附 加 屬 性 </p><p> 1.4 查 詢 與 視 圖 設(shè) 計(jì)</p><p> 現(xiàn)
18、在 創(chuàng) 建 外 部 連 接 ,為 列 指 定 別 名 ,選 擇 最 上 面 幾 條 或 百 分 之 幾的 記 錄 ,都 在 “ 查 詢 設(shè) 計(jì) 器 ” 及“ 視 圖 設(shè) 計(jì) 器” 中 完 成 。并 且 ,使 用“ 視 圖 設(shè) 計(jì) 器 ”,可 以 為 視 圖 字 段 指 定 的 表 字 段 上 可 以 指 定 的 同 樣 的 擴(kuò) 展 屬 性 。</p><p> 如 果 把 記 錄 放 進(jìn) 一 個(gè) 臨 時(shí) 表 ,
19、用 戶 可 以 使 用 新 的 NOFILTER 關(guān) 鍵 字 創(chuàng)建 一 個(gè) 物 理 文 件 在 后 繼 查 詢 中 用 戶 可 以 引 用 這 個(gè) 文 件 。而 在 以 前 ,如 果查 詢 有 一 個(gè) 過(guò) 濾 器 ,就 不 能 引 用 臨 時(shí) 表 。</p><p> 1.5 表單功能與設(shè)計(jì)</p><p> 數(shù) 據(jù) 字 典 的 增 強(qiáng) 有 助 于 表 單 的 設(shè) 計(jì) ,“ 表 單 設(shè)
20、 計(jì) 器 ” 本 身 也 更 容 易 使 用 并 且 提 供 了 更 多 的 功 能 ?!?表 單 設(shè) 計(jì) 器 ”支 持 但 文 檔 界 面(SDI)以 及 多 文 檔 界 面 (MDI)地 選 項(xiàng) ,因 此 用 戶 的 應(yīng) 用 程 序 可 以 具 有 用 戶 最 希 望 的 功 能 。使 用 SDI ,用 戶 可 以 創(chuàng) 建 應(yīng) 用 程 序 窗 口 ,它 們 是 Windows 桌 面 的 子 窗 口 。新 的“ 菜 單 設(shè) 計(jì) 器
21、” 可 以 幫 助 用 戶 創(chuàng) 建 快 捷 菜 單 ,在 控 件 新 添 的 RightClick事 件 中 可 以 使 用 這 些 快 捷 菜 單 。表 單 和 控 件 有 有 了一 些 附 加 的 屬 性 和 方 法 程 序 ,可 以 幫 助 用 戶 控 制 表 單 每 一 部 分 的 感 覺(jué) 及 外 觀 。</p><p> 在“ 屬 性” 窗 口 中 ,用 戶 可 以 選 擇 一 組 控 件 ,查 看
22、或 更 改 它 們 共 同 的 屬 性 。如 果 用 戶 需 要 更 多 的 空 間 來(lái) 查 看 或 更 新 屬 性 設(shè) 置 值 ,可 以 使 “ 屬 性 縮 放” 特 性 。使 用“ 對(duì) 齊” 工 具 ,水 平 、垂 直 居 中 以 及 其 他 放 置 方式 也 易 于 實(shí) 現(xiàn) 。由 于 具 有 格 式 化 程 序 、彩 色 顯 示 代 碼 的 選 項(xiàng) 以 及 增 強(qiáng) 的 查 找 及 替 換 特 性 ,新 的 編 輯 器 使 編 碼
23、更 為 簡(jiǎn) 便 ???捷 菜 單 及 鍵 盤 訪 問(wèn) 的 特 性 在 整 個(gè) 產(chǎn) 品 中 可 用 ,使 用 鼠 標(biāo) 右 鍵 可 以 發(fā) 現(xiàn) 任 意 給 定 元 素 可 能 的 動(dòng) 作 。</p><p> 2 系 統(tǒng) 設(shè) 計(jì)</p><p> 2.1系 統(tǒng) 功 能 分 析</p><p> 系 統(tǒng) 分 析 是 信 息 系 統(tǒng) 開(kāi)發(fā) 工 作 中 最 重 要 的
24、 一 環(huán) ,系 統(tǒng) 分 析 的 內(nèi) 容 主 要 是 對(duì) 合 同 進(jìn) 行 有 效 管 理 ,更 加 方 便 、快 捷 地 簽 訂 合 同 ,從 而 開(kāi) 發(fā) 出 符 合 用 戶 要 求的 管 理 信 息 系 統(tǒng) 。它 的 基 本 任 務(wù) 是 :合 同 的 簽 訂 、續(xù) 簽 、修 改 、查 詢 、統(tǒng) 計(jì) 等功 能 ,并 幫 助 管 理 人 員 更 及 時(shí) 、詳 細(xì) 的 了 解 合 同 。</p><p> 本 系 統(tǒng)
25、 采 用 原 型 法 為 開(kāi) 發(fā) 的 指 導(dǎo) 思 想 。所 謂 原 型 法 是 根 據(jù) 用 戶 提 出 的要 求 ,對(duì) 有 關(guān) 方 面 作 一定 的 調(diào) 查 研 究 ,確 定 一 個(gè) 目 標(biāo) ,而 后 迅 速 的 開(kāi) 發(fā) 出 一個(gè) 管 理 信 息 系 統(tǒng) 交 給 用 戶 使 用 ,并 根 據(jù) 用 戶 在 使 用 過(guò) 程 中 所 發(fā) 現(xiàn) 的 問(wèn) 題 或提 出 的 新 目 標(biāo) ,不 斷 修 改 、不 斷 完 善 ,直 到 用 戶
26、滿 意 為 止 。</p><p> 2.2系 統(tǒng) 基 本 目 標(biāo) </p><p> 總 體 目 標(biāo) 是 :實(shí) 現(xiàn) 對(duì) 合 同 的 管 理 ,工 作 人 員 可 以 簽 訂 合 同 。</p><p> 對(duì) 合 同 的 管 理 ,要 從 根 本 上 改 變 過(guò) 去 低 效 的 手 工 簽 訂 的 方 式 ,使工 作 更 規(guī) 范 化 ,完 全 采 用 技 術(shù)
27、人 員 和 數(shù) 據(jù) 庫(kù) 的 管 理 工 作 。使 合 同 的 管 理能 方 便 快 捷 的 共 享 、交 流 信 息 。同 時(shí) 又 能 實(shí) 現(xiàn) 迅 速 、全 方 位 的 信 息 采 集 、信 息 處 理 ,為 使 所 有 人 員 的 查 詢 結(jié) 果 能 有 效 地 進(jìn) 行 。</p><p> 2.3本 系 統(tǒng) 的 業(yè) 務(wù) 流 程 圖 </p><p> 合 同 管 理 系 統(tǒng) 劃 分
28、 為 四 個(gè) 子 模 塊 :錄入 、修改 、查詢 、統(tǒng)計(jì) 。這 四 個(gè) 模塊 之 間 ,緊 密 結(jié) 合 ,共 享 信 息 資 源 ,形 成 一 種 比 較 全 面 的 合 同 管 理 解 決 方 案 。如圖:2-1</p><p> 2.4系 統(tǒng) 詳 細(xì) 設(shè) 計(jì)</p><p> 2.4.1 系 統(tǒng) 分 工 </p><p> 侯 壯 志 :負(fù) 責(zé) 系 統(tǒng) 合
29、 同 錄 入 、合 同 修 改 分 程 序 的 編 寫 。</p><p> 陳 超 :負(fù) 責(zé) 系 統(tǒng) 合 同 查 詢 、合 同 統(tǒng) 計(jì) 分 程 序 的 編 寫 。</p><p> 2.4.2 系 統(tǒng) 功 能 結(jié) 構(gòu) 設(shè) 計(jì) </p><p> 系 統(tǒng) 邏 輯 模 型 描 述 圖:2--2</p><p> 2.4.3 新 用 戶
30、 錄 入 模 塊 的 實(shí) 現(xiàn) 過(guò) 程</p><p> 首 先 ,雙 擊 程 序 圖 標(biāo) ,進(jìn) 入 歡 迎 登 陸 界 面 。</p><p> 若 干 秒 后 ,進(jìn) 入 系 統(tǒng) 登 陸 界 面 。 </p><p> 選擇用戶名稱,輸入密碼,進(jìn)入程序主界面。</p><p> 根 據(jù) 不 同 要 求 ,選 擇 不 同 的 菜 單
31、 ,進(jìn) 入 不 同 的 界 面</p><p> 下面介紹新用戶錄入界面:</p><p> 輸入戶號(hào),合同編號(hào),變壓器型號(hào),賬卡號(hào)后,方可進(jìn)入錄入界面。</p><p> 此時(shí),就 可 以 按 要 求 逐 步 完 成 合 同 的 簽 訂 。</p><p> 錄 入 完 后 ,點(diǎn) 擊“生 成 合 同 ”,一 份 完 整 合 同 的
32、錄 入 就 完 成 了</p><p> 2.4.4查 詢 模 塊 實(shí) 現(xiàn) 的 過(guò) 程</p><p> 進(jìn) 入 主 程 序 后 ,點(diǎn) 擊 綜 合 查 詢 ,按 各 種 不 同 的 條 件 分 類 查 詢 ,分為 基 本 資 料 查 詢 、用 電 信 息 查 詢 、供 電 方 式 查 詢 、合 同 綜 合 查 詢 、時(shí) 間 查詢 。( 如 下 圖 所 示 )</p>&l
33、t;p> 點(diǎn) 擊 基 本 資 料 查 詢 后 ,出 現(xiàn) 以 下 界 面 :</p><p> 可 按 戶 號(hào) 和 用 電 方 名 稱 查 詢 ,若 想 瀏 覽 數(shù) 據(jù) 庫(kù) 中 的 全 部 用 戶 信 息 ,可 點(diǎn) 擊 瀏 覽 按 鈕 。</p><p> 其 他 查 詢 方 式 和 此 查 詢 方 式 類 似 ,例 如 時(shí) 間 查 詢 。</p><p>
34、; 如 果 欲 想 對(duì) 整 個(gè) 合 同 的 內(nèi) 容 進(jìn) 行 查 詢 的 話 ,可 點(diǎn) 擊 綜 合 查 詢 。</p><p> 查 詢 模 塊 的 設(shè) 計(jì) 主 要 是 根 據(jù) 用 戶 要 求 ,挑 選 出 最 常 用 的 選 項(xiàng) ,已 達(dá) 到 方 便 用 戶 的 目 的 。</p><p><b> 結(jié) 束 語(yǔ)</b></p><p>
35、 經(jīng) 過(guò) 三 個(gè) 多 月 的 設(shè) 計(jì) 和 開(kāi) 發(fā) ,合 同 管 理 系 統(tǒng) 基 本 開(kāi) 發(fā) 完 畢 。其 功 能 基 本 符合 管 理 人 員 的 要 求 ,能 夠 方 便 、快 捷 地 完 成 合 同 的 簽 訂 ,有 效 地 對(duì) 合 同 進(jìn) 行 管理 。在 整 個(gè) 應(yīng) 用 軟 件 開(kāi) 發(fā) 過(guò) 程 中 使 用 原 型 法 ,并 且 根 據(jù) 面 向 對(duì) 象 的 分 析 和 設(shè)計(jì) 思 想 ,進(jìn) 行 了 系 統(tǒng) 分 析 ,注 重 與 用 戶
36、 的 直 接 交 流 ,并 不 斷 修 改 原 型 以 進(jìn) 一 步符 合 用 戶 要 求 。另 外 ,充 分 利 用 了 一 些 工 具 軟件 來(lái) 進(jìn) 行 輔 助 分 析 和 輔 助 設(shè) 計(jì) ,效 果 良 好 。</p><p> 在 編 寫 這 個(gè) 軟 件 的 過(guò) 程 中 ,雖 然 我 竭 盡 全 力 ,但 由 于 水 平 有 限 ,涉 及 時(shí) 間較 短 ,錯(cuò) 誤 在 所 難 免 。所 以 該 系 統(tǒng) 還
37、有 許 多 不 盡 人 意 的 地 方 ,比 如 聯(lián) 機(jī) 文 檔 比較 少 ,出 錯(cuò) 處 理 不 夠 等 多 方 面 問(wèn) 題 。這 些 都 有 待 進(jìn) 一 步 改 善 。合 同 管理 系 統(tǒng) 在完 善之 后 可 以 順利 使 管 理 人 員 順 利 的 簽 訂 合 同 ,通 過(guò) 對(duì) 功 能 的 改 進(jìn) 可 以 完 成 大 多 數(shù) 人 的 要 求 。</p><p> 通 過(guò) 畢 業(yè) 設(shè) 計(jì) ,我 學(xué) 到 了 很
38、 多東 西 ,使 我 對(duì) 本 校 學(xué) 習(xí) 生 活 的 一 個(gè) 總 結(jié) ,使 我在 各 個(gè) 方 面 的 知 識(shí) 得 到 充 實(shí) 和 進(jìn) 一 步 系 統(tǒng) 化 ;使 我 對(duì) 軟 件 的 開(kāi) 發(fā) 設(shè) 計(jì) 有 了 一 個(gè) 明 確 地 認(rèn) 識(shí) ;使 我 對(duì) Foxpro 有 了 一 定 的 了 解 和 掌 握 。請(qǐng) 各 位 老師 多 多 批 評(píng) ,提 出 寶 貴 意 見(jiàn) 。</p><p><b> 參 考 文
39、獻(xiàn) </b></p><p> [1] 張魯.《Visual FoxPro 6.0 編程技巧與實(shí)例分析》.北京:中國(guó)水利水電出版社,1999</p><p> [2] 馬濤.《數(shù)據(jù)庫(kù)與程序設(shè)計(jì)》.山東:山東大學(xué)出版社,2005</p><p> [3] 陸勤.《數(shù)據(jù)庫(kù)原理與技術(shù)》.北京:中國(guó)水利電力出版社,2007</p><p
40、> [4]李小明.《計(jì)算機(jī)應(yīng)用基礎(chǔ)》.成都:電子科技大學(xué)出版社,2003 </p><p> [5] 羅朝盛.《Visua BASiC6.0 程序設(shè)計(jì)教程》.北京:人民郵電出版社,2005
41、 [6]楊開(kāi)城.《C語(yǔ)言程序設(shè)計(jì)教程實(shí)驗(yàn)與練習(xí)》.北京:人民郵電出版社,2005 </p><p> [7] 徐松林.《POwerBUilder數(shù)據(jù)應(yīng)用開(kāi)發(fā)教程》.北京:清華大學(xué)出版社,2003</p><p> [8] 朱楊勇.《數(shù)據(jù)庫(kù)系統(tǒng)設(shè)計(jì)與開(kāi)發(fā)》.北京:清華大學(xué)出版社,2007 </p><p><b> 謝 辭</b>
42、;</p><p> 值 此 論 文 提 交 之 際 ,我 向 所 有 幫 助 過(guò) 我 的 人 表 示 衷 心 的 感 謝 。特 別 要 感 謝我 的 指 導(dǎo) 老 師 ——文 練 紅 老 師 。在 論 文 的 資 料 搜 集 、結(jié) 構(gòu) 安 排 、撰 寫 修 改 等 諸多 方 面 ,文 練 紅 老 師 多 給 了 我 耐 心 的 指 導(dǎo) 和 無(wú) 私 的 幫 助 。在 論 文 的 最 后 階 段 ,文 練 紅 老
43、師 對(duì) 我 悉 心 指 導(dǎo) ,對(duì) 論 文 提 出 大 量 的 寶 貴 意 見(jiàn) 和 建 議 。正 是 在 文 練 紅 老 師 的 熱 心 幫 助 下,論 文 才 能 夠 最 終 成 功 完 成 。文 練 紅 老 師 認(rèn) 真 負(fù) 責(zé) 的 工 作 態(tài) 度 ,精 益 求 精 的 治 學(xué) 作 風(fēng) ,嚴(yán) 謹(jǐn) 求 實(shí) 的 科 學(xué) 態(tài) 度 和 深 厚 的 理 論 水 平 都 使 我 受 益 匪 淺 ,對(duì) 我 的 論 文 乃 至 今 后 的 學(xué) 業(yè) 發(fā)
44、展 都 產(chǎn) 生 深 遠(yuǎn) 的 影 響 。在 此 ,對(duì) 文 練 紅 老 師 給 予 我 的 幫 助 表 示 衷 心 的 感 謝 . 我 得 到 了 多 方 人 員 的 幫</p><p><b> 附錄一:程序清單</b></p><p><b> main主程序</b></p><p> do setup.prg&l
45、t;/p><p> on shutdown quit</p><p> do form 歡迎使用.scx</p><p> read events</p><p><b> 配置文件</b></p><p> SET TALK Off</p><p> SET NO
46、TIFY ON</p><p> SET CLOCK OFF</p><p> SET COMPATIBLE OFF</p><p> SET PALETTE ON</p><p> SET BELL ON</p><p> SET BELL TO '', 1</p><p
47、> SET SAFETY ON</p><p> SET ESCAPE ON</p><p> SET LOGERRORS ON</p><p> SET KEYCOMP TO WINDOWS</p><p> SET CARRY OFF</p><p> SET CONFIRM OFF</p&
48、gt;<p> SET BROWSEIMECONTROL OFF</p><p> SET STRICTDATE TO 1</p><p> && TabOrdering = 0</p><p> && ResWidth = 800</p><p> && ResHeig
49、ht = 600</p><p> && GridHorz = 12</p><p> && GridVert = 12</p><p> && ScaleUnits = 0</p><p> && FormSetLib = </p><p>
50、&& FormSetClass = </p><p> && FormsLib = </p><p> && FormsClass = </p><p> SET EXACT On</p><p> SET NEAR OFF</p><p> SET ANSI
51、OFF</p><p> SET LOCK OFF</p><p> SET EXCLUSIVE ON</p><p> SET MULTILOCKS OFF</p><p> SET HEADINGS ON</p><p> SET DELETED On</p><p> SET
52、OPTIMIZE ON</p><p> SET UNIQUE OFF</p><p> SET CPDIALOG OFF</p><p> SET REFRESH TO 0,5</p><p> SET ODOMETER TO 100</p><p> SET BLOCKSIZE TO 64</p&g
53、t;<p> SET REPROCESS TO 0</p><p> SET COLLATE TO "PINYIN"</p><p> && SCCProvider = </p><p> && ProjectHookLib = </p><p> &&
54、; ProjectHookClass = </p><p> && CrsBuffering = 1</p><p> && CrsMethodUsed = 1</p><p> && CrsWhereClause = 3</p><p> && CrsFetchSize
55、 = 100</p><p> && CrsMaxRows = -1</p><p> && CrsNumBatch = 1</p><p> && CrsUseMemoSize = 255</p><p> && SQLDispLogin = 1</p>
56、<p> && SQLTransactions = 1</p><p> && SQLConnectTimeOut = 15</p><p> && SQLIdleTimeOut = 0</p><p> && SQLQueryTimeOut = 0</p><p&
57、gt; && SQLWaitTime = 100</p><p> && TMPFILES = c:\windows\temp</p><p> SET PATH TO </p><p> && HelpTo = </p><p> SET HELP ON</p><
58、;p> && ResourceTo = c:program files\microsoft visual studio\vfp98\foxuser.dbf</p><p> SET RESOURCE ON</p><p> STORE "c:program files\microsoft visual studio\VFP98\WIZARD.APP&q
59、uot; TO _WIZARD</p><p> STORE "c:program files\microsoft visual studio\VFP98\BUILDER.APP" TO _BUILDER</p><p> STORE "c:program files\microsoft visual studio\VFP98\CONVERT.APP&qu
60、ot; TO _CONVERTER</p><p> STORE "c:program files\microsoft visual studio\VFP98\SPELLCHK.APP" TO _SPELLCHK</p><p> STORE "c:program files\microsoft visual studio\VFP98\GENMENU.PR
61、G" TO _GENMENU</p><p> STORE "c:program files\microsoft visual studio\VFP98\BROWSER.APP" TO _BROWSER</p><p> STORE "c:program files\microsoft visual studio\VFP98\GALLERY.AP
62、P" TO _GALLERY</p><p> STORE "" TO _INCLUDE</p><p> STORE "c:program files\microsoft visual studio\VFP98\BEAUTIFY.APP" TO _BEAUTIFY</p><p> STORE "&
63、quot; TO _GETEXPR</p><p> STORE "c:program files\microsoft visual studio\VFP98\GENHTML.PRG" TO _GENHTML</p><p> STORE "c:program files\microsoft visual studio\VFP98\RUNACTD.PRG&
64、quot; TO _RUNACTIVEDOC</p><p> STORE "" TO _STARTUP</p><p> STORE "" TO _SAMPLES</p><p> STORE "c:program files\microsoft visual studio\VFP98\COVERAGE.AP
65、P" TO _COVERAGE</p><p> SET SYSFORMATS OFF</p><p> SET SECONDS ON</p><p> SET CENTURY OFF</p><p> && CurrSymbol = $</p><p> SET CURRENCY
66、LEFT</p><p> SET CURRENCY TO "$"</p><p> SET HOURS TO 12</p><p> SET DATE TO AMERICAN</p><p> SET DECIMALS TO 2</p><p> SET FDOW TO 1</p&
67、gt;<p> SET FWEEK TO 1</p><p> SET MARK TO ""</p><p> SET SEPARATOR TO ","</p><p> SET POINT TO "."</p><p> && DebugEn
68、vironment = 0</p><p> SET TRBETWEEN OFF</p><p> STORE 0.00 TO _THROTTLE</p><p> && DebugOutputFileName = </p><p> && TraceFontName = 宋體</p>
69、;<p> && TraceFontSize = 9</p><p> && TraceFontStyle = 0</p><p> && WatchFontName = 宋體</p><p> && WatchFontSize = 9</p><p>
70、&& WatchFontStyle = 0</p><p> && LocalsFontName = 宋體</p><p> && LocalsFontSize = 9</p><p> && LocalsFontStyle = 0</p><p> &&
71、 OutputFontName = 宋體</p><p> && OutputFontSize = 9</p><p> && OutputFontStyle = 0</p><p> && CallstackFontName = 宋體</p><p> && Calls
72、tackFontSize = 9</p><p> && CallstackFontStyle = 0</p><p> && TraceNormalColor = RGB(0,0,0,255,255,255), Auto, Auto</p><p> && TraceExecutingColor = RGB(2
73、55,255,0,0,0,0), NoAuto, Auto</p><p> && TraceCallstackColor = RGB(0,0,0,192,192,192), Auto, Auto</p><p> && TraceBreakpointColor = RGB(255,0,0,0,0,0), NoAuto, Auto</p>
74、<p> && TraceSelectedColor = RGB(255,255,255,0,0,0), Auto, Auto</p><p> && WatchNormalColor = RGB(0,0,0,255,255,255), Auto, Auto</p><p> && WatchSelectedColor = R
75、GB(255,255,255,0,0,0), Auto, Auto</p><p> && WatchChangedColor = RGB(255,0,0,255,255,255), NoAuto, Auto</p><p> && LocalsNormalColor = RGB(0,0,0,255,255,255), Auto, Auto</p&
76、gt;<p> && LocalsSelectedColor = RGB(255,255,255,0,0,0), Auto, Auto</p><p> && OutputNormalColor = RGB(0,0,0,255,255,255), Auto, Auto</p><p> && OutputSelectedC
77、olor = RGB(255,255,255,0,0,0), Auto, Auto</p><p> && CallstackNormalColor = RGB(0,0,0,255,255,255), Auto, Auto</p><p> && CallstackSelectedColor = RGB(255,255,255,0,0,0), Auto,
78、 Auto</p><p><b> 歡迎使用界面</b></p><p> <timer1.timer></p><p> if thisform.label1.left<480</p><p> thisform.label1.left=thisform.label1.left+10<
79、/p><p><b> else</b></p><p> thisform.label1.left=0</p><p><b> endif</b></p><p> <timer2.timer></p><p> do form 系統(tǒng)登陸.scx<
80、/p><p> thisform.release</p><p><b> 系統(tǒng)登陸界面</b></p><p> <command1.click>(確定)</p><p><b> sele 密碼表</b></p><p> if thisform.com
81、bo1.value=""</p><p> messagebox("請(qǐng)正確輸入用戶名!",0,"警告")</p><p><b> else</b></p><p> locate for yhm=thisform.combo1.value</p><p>
82、; if upper(thisform.text2.value)<>mm</p><p> if _tally=0</p><p> keycount=keycount+1</p><p> if keycount<3</p><p> messagebox("密碼輸入錯(cuò)誤!",0,"
83、警告")</p><p> thisform.combo1.value=""</p><p> thisform.text2.value=""</p><p> thisform.combo1.setfocus()</p><p><b> else</b><
84、;/p><p> messagebox("密碼三次錯(cuò)誤,無(wú)權(quán)進(jìn)入系統(tǒng)!",0,"警告")</p><p> release keycount</p><p> thisform.release</p><p> clear events</p><p><b>
85、endif</b></p><p><b> endif</b></p><p><b> else</b></p><p> thisform.release</p><p> name=thisform.combo1.value</p><p> d
86、o form 主菜單.scx</p><p><b> do prog2</b></p><p><b> endif</b></p><p><b> endif</b></p><p><b> 主窗口</b></p><p
87、> <form1.init></p><p> DO 主菜單.MPR WITH THIS,.T.</p><p><b> Prog1.prg</b></p><p> use 用電基本信息</p><p><b> go bottom</b></p>&l
88、t;p> if .not.(ALLTRIM(合同編號(hào))="".and.ALLTRIM(戶號(hào))="".and.ALLTRIM(用電方名稱)="")</p><p> insert blank</p><p><b> endif</b></p><p> do form 新
89、增用戶錄入.scx</p><p><b> 新增用戶錄入</b></p><p> <command1.click>(確定)</p><p> thisform.command1.enabled=.f.</p><p> use 用電基本信息</p><p> bianha
90、o=thisform.text1.value</p><p> huhao=thisform.text2.value</p><p> kahao=thisform.text3.value</p><p> xinghao=thisform.text4.value</p><p> if HUHAO=""</
91、p><p> messagebox("無(wú)效的合同編號(hào)或用戶名!",0,"警告")</p><p> thisform.command1.enabled=.t.</p><p> thisform.refresh</p><p><b> else</b></p>
92、<p> locate for 合同編號(hào)=alltrim(bianhao).or.戶號(hào)=alltrim(huhao)</p><p> if found()</p><p> messagebox("您輸入的合同編號(hào)或戶號(hào)已經(jīng)存在,如果您要修改該合同請(qǐng)進(jìn)入修改菜單,如果您要對(duì)新合同進(jìn)行錄入,請(qǐng)返回后從新核對(duì)!",0,"警告")<
93、/p><p> thisform.command1.enabled=.t.</p><p><b> go bottom</b></p><p> thisform.text1.value=""</p><p> thisform.text2.value=""</p>
94、;<p> thisform.text3.value="" </p><p> thisform.text4.value=""</p><p> thisform.refresh</p><p><b> else</b></p><p><b>
95、 go bottom</b></p><p> REPL O7 WITH NAME </p><p> thisform.release</p><p><b> use</b></p><p> do form 錄入1.scx</p><p><b> endif
96、</b></p><p><b> endif</b></p><p><b> 錄入1</b></p><p> <form1.init></p><p> public yinhang</p><p> sele 用電基本信息</p
97、><p><b> go bottom</b></p><p> thisform.pageframe1.page1.text1.value="安陽(yáng)市電業(yè)局"</p><p> thisform.pageframe1.page1.text2.value="安陽(yáng)市中州路"</p><p
98、> thisform.pageframe1.page1.text3.value="鄭曉明"</p><p> thisform.pageframe1.page1.combo1.value="孫啟偉"</p><p> thisform.pageframe1.page1.combo3.value="0372-5110183&quo
99、t;</p><p> THISFORM.TEXT1.VALUE=bianhao</p><p> thisform.text2.value=huhao</p><p> thisform.text3.value=kahao</p><p> thisform.text4.value=xinghao</p><p&
100、gt; thisform.pageframe1.page1.text7.value="455000"</p><p> thisform.pageframe1.page1.combo2.value="安陽(yáng)市工行鐵西辦"</p><p> thisform.pageframe1.page1.text4.value="1706020709
101、02102212103"</p><p> thisform.pageframe1.page1.text10.value="410500172196054"</p><p> thisform.pageframe1.page1.text17.value="455000"</p><p> thisform.pa
102、geframe1.page1.text18.value="安陽(yáng)市工行"</p><p> yinhang="工商"</p><p> thisform.pageframe1.page2.text9.value="用電方"</p><p> thisform.pageframe1.page2.text3
103、0.value="10"</p><p> thisform.pageframe1.page5.text4.value="用方分支第一支持物"</p><p> thisform.pageframe1.page5.text5.value="第一支持物"</p><p> thisform.pagefr
104、ame1.page5.text6.value="供電方所有"</p><p> thisform.pageframe1.page5.text7.value="供用電合同的履行地為供用電產(chǎn)權(quán)分界點(diǎn)"</p><p> thisform.pageframe1.page7.text7.value="貳"</p><
105、;p> thisform.pageframe1.page7.text8.value="壹"</p><p> thisform.pageframe1.page7.text9.value="附加條款1"</p><p> thisform.pageframe1.page7.text10.value="附加條款2"<
106、/p><p><b> 生成合同按鈕</b></p><p> command1.click</p><p> set exact on</p><p><b> public t</b></p><p> sele 用電基本信息</p><p>
107、;<b> sele 添加</b></p><p><b> go top</b></p><p> do while .not.eof()</p><p><b> t=字段名</b></p><p> replace 添加->內(nèi)容 with alltrim(
108、用電基本信息->&t)</p><p> if alltrim(添加->內(nèi)容)=""</p><p> replace 添加->內(nèi)容 with "╱"</p><p> sele 用電基本信息</p><p> repl &t with 添加->內(nèi)容<
109、;/p><p><b> sele 添加</b></p><p><b> endif</b></p><p><b> skip</b></p><p><b> enddo</b></p><p> thisform.re
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 眾賞文庫(kù)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 《合同管理》畢業(yè)論文
- 畢業(yè)論文--合同管理系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)
- 畢業(yè)論文——合同管理系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)
- 畢業(yè)論文合同管理系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn)
- 畢業(yè)論文——jsp合同信息管理系統(tǒng)
- 畢業(yè)論文——畢業(yè)論文管理系統(tǒng)
- 畢業(yè)論文——畢業(yè)論文管理系統(tǒng) (2)
- 畢業(yè)論文——畢業(yè)論文管理系統(tǒng) (2)
- 畢業(yè)論文——畢業(yè)論文管理系統(tǒng) (2)
- 畢業(yè)論文--建設(shè)工程合同管理
- 建設(shè)工程合同管理畢業(yè)論文
- 畢業(yè)論文.建設(shè)工程合同管理
- 畢業(yè)論文管理系統(tǒng)
- 畢業(yè)論文管理系統(tǒng)
- 合同管理畢業(yè)論文---建筑工程合同管理的分析
- 學(xué)生成績(jī)管理系統(tǒng)畢業(yè)論文畢業(yè)論文
- 畢業(yè)論文范文——合同管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)
- 畢業(yè)論文(設(shè)計(jì))基于.net畢業(yè)論文管理系統(tǒng)
- 畢業(yè)論文范文——合同管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)
- 學(xué)生管理管理系統(tǒng)畢業(yè)論文
評(píng)論
0/150
提交評(píng)論