access制作校牌學(xué)生證批量導(dǎo)入照片

1、使用ACCESS制作校牌、學(xué)生證等（批量導(dǎo)入學(xué)生信息及照片） 學(xué)校及很多單位都為了節(jié)省資金，自己制作工作證、校牌、學(xué)生證等證件，尤其是學(xué)校，每當(dāng)新學(xué)年開(kāi)學(xué)后，這項(xiàng)工作就必須去做了。由于學(xué)校學(xué)生數(shù)字龐大，因此利用Access的“報(bào)表”功能制作校牌或?qū)W生證件就方便快捷多了！下面我就和大家分享一下我制作校牌的方法： 一、校牌主要針對(duì)剛?cè)雽W(xué)的學(xué)生的，入學(xué)后的新生需要建立學(xué)籍信息，我們可利用采集后的學(xué)籍照片，學(xué)生有重名的現(xiàn)象，為避免導(dǎo)入錯(cuò)誤，照片名稱我使用的是編號(hào)來(lái)進(jìn)行命名的，例如2014年高一新生編號(hào)為140001、140002（網(wǎng)上有許多批量命名的軟件，操作簡(jiǎn)單）二、校牌的主要信息體現(xiàn)三方面: 姓名

2、、照片、編號(hào)，為減少繁多的文字，編號(hào)你可以自定義，也可以體現(xiàn)出學(xué)生的年級(jí)和班級(jí)（就好比考場(chǎng)的座位號(hào)一樣）三、采用A4紙張進(jìn)行彩色打印，條件好的學(xué)?；騿挝豢梢缘綇V告公司，制作銅版紙的彩頁(yè)，效果更好。我使用的是報(bào)表打印，每頁(yè)10人，然后裁剪。 四、具體方法：（以我校為例） 1.建立一個(gè)EXCEL文件，整理好學(xué)生信息，里面包含主要兩列姓名和編號(hào)，把照片放在一個(gè)“照片“文件夾內(nèi)，其中的照片我使用的用編號(hào)命名，例如140001，可用軟件批量命名（也可用姓名直接命名，但重名的容易錯(cuò)亂）2.啟動(dòng)Access2003后新建數(shù)據(jù)庫(kù)，然后導(dǎo)入第1步制作的Excel文件“2014級(jí)全體”，如下圖：3.制作報(bào)表，并設(shè)

3、置頁(yè)面，每頁(yè)10個(gè)學(xué)生信息。姓名和編號(hào)是由庫(kù)提供的：4.導(dǎo)入照片的操作：首先在“工具箱”中點(diǎn)擊“圖像”控件，然后在你報(bào)表中你需要放照片的位置拖動(dòng)鼠標(biāo)，會(huì)彈開(kāi)插入圖片的對(duì)話框（先隨意選擇個(gè)圖片插入再說(shuō)，之后還要修改呢），如下圖：5.對(duì)著已插入的圖片右鍵選擇“屬性”，彈開(kāi)屬性對(duì)話框，刪除其中的圖片地址“C:Users.”，如下圖：6. 點(diǎn)擊“視圖”菜單中的“代碼”命令，彈出編輯窗口，把下面一段代碼復(fù)制并粘貼到窗口中，之后對(duì)紅色代碼做修改，就大功告成了！Private Sub 主體_Format(Cancel As Integer, FormatCount As Integer)Dim imgpat

4、h As Stringimgpath = Application.CurrentProject.Path & "照片" & Me!編號(hào) & ".jpg"If Dir(imgpath) = "" Then imgpath = Application.CurrentProject.Path & "noimg.jpg"Image7.Picture = imgpathEnd Sub7.最后的說(shuō)明（很重要）：“照片”是指存放照片的文件夾名稱，“編號(hào)”是指數(shù)據(jù)庫(kù)中和照片名稱一致的字段名，是個(gè)變量，例如我導(dǎo)入的數(shù)據(jù)庫(kù)中有“編號(hào)”這個(gè)字段，我的照片也是用具體的編號(hào)來(lái)命名的，這樣數(shù)據(jù)庫(kù)才會(huì)使用“編號(hào)”這個(gè)字段中的值把“照片”文件夾中的具體照片一一對(duì)應(yīng)起來(lái)。“ Image7”是圖形控件名，要與報(bào)表中的照片控件名一致（本例中是Image23，見(jiàn)上圖）“noimg.jpg”是備用的一個(gè)自定義的名叫“noimg.jpg”圖片，沒(méi)有照片的學(xué)生就會(huì)顯示這一圖片，這個(gè)圖片的名稱可隨