34.satırı kendinize göre yapılandırmanız lazım

ayrıca 39.satırı silip bu üç satır kodu denermisiniz.bunlar yandexin ayarlarıdır.tabi yandexten bir mail adresi almanız lazım.bunun için kendi domaininiz içinde ayarlar buna benzerdir.host adresi mail.domain.com gibidir

Mail.Host = "smtp.yandex.com.tr"
Mail.Port = 465
Mail.Username = "kullaniciadiniz"
Mail.Password = "sifreniz"

edit:

If Request("Send") <> "" Then

bu if den geçiyor dimi