<![CDATA[ايران ويج - VBScript]]> https://www.iranled.com/forum/ Thu, 13 Aug 2026 21:45:29 +0000 MyBB <![CDATA[ارسال ایمیل]]> https://www.iranled.com/forum/thread-29114.html Mon, 27 Oct 2014 15:28:20 +0000 https://www.iranled.com/forum/thread-29114.html با بکارگیری کد زیر میتوانید در vbs ایمیل ارسال کنید.

کد:
MailTo = "ایمیل به"
From = "از"
Subject = "موضوع"
Body = "بدنه."
Username = "یوزر نیم"
Password = "پسورد"
Email MailTo, From, Subject, Body, Username, Password
Sub Email (MailTo, From, Subject, Body, Username, Password)
Set objMessage = CreateObject("CDO.Message")
With objMessage
  .Subject = Subject
  .From = From
  .To = MailTo
  .TextBody = Body
End With
With objMessage.Configuration.Fields
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = Username
.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = Password
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465 'change to 465 or 25if you get an error
.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
      .Update
End With
objMessage.Send
End Sub

کد بالا با استفاده از جیمیل شما به ادرس داده شده یک ایمیل ارسال میکند.

موفق باشید.]]> با بکارگیری کد زیر میتوانید در vbs ایمیل ارسال کنید.

کد:
MailTo = "ایمیل به"
From = "از"
Subject = "موضوع"
Body = "بدنه."
Username = "یوزر نیم"
Password = "پسورد"
Email MailTo, From, Subject, Body, Username, Password
Sub Email (MailTo, From, Subject, Body, Username, Password)
Set objMessage = CreateObject("CDO.Message")
With objMessage
  .Subject = Subject
  .From = From
  .To = MailTo
  .TextBody = Body
End With
With objMessage.Configuration.Fields
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = Username
.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = Password
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465 'change to 465 or 25if you get an error
.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
      .Update
End With
objMessage.Send
End Sub

کد بالا با استفاده از جیمیل شما به ادرس داده شده یک ایمیل ارسال میکند.

موفق باشید.]]> <![CDATA[ابزارهای مورد نیاز یک طراح وب]]> https://www.iranled.com/forum/thread-25758.html Sat, 13 Apr 2013 06:38:15 +0000 https://www.iranled.com/forum/thread-25758.html

Color:
Adobe Kuler (free)
Pictaculous (free)
Colorzilla (free)
Dribbble.com (free)
Hues ($2.99)



Typography:
Google Webfonts (free)
Font Squirrel (free)
Lost Type (from $1)
Typecast (from $29 per month)


Wireframing:
Balsamiq (from $79)
moqups (free)
Mockflow (from free)
Google Drawing (free)
Photoshop/Indesign/Fireworks (from $49.99 per month)
Layout and Boilerplates
960 Grid (free)
1140 CSS Grid ($5 donation)
Bootstrap (free)
LessFramework 4 (free)
Skeleton (free)
Foundation by Zurb (free)
Reset CSS (free)



Content Management:
WordPress (free)
Joomla (free)
Expression Engine (from $299)
Drupal (free)
Radiant CMS (free)
Useful Apps, Actions, and Resources
iOS Photoshop Actions & Workflows (free)
By People (free)
Temboo (from free)
LittleIpsum (free)
awesome-fontstacks.com (free)



Code Editors:
Coda 2 (from $99)
SublimeText 2 ($70)
TextMate (from $59)
Aptana Studio (free)
BBEdit ($49.99)



FTP Clients:
CyberDuck ($23.99)
FileZilla (free)
Transmit ($34)
FireFTP (free)]]>

Color:
Adobe Kuler (free)
Pictaculous (free)
Colorzilla (free)
Dribbble.com (free)
Hues ($2.99)



Typography:
Google Webfonts (free)
Font Squirrel (free)
Lost Type (from $1)
Typecast (from $29 per month)


Wireframing:
Balsamiq (from $79)
moqups (free)
Mockflow (from free)
Google Drawing (free)
Photoshop/Indesign/Fireworks (from $49.99 per month)
Layout and Boilerplates
960 Grid (free)
1140 CSS Grid ($5 donation)
Bootstrap (free)
LessFramework 4 (free)
Skeleton (free)
Foundation by Zurb (free)
Reset CSS (free)



Content Management:
WordPress (free)
Joomla (free)
Expression Engine (from $299)
Drupal (free)
Radiant CMS (free)
Useful Apps, Actions, and Resources
iOS Photoshop Actions & Workflows (free)
By People (free)
Temboo (from free)
LittleIpsum (free)
awesome-fontstacks.com (free)



Code Editors:
Coda 2 (from $99)
SublimeText 2 ($70)
TextMate (from $59)
Aptana Studio (free)
BBEdit ($49.99)



FTP Clients:
CyberDuck ($23.99)
FileZilla (free)
Transmit ($34)
FireFTP (free)]]> <![CDATA[دستور Shell در VBS]]> https://www.iranled.com/forum/thread-7047.html Sat, 01 Mar 2008 16:13:55 +0000 https://www.iranled.com/forum/thread-7047.html
توی دستورات VB دستوری به نام Shell است اما توی VBS خطا میده

آیا دستوری با این موضوع موجود داره؟]]>
توی دستورات VB دستوری به نام Shell است اما توی VBS خطا میده

آیا دستوری با این موضوع موجود داره؟]]> <![CDATA[VB SCRIPT]]> https://www.iranled.com/forum/thread-4925.html Sat, 04 Nov 2006 17:09:02 +0000 https://www.iranled.com/forum/thread-4925.html mamnoon az inke mail (yaa hala harchi ke esmeshWhistle )mano khoondid
man ye code too VBscript daram ke mikham be javascirpt tabdilesh konam
mitoonid komakam konid
dar zemn , man faghat too 2-3 khatesh moshkel daram , goftam ye vakht negarane ziyad boodanesh nabashi
mamnoon az lotfetoon
felan bye
Mehrad
]]> mamnoon az inke mail (yaa hala harchi ke esmeshWhistle )mano khoondid
man ye code too VBscript daram ke mikham be javascirpt tabdilesh konam
mitoonid komakam konid
dar zemn , man faghat too 2-3 khatesh moshkel daram , goftam ye vakht negarane ziyad boodanesh nabashi
mamnoon az lotfetoon
felan bye
Mehrad
]]>