במאמר
הבא יוסבר
כיצד ליצור תוכנית התקנה משלכם לתוכניות שכתבתם בויזואל בייסיק
2005
ו-2008. המתקדמים שבנינו יוכלו גם ליצור תוכנית להכנת תוכניות התקנה.
השיטה
המוסברת במאמר זה הינה
אלטרנטיבית
לשיטות ההתקנה המוכרות
(ומניחה
כי ה-NET Framework. המתאים כבר מותקן על המחשב)
.תוכן המאמר:קבלת מידע על המערכתבדיקה האם זוהי הגרסה האחרונה של התוכנהקבצים ותיקיותרג'יסטריהוספת התוכנית לרשימת התוכניות שעולות בהפעלת
המחשב (StartUp)סוף
דברבונוס: הכנת קובץ
Autorun.inf
קבלת
מידע על המערכתתוכנית
ההתקנה צריכה לקבל מידע על המחשב עליו רצה התוכנית. על מנת לקבל מידע זה
נשתמש באובייקט
My.
להלן
רשימה חלקית של שימושים באובייקט My בעזרתם תוכלו לקבל מידע על המערכת:
| מידע | הקוד |
| נתיב
קובץ ההתקנה | My.Application.Info.DirectoryPath |
| שולחן
העבודה | My.Computer.FileSystem.SpecialDirectories.Desktop |
| המסמכים
שלי | My.Computer.FileSystem.SpecialDirectories.MyDocuments |
| המוזיקה
שלי | My.Computer.FileSystem.SpecialDirectories.MyMusic |
| התמונות
שלי | My.Computer.FileSystem.SpecialDirectories.MyPictures |
| תיקיית
התוכנות Program Files | My.Computer.FileSystem.SpecialDirectories.ProgramFiles |
| תיקיית
הקבצים הזמניים Temp | My.Computer.FileSystem.SpecialDirectories.Temp |
| תיקיית
"התחל - תוכניות" (Start - All Programs) | My.Computer.FileSystem.SpecialDirectories.Programs |
| שם
מלא של מערכת ההפעלה | My.Computer.Info.OSFullName |
| גרסת
מערכת ההפעלה | My.Computer.Info.OSVersion |
| פלטפורמת
מערכת ההפעלה | My.Computer.Info.OSPlatform |
| שפה
+ ארץ (בשפת המערכת) | My.Computer.Info.InstalledUICulture.NativeName |
| שפה
+ ארץ (באנגלית) | My.Computer.Info.InstalledUICulture.EnglishName |
| פורמט
שפה + ארץ | My.Computer.Info.InstalledUICulture.Name |
| קיצור
שם שפה | My.Computer.Info.InstalledUICulture.ThreeLetterWindowsLanguageName |
| נפח
זיכרון | Format(My.Computer.Info.TotalPhysicalMemory
/ 1024 / 1024, "###,###
MB") |
| עומק
סיביות של התצוגה | BitsPerPixel.Text
= My.Computer.Screen.BitsPerPixel |
בדיקה
האם זוהי הגרסה האחרונה של
התוכנהרוב תוכנות ההתקנה בודקות אם
אתם מתקינים את
הגרסה האחרונה של התוכנה שלהם. כדי לעשות בדיקה זו, השתמשו בקוד שמופיע
במאמר:
עדכון
תוכנה מהאינטרנט תוך שימוש באובייקט Myקבצים
ותיקייותכמובן,
שהשלב החשוב ביותר בהתקנה הינו העתקת הקבצים והתיקייות של התוכנה.
העתקת קבציםכדי
להעתיק קובץ מסוים נשתמש בקוד הבא:
| My.Computer.FileSystem.CopyFile("Source File", "Destination
Folder + File Name") |
כאשר
במקום "Source File" יש להציב את שם הקובץ אותו מעתיקים, ובמקום
"Destination Folder + File Name" יש לכתוב את שם תיקיית היעד אליה יועתק
הקובץ וכן את שם הקובץ (כולל סיומת).
לדוגמה:
| My.Computer.FileSystem.CopyFile("d:\1.txt" ,"c:\Program
Files\1.txt") |
נוכל
גם להשתמש בקוד
My.Application.Info.DirectoryPath,
על מנת למצוא היכן נמצא קובץ ההתקנה וכך לדעת גם מהיכן להעתיק קבצים.
למשל:
| My.Computer.FileSystem.CopyFile(My.Application.Info.DirectoryPath
& "\1.txt",
"C:\Program
Files\1.txt") |
העתקת
תיקייותכדי להעתיק תיקייה מסויימת נשתמש בקוד הבא:
| My.Computer.FileSystem.CopyDirectory("Source Folder", "Destination
Folder") |
כאשר
במקום "Source Folder" יש לכתוב את שם התיקיה אותה רוצים להעתיק ובמקום
"Destination Folder" יש לרשום את המיקום אליו מעוניינים להעתיק את
התיקייה.
לדוגמה:
| My.Computer.FileSystem..CopyDirectory(("d:\Directory\" ,"c:\Program
Files\") |
נוכל
גם להשתמש בקוד
My.Application.Info.DirectoryPath,
על מנת למצוא היכן נמצא קובץ ההתקנה וכך לדעת גם מאיפה להעתיק
תיקייות.
למשל:
| My.Computer.FileSystem.CopyDirectory(My.Application.Info.DirectoryPath
& "\Directory\",
"c:\Program Files\") |
מחיקת קבציםעל
מנת למחוק קובץ מסוים נשתמש בקוד הבא:
| My.Computer.FileSystem.DeleteFile("שם הקובץ למחיקה") |
לדוגמה:
| My.Computer.FileSystem.DeleteFile("c:\Program
Files\1.txt") |
מחיקת תיקייותעל
מנת למחוק
תיקייה מסוימת נשתמש בקוד הבא:
| My.Computer.FileSystem.DeleteDirectory("שם התיקייה למחיקה",
FileIO.DeleteDirectoryOption.DeleteAllContents) |
לדוגמה:
| My.Computer.FileSystem.DeleteDirectory("c:\Directory\",
FileIO.DeleteDirectoryOption.DeleteAllContents) |
שימו לב!
באמצעות קוד זה אפשר למחוק גם תיקייות שיש בהם קבצים.יצירת
תיקייותכדי ליצור תיקייות נשתמש בקוד הבא:
| My.Computer.FileSystem.CreateDirectory("התיקייה ליצירה") |
לדוגמה:
| My.Computer.FileSystem.CreateDirectory("c:\New Directory\") |
רג'יסטריהשלב
האחרון בתהליך ההתקנה הוא הכנסת ערכים לרג'יסטרי.
הוספת התוכנית ל- "הוספה או הסרה
של תוכניות"כדי להוסיף את התוכנה שלכם ל- "הוספה
או הסרה של תוכנית" שבלוח הבקרה, נשתמש בקוד הבא:
My.Computer.Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\A\",
"DisplayName",
"B")
My.Computer.Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\A\",
"UninstallString",
"C")
My.Computer.Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\A\",
"DisplayIcon",
"D")
|
- שנו
את A בקוד ל: שם התוכנה שלכם.
- שנו את B בקוד ל: שם
התוכנה שלכם
- שנו את C בקןד ל: נתיב קובץ ההסרה של
התוכנה שלכם
- שנו את D בקוד ל: לנתיב הצלמית (icon) של
התוכנה שלכם
הוספת
התוכנית לרשימת התוכניות שעולות בהפעלת המחשב (StartUp)כדי
להוסיף את התוכנה שלכם לרשימת התוכניות שעולות בהפעלת המחשב (StartUp)
נשתמש בקוד הבא:
| My.Computer.Registry.SetValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\",
"Program Name",
"Program Location") |
כאשר
במקום "Program Name" יש לכתוב את שם התוכנה שלכם ובמקום "Program
Location" את המיקום של התוכנה שלכם.
לדוגמה:
| My.Computer.Registry.SetValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\",
"דוקטור ויבי",
"C:/Program
Files/VB/vb.exe") |
סוף
דברבמאמר זה למדתם כיצד ליצור תוכנית
התקנה ב- 2008,VB 2005.
עכשיו מה שנותר לכם הוא לעצב את תוכנית
ההתקנה, לבנות ממשק ולהוסיף כל קוד שתרצו.
כמו כן, באמצעות
הקודים האלו תוכלו (ותצטרכו) לבנות תוכנית הסרה.
אם לא שמתם לב -
במאמר השתמשו רק בקודים המשתמשים באובייקט My.
לבעיות,
הערות והארות אתם מוזמנים לפנות
אז שיהיה לכם בהצלחה - רועי אנגל!
בונוס:
הכנת קובץ Autorun.infקובץ
Autorun.inf הינו קובץ מערכת, ש"מסביר" למערכת ההפעלה שלכם מה לעשות אם
התקליטור אותו הכנסתם למחשב (כפי שהבנתם, הקובץ מיועד לתקליטורים בלבד).
בדרך
כלל הקובץ "מסביר" למערכת ההפעלה שלכם איזה קובץ להפעיל אוטומטית, איזה
צלמית (icon) לתת לדיסק ואיזה שם לתת לתקליטור.
על מנת ליצור
קובץ Autorun.inf, פותחים את פנקס הרשימות (Notepad) וכותבים בו:
[autorun]
open=1
icon=2
Label=3 |
שנו את 1 ל: נתיב קובץ ההתקנה
שנו את 2 ל: נתיב הצלמית (icon)
שנו את 3 ל: שם התקליטור
לדוגמה:
[autorun]
open=Setup.exe
icon=Dr.ico
Label=דוקטור
ויבי |
ולסיום,
שימרו את הקובץ בשם: Autorun.inf.
הערה: הקובץ צריך להיות בתיקייה
הראשית של התקליטור.
