View Full Version : commondialog
ali-software
چهارشنبه 24 تیر 1388, 14:37 عصر
چه طوری از commondialog برای save کردن ازش استفاده کرد.
VB.SOS
چهارشنبه 24 تیر 1388, 15:57 عصر
سلام
با فراخوندن متد ShowSave اين كارو انجام بدين. مسير مشخص شده تو FileName مشخص ميشه
alih110
چهارشنبه 24 تیر 1388, 17:12 عصر
یه نگاه به این تاپیک بنداز .:کف: :کف:
ذخیره و فراخوانی سایت بدون common dialog OCX
http://barnamenevis.org/forum/showthread.php?t=168350
butterfly8528
چهارشنبه 24 تیر 1388, 17:26 عصر
بفرما عزیز .
On Error Resume Next
CommonDialog1.Filter = "text Files (*.txt)|*.txt"
CommonDialog1.ShowSave
Open CommonDialog1.FileName For Output As 1
Print #1, Text4.Text
Close #1
سوالی بود در خدمتم .
sanaz2007
پنج شنبه 25 تیر 1388, 07:38 صبح
این نمونه رو نگاه کنید
mmssoft
پنج شنبه 25 تیر 1388, 20:49 عصر
برای این کار می تونی از کد زیر استفاده کنی که یک تصویر رو انتخاب می کنی و بعد اون تصویر توی Image قرار میگیره :
On Error Resume Next
CommonDialog1.Filter = "JPG Files (*.jpg)|*.jpg|(*.jpeg)|*.jpeg|(*.jpe)|*.jpe"
CommonDilog1.ShowOpen
If Trim(CommonDialog1.FileName) = "" Then
Exit Sub
Else
Image1.Picture = LoadPicture(CommonDialog1.FileName)
End If
کد زیر هم محتویات درون یک Image رو در یک مسیر ذخیره می کنه :
On Error Resume Next
CommonDialog1.Filter = "JPG Files (*.jpg)|*.jpg|(*.jpeg)|*.jpeg|(*.jpe)|*.jpe"
CommonDilog1.ShowSave
Image1.SavePicture(CommonDialog1.FileName"
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.