نوشتن اسکریپت برای ویندوز Windows Login Script

این بار یک موضوع بسیار جذاب براتون در نظر گرفتم. برای adminهای شبکه که علاقه مند به انجام کارهایی از قبیل کنترل گروهی کامپیوتر ها هستند و یا می خواهند یک فرمان به صورت عمومی برای یک دسته از کاربران اجرا گردد بسیار پر کاربرد می باشد.برای مثال من یک Script نوشته ام که می تواند برای ارسال ایمیل در شبکه مورد استفاده قرار گیرد.که در زیر آنرا می بینید.

Const cdoSendUsingMethod = “http://schemas.microsoft.com/cdo/configuration/sendusing”, _
cdoSendUsingPort = 2, _
cdoSMTPServer = “http://schemas.microsoft.com/cdo/configuration/smtpserver”
‘// Create the CDO connections.
Dim iMsg, iConf, Flds
Set iMsg = CreateObject(“CDO.Message”)
Set iConf = CreateObject(“CDO.Configuration”)
Set Flds = iConf.Fields
‘//SMTP Server Configuration
With Flds
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = ‘{خود را وارد نماييد SMTP آدرس ايميل سرور }’
.Update
End With
”””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””
With iMsg
Set .Configuration = iConf
.To = ‘{آدرس ايميل مورد نظر}’
.From = ‘{آدرسي که ايميل از طريق آن ارسال مي گردد}’
.Subject = ‘{عنوان ايميل ارسالي}’
.TextBody = ‘{محتواي ايميل}’
End With
‘// در اين قسمت مي توانيد چنانچه نياز به ارسال پيوست به همراه ايميل هستيد آنرا اضافه کنيد
‘.AddAttachment Attachment
‘در نهايت ارسال صورت مي گيرد
iMsg.Send

2 پاسخ
  1. ایمان
    ایمان گفته:

    با سلام
    لطفا همان گونه که دوست دیگری برای این پست نظر گذاشته اگر امکان داره برنامه نویسی را از پایه اموزش بدهید.چه میشه این اسکریپت نوشت؟اگر شما که در این کار مهارت دارید بتوانید اموزش نوشتن اسکریپت را به صورت تصویری برای دانلود بذارین خیلی عالی میشه و تعداد بازدیدهای سایت شما بالا میره.این اسکریپت باید بر روی چه هاستی نصب بشه و دارای چه مشخصاتی باشه؟
    باهاش میشه ایمیل گروهی هم ارسال کرد؟

دیدگاه ها غیر فعال است.