Microsoft VBScript runtime error ‘800a01b6’

@SolaceJun 24.2004

Hello all, I am testing a simple asp page with IIS to learn how to develop a username and password system. I have all the pages built but I am getting an error in my validation page. I have looked though the Microsoft support pages and several other forums but havent found anything too helpful. Does anyone know what this means and how I can resolve it? Any help appreciated, the error message is below.

Object doesn’t support this property or method: ‘Request.From’

/username/validation.asp, line 13

to post a comment

20 Comments(s) _↴

@lmf232sJun 24.2004 — #can you show some code where this is happening

@SolaceauthorJun 24.2004 — #Sorry, I should have done that in the 1st place. Here is the code for the validation page: Thanks again.

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>



<%

Dim rsLogin__varUsername

rsLogin__varUsername = "0"

If (Request.Form("tfUsername") <> "") Then

rsLogin__varUsername = Request.Form("tfUsername")

End If

%>

<%

Dim rsLogin__varPassword

rsLogin__varPassword = "0"

If (Request.From("tfPassword") <> "") Then

rsLogin__varPassword = Request.From("tfPassword")

End If

%>

<%

Dim rsLogin

Dim rsLogin_numRows

Set rsLogin = Server.CreateObject("ADODB.Recordset")

rsLogin.ActiveConnection = MM_connUsername_STRING

rsLogin.Source = "SELECT Username, Password FROM tbLogin WHERE Username ='" + Replace(rsLogin__varUsername, "'", "''") + "' AND Password ='" + Replace(rsLogin__varPassword, "'", "''") + "'"

rsLogin.CursorType = 0

rsLogin.CursorLocation = 2

rsLogin.LockType = 1

rsLogin.Open()

rsLogin_numRows = 0

%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">

<html>

<head>

<title>Untitled Document</title>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</head>

<body>

<div align="center">

<p>

<% If Not rsLogin.EOF Or Not rsLogin.BOF Then %>

<%Session("MM_Username") = Request("tfUsername")%>

You have been successfully logged on. <a href="add_user.asp">Click here to add a user to the database.</a>

<% End If ' end Not rsLogin.EOF Or NOT rsLogin.BOF %>

</p>

<p>

<% If rsLogin.EOF And rsLogin.BOF Then %>

Your User name or password is not valid. <a href="Default.asp">Click here to try again.</a>

<% End If ' end rsLogin.EOF And rsLogin.BOF %>

</p>

<p>  </p>

</div>

</body>

</html>

<%

rsLogin.Close()

Set rsLogin = Nothing

%>

@lmf232sJun 24.2004 — #spelling error

rsLogin__varPassword = Request.From("tfPassword")

should be

rsLogin__varPassword = Request.form("tfPassword")

@SolaceauthorJun 24.2004 — #Christ almighty. Thanks so much lmf. Im going to go bang my head against the wall.

@onehempcatNov 12.2005 — #Maybe I dont see something just as easy. I dont know. Maybe I can get help from someone?

Here is the error:

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'to'

/tellfriends.asp, line 43

Here is the code, for a tell friends form: ( I have marked line 43)

<% Option Explicit %>





<%

'Declare variables

Dim CountUp, EmailEntered, Email, EBody

'Check fields

EmailEntered = False

For CountUp = 1 to 5

If IsEmail(Request.Form("email" & CountUp)) Then

EmailEntered = True

Exit For

End If

Next

If Not EmailEntered Then

Error "No Emails", "You must enter at least one email address to proceed."

End If

'Generate email body

EBody = "Hello," & VbCrLf & VbCrLf & _

"You are being emailed because a friend of yours"

If Request.Form("name") <> "" Then

EBody = EBody & " named " & Request.Form("name")

End If

EBody = EBody & " thought you should know about an online game called " & GameName & "." & VbCrLf & VbCrLf & _

GameDescription & vbCrLf & vbCrLf

If Request.Form("message") <> "" Then

EBody = EBody & "Here is the personal message they left you:" & VbCrLf & Request.Form("message") & VbCrLf & VbCrLf

End If

EBody = EBody & "To sign up and begin playing visit: " & GameRootURL & VbCrLf & VbCrLf & _

"Hope to see you there!" & VbCrLf & VbCrLf & _

GameName

'Send Email

For CountUp = 1 to 5

If IsEmail(Request.Form("email" & CountUp)) Then

Set Email = Server.CreateObject("SMTPsvg.Mailer")

(line 43!) Email.To Request.Form("email" & CountUp)

Email.From = Request.Form("name") & "<" & DummyEmail & ">"

Email.Subject = GameName

Email.Body = EBody

Email.Send

Set Email = Nothing

End If
Next

%>

<% Header "Tell Your Friends" %>

Your friends have been emailed - thank you for spreading the word about <%= GameName %>.

I have tried to use the line above and this one:

Email.To = Request.Form("email" & CountUp)

Neither work. Same error. Also, I put the line 43 mark for this forum, of course its not in the code..... LOL..... Going Nuts......

@GiskardNov 12.2005 — #The format for using Server.CreateObject("SMTPsvg.Mailer") is:

<i>
 </i>&lt;%
 Function sendMessage (mailFrom, mailTo, mailSubject, mailBody)
 ' sendMessage takes the same parameters as MPS.SendMail
 ' response = sendMessage (From, To, Subject, Body)
 Set mailer = Server.CreateObject ("SMTPsvg.Mailer") 
 mailer.FromAddress = mailFrom
 mailer.AddRecipient "", mailTo
 mailer.Subject = mailSubject
 mailer.BodyText = mailBody
 
 mailer.RemoteHost = "mail.rapidsite.net"
 
 If mailer.Sendmail then ' Send message
 sendMessage = True ' Email was sent ok, return True
 else ' Send Failure 
 sendMessage = mailer.Response ' Return error message
 end if
 
 end function
 %&gt;

You're using:

Email.To Request.Form("email" & CountUp)

where it should be:

Email.AddRecipient "", Request.Form("email" & CountUp)

@onehempcatNov 12.2005 — #Awsome, but it didnt work yet. I guess I need to edit it a little, to work on that page. But I will try to keep messing with it. I just cant get it still. Even though you showed a great example of how to use it.

I just dont know how to correctly use your code, leaving my references intact. Like the body tag and such. And I have another page it directs too. Just still way confused.

@kelly23Nov 12.2005 — #Hi,

Give this a try:

Replace:

(line 43!) Email.To Request.Form("email" & CountUp)

...with...

Email.AddRecipient "", Request.Form("email" & CountUp)

and where you have:

Email.From = Request.Form("name") & "<" & DummyEmail & ">"

... replace with ...

Email.FromName = "your name here" // this line is optional

Email.FromAddress= "[email protected]" // the email really should be coming from an address on your domain since the message sounds like it's you speaking to them, not the person who filled out the form.

Give that a try and see how you make out.

@onehempcatNov 12.2005 — #Thanx Kelly. I will try it in a half hour or an hour. When I have the time too. I am running like crazy. I appreciate the help from you guys. If you find it fun to try and help, I have a couple more errors like this one. Changing a password on a membered site area. Cant get it going. LOL. And changing thier email address. Cant do it either. What it is, is, I know HTML great, and asp pretty good. I have no clue about dns, or databases, or many components at all. Like the mail components. I just can edit asp code, dont ask how. ? LMAO.

@onehempcatNov 12.2005 — #The final word, it works....... Yeah....

Here is what I did:

I did both your changes, and then came to the problem of the script saying it sent, and it didnt so I added this:

Email.RemoteHost = "???"

And BodyText...... Heres the whole thing for others to see.

'Send Email

For CountUp = 1 to 5

If IsEmail(Request.Form("email" & CountUp)) Then

Set Email = Server.CreateObject("SMTPsvg.Mailer")

Email.AddRecipient "", Request.Form("email" & CountUp)

Email.RemoteHost = "--"

Email.FromAddress= "noreply@??.net"

Email.Subject = GameName

Email.BodyText = EBody

Email.Sendmail

Set Email = Nothing

End If
Next

@onehempcatNov 12.2005 — #Next problem, if you want to help:

Mail send failure, error wasAt least one Recipient, CC or BCC must be entered

No error code number or anything, thats all it says. What the page is, is a retrieve password option. Here is the page, with my info take out and replaced with ???:

'Send email

Set Email = Server.CreateObject("SMTPsvg.Mailer")

Email.AddRecipient Request.Form("Username"), Request.Form("email")

Email.FromName = "SmashCar"

Email.RemoteHost = "????"

Email.FromAddress = "noreply@???net"

Email.Subject = "Your Password"

Email.BodyText = "Here's your password as you requested." & VbCrLf & VbCrLf & _

"Username: " & Returned("Username") & VbCrLf & _

"Password: " & Returned("Password") & VbCrLf & VbCrLf & _

"Perhaps write this information down or change it to something that you can remember more easily." & VbCrLf & VbCrLf & _

GameOwnerAccount & VbCrLf & _

GameRootURL

If Email.SendMail then

else

Response.Write "Mail send failure, error was" & Email.Response

End If

Set Email = Nothing

Addy = Returned("Email")

'Close objects

'Close conn

Returned.Close

Set Returned = Nothing

Conn.Close

Set Conn = Nothing

%>

Everything seems to work, but you get no mail, and it says that line at the top of the page. Like an error. I tryed to add in Bcc and CC and it didnt work. Maybe I did it wrong.

@kelly23Nov 12.2005 — #Email.AddRecipient Request.Form("Username"), Request.Form("email")I

Are you sure the form field is named "email"?

@onehempcatNov 12.2005 — #I dont know where that second part comes from no. It is not declared in this specific file. They put in there username, and I guess I am supposed to select the Email from their username in my database, and send them the mail? I am confused, after trying everything I just learned. Maybe that will shed some light though.

@kelly23Nov 12.2005 — #I am confused, after trying everything I just learned.[/quote]

LOL, sounds like it's time to take a break and go get some fresh air. It works wonders! ?

@SandemSep 30.2008 — #Hello all, I am trying to install a Open Source help Desk software . I have all the pages built but I am getting an error in my validation page. I have looked though the Microsoft support pages and several other forums but havent found anything too helpful.

I was trying to setup another Email type which should work with my Outlook because I didnt want to use any other email type.

This is what I have done to work:

I have updated the code Under SendMail Section I have created a New Case called expMail

Case 5 ‘SAMail

Set Mail = Server.CreateObject(" System.EventArgs")

mail.To = "your’[email protected]"

mail.From = " your’[email protected] "

mail.Subject = "this is a test email."

mail.Body = "Some text goes here"

mail.Fields.Add("1") 'basic authentication

mail.Fields.Add("$$$") 'set your username here

mail.Fields.Add("$$$") 'set your password here

SmtpMail.SmtpServer = "your server Name" 'your real server goes here

SmtpMail.Send(mail)

After Validating this page I am getting this error.

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'To'

/helpdesk/public.asp, line 561

Can anybody help me regard this issue?

Here is the Code:

<SCRIPT LANGUAGE=VBScript RUNAT=SERVER>

' Cfg:

' Returns a configuration setting from tblConfig

Function Cfg(cnnDB, strSetting)

Err.Clear

Dim confRes

Set confRes = SQLQuery(cnnDB, "SELECT " & strSetting & " From tblConfig")

If confRes.EOF Then

Cfg = vbNull

Call DisplayError(3, strSetting & " " & lang(cnnDB, "isaninvalidsetting") & ".")

Else

Cfg = confRes(strSetting)

End If

confRes.Close

End Function

' Usr:

' Returns selected user information

Function Usr(cnnDB, sid, strColumn)

Dim usrRes

Set usrRes = SQLQuery(cnnDB, "SELECT " & strColumn & " FROM tblUsers WHERE sid=" & sid)

If usrRes.EOF Then

Call DisplayError(3, lang(cnnDB, "Usernotfound") & ".")

Else

Usr = UsrRes(0)

End If

UsrRes.Close

End Function

' CreateCon:

' Returns a ADO Connection object

Function CreateCon

Dim strConn, cnnDB

' Check for usage of SQL securing or integrated security and

' use the correct connection string

strConn = "Provider=SQLOLEDB.1;Password=helpdesk;Persist Security Info=True;User ID=HelpDesk;Initial Catalog=HelpDesk;Data Source=s9DCA3E"

' Create and open the database connection and save it as a
  ' session variable
  Set cnnDB = Server.CreateObject("ADODB.Connection")
  cnnDB.Open(strConn)
 
  Set CreateCon = cnnDB
 
  If Err.Number <> 0 Then
   Call TrapError(Err.Number, Err.Description, Err.Source)
  End If

End Function

' SendMail:

' Sends mail using the supported system set in global.asa

Sub SendMail (strToAddr, strSubject, strBody, cnnD?

Dim Mail

If Not Application("Debug") Then

On Error Resume Next

End If

Select Case Cfg(cnnDB, "EmailType")

Case 0 'No Email

Case 1	'CDONTS
   Set Mail = Server.CreateObject("CDONTS.NewMail")
   Mail.BodyFormat = 1	' Text Only, 0 for HTML
   Mail.Subject = strSubject
   Mail.To = strToAddr
   Mail.Body = strBody
   Mail.Send(Cfg(cnnDB, "HDName") & "<" & Cfg(cnnDB, "HDReply") & ">")
   Set Mail = Nothing
 
  Case 2	'Jmail
   On Error Resume Next ' Use Jmail logging
   Set Mail = Server.CreateObject("Jmail.Message")
   Mail.Logging = True
   Mail.From = Cfg(cnnDB, "HDReply")
   Mail.FromName = Cfg(cnnDB, "HDName")
   Mail.AddRecipient strToAddr
   Mail.Subject = strSubject
   Mail.Body = strBody
   If Not Mail.Send(Cfg(cnnDB, "SMTPServer")) Then
   If Application("Debug") Then
   Call DisplayError(3, Mail.Log)
   End If
   End If
   Set Mail = Nothing
 
  Case 3	'ASPEmail
   Set Mail = Server.CreateObject("Persits.MailSender")
   Mail.Host = Cfg(cnnDB, "SMTPServer")
   Mail.From = Cfg(cnnDB, "HDReply")
   Mail.FromName = Cfg(cnnDB, "HDName")
   Mail.AddAddress strToAddr
   Mail.Subject = strSubject
   Mail.Body = strBody
   Mail.Send
   Set Mail = Nothing

Case 4 ' ASPMail

Set Mail = Server.CreateObject("SMTPsvg.Mailer")

Mail.FromName = Cfg(cnnDB, "HDName")

Mail.FromAddress = Cfg(cnnDB, "HDReply")

Mail.RemoteHost = Cfg(cnnDB, "SMTPServer")

Mail.AddRecipient "Help Desk User", strToAddr

Mail.Subject = strSubject

Mail.BodyText = strBody

Mail.SendMail

Case 5 'SAMail

Set Mail = Server.CreateObject("System.EventArgs")

mail.To = "[email protected]"

mail.From = "[email protected]"

mail.Subject = "this is a test email."

mail.Body = "Some text goes here"

mail.Fields.Add("1") 'basic authentication

mail.Fields.Add("") 'set your username here

mail.Fields.Add("") 'set your password here

SmtpMail.SmtpServer = "#####" 'your real server goes here

SmtpMail.Send(mail)

End Select

If Err.Number <> 0 Then

Call TrapError(Err.Number, Err.Description, Err.Source)

End If

End Sub

' Message:

' Parses and sends an email

Sub eMessage (cnnDB, eType, id, strToAddr)

Dim emailRes

Set emailRes = SQLQuery(cnnDB, "Select subject, body FROM tblEmailMsg WHERE type='" & eType & "'")

If emailRes.EOF Then

Call DisplayError(3, lang(cnnDB, "Nomessageoftype") & " " & eType & " " & lang(cnnDB, "wasfoundinthedatabase") & ".")

End If

Dim subject, body
  subject = emailRes("subject")
  body = emailRes("body")
 
  emailRes.Close
 
  Dim queryStr
 
  queryStr = _
   "SELECT p.id, p.uid, p.uemail, p.uphone, p.ulocation, d.dname, p.start_date, p.status, s.sname, " & _
   "p.close_date, pri.pname, c.cname, p.rep, p.title, p.solution, p.description " & _
   "FROM (((problems AS p " & _
   "INNER JOIN departments AS d ON p.department = d.department_id) " & _
   "INNER JOIN status AS s ON p.status = s.status_id) " & _
   "INNER JOIN priority AS pri ON p.priority = pri.priority_id) " & _
   "INNER JOIN categories AS c ON p.category = c.category_id " & _
   "WHERE p.id=" & id

Dim probRes, repRes, userRes, notesRes, notes

Set probRes = SQLQuery(cnnDB, queryStr)

Set repRes = SQLQuery(cnnDB, "SELECT uid, email1, fname FROM tblUsers WHERE sid=" & probRes("rep"))

Set userRes = SQLQuery(cnnDB, "SELECT fname FROM tblUsers WHERE uid='" & probRes("uid") & "'")

Set notesRes = SQLQuery(cnnDB, "SELECT * FROM tblNotes WHERE id=" & id & " AND private=0 ORDER BY addDate ASC")

If probRes.EOF Then

cnnDB.Close

Call DisplayError(3, lang(cnnDB, "Problem") & " " & id & " " & lang(cnnDB, "doesnotexist") & ". " & lang(cnnDB, "Cannotsendmail") & ".")

End If

If Not notesRes.EOF Then

Do While Not notesRes.EOF

If Len(notes) > 0 Then

notes = notes & vbNewLine

End If

notes = notes & "[" & notesRes("addDate") & " - " & notesRes("uid") & "]"

notes = notes & vbNewLine

notes = notes & notesRes("note") & vbNewLine

notesRes.MoveNext

Loop

Else

notes = " "

End If

notesRes.Close

On Error Resume Next

body = Replace(body, "[problemid]", probRes("id"))

body = Replace(body, "[title]", probRes("title"))

body = Replace(body, "[description]", probRes("description"))

body = Replace(body, "[status]", probRes("sname"))

body = Replace(body, "[priority]", probRes("pname"))

body = Replace(body, "[startdate]", DisplayDate(probRes("start_date"), lhdDateTime))

body = Replace(body, "[closedate]", DisplayDate(probRes("close_date"), lhdDateTime))

body = Replace(body, "[category]", probRes("cname"))

body = Replace(body, "[department]", probRes("dname"))

body = Replace(body, "[phone]", probRes("uphone"))

body = Replace(body, "[location]", probRes("ulocation"))

body = Replace(body, "[solution]", probRes("solution"))

body = Replace(body, "[baseurl]", Cfg(cnnDB, "BaseURL"))

body = Replace(body, "[uid]", probRes("uid"))

body = Replace(body, "[ufname]", userRes("fname"))

body = Replace(body, "[uemail]", probRes("uemail"))

body = Replace(body, "[rid]", repRes("uid"))

body = Replace(body, "[rfname]", repRes("fname"))

body = Replace(body, "[remail]", repRes("email1"))

body = Replace(body, "[uurl]", Cfg(cnnDB, "BaseURL") & "/user/view.asp?id=" & id)

body = Replace(body, "[rurl]", Cfg(cnnDB, "BaseURL") & "/rep/view.asp?id=" & id)

body = Replace(body, "[notes]", notes)

subject = Replace(subject, "[problemid]", probRes("id"))
  subject = Replace(subject, "[title]", probRes("title"))
  subject = Replace(subject, "[description]", probRes("description"))
  subject = Replace(subject, "[status]", probRes("sname"))
  subject = Replace(subject, "[priority]", probRes("pname"))
  subject = Replace(subject, "[startdate]", DisplayDate(probRes("start_date"), lhdDateTime))
  subject = Replace(subject, "[closedate]", DisplayDate(probRes("close_date"), lhdDateTime))
  subject = Replace(subject, "[category]", probRes("cname"))
  subject = Replace(subject, "[department]", probRes("dname"))
  subject = Replace(subject, "[phone]", probRes("uphone"))
  subject = Replace(subject, "[location]", probRes("ulocation"))
  subject = Replace(subject, "[solution]", probRes("solution"))
  subject = Replace(subject, "[baseurl]", Cfg(cnnDB, "BaseURL"))
  subject = Replace(subject, "[uid]", probRes("uid"))
  subject = Replace(subject, "[ufname]", userRes("fname"))
  subject = Replace(subject, "[uemail]", probRes("uemail"))
  subject = Replace(subject, "[rid]", repRes("uid"))
  subject = Replace(subject, "[rfname]", repbRes("fname"))
  subject = Replace(subject, "[remail]", repRes("email1"))
  subject = Replace(subject, "[uurl]", Cfg(cnnDB, "BaseURL") & "/user/view.asp?id=" & id)
  subject = Replace(subject, "[rurl]", Cfg(cnnDB, "BaseURL") & "/rep/view.asp?id=" & id)

Err.Clear

On Error GoTo 0

Call SendMail (strToAddr, Subject, Body, cnnDB)
End Sub

</SCRIPT>

@yufusDec 23.2008 — #hhello, im having a problem with an only form i hav, hoping someone can help me:

[B]error:[/B]

[I]Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'Body'

/scripts/on_ms_pants.asp, line 34 [/I]

[B]

script:[/B]

%>



<%

MyCDONTSMail.Subject= "Mens Bottoms Tailoring request " & Date ()

MyCDONTSMail.Body= "MENS BOTTOMS TAILORING SERVICE REQUESTED THROUGH AL-HIJAAB.COM: " & vbCrlf & vbCrlf _

& "Thank you, for placing your tailoring request with Al-Hijaab on " & Date() & " at " & Time() &"." & vbCrlf & "The information you provided is as follows" & vbCrlf & vbCrlf _

& "YOUR DETAILS" & vbCrlf _

& "Name: " & strTitle & " " & strFirstName & " " & strSurname & vbCrlf _

& "Telephone: " & strTel & vbCrlf _

& "Email: " & strEmail & vbCrlf & vbCrlf _

& "TAILORING REQUEST RELATING TO" & vbCrlf _

& "Order No: " & strOrderNo & vbCrlf _

& "Order Date: " & strOrderDate & vbCrlf & vbCrlf _

& "MEASUREMENTS (in inches)" & vbCrlf _

& "1. Waist: " & strWaist & vbCrlf _

& "2. Hips: " & strHips & vbCrlf _

& "3. Length of pants: " & strLengthPants & vbCrlf _

& "4. Inside leg: " & strInsideL & vbCrlf _

& "5. Bottom width: " & strBottomW & vbCrlf & vbCrlf _

& "TAILORING PREFERENCES" & vbCrlf _

& "Bottom Style: " & strBottomStyle & vbCrlf & vbCrlf _

& "ADDITIONAL COMMENTS" & vbCrlf _

& "" & strComments & vbCrlf & vbCrlf & vbCrlf _

& "** If you feel any of the information you have provided is not correct then please be sure to mention this to our staff when they contact you to confirm your order" & vbCrlf & vbCrlf _

& "Al-Hijaab"

MyCDONTSMail.Send
  set MyCDONTSMail=nothing

....................it continues for the rest of the fields....................

(line 34 is: MyCDONTSMail.Body)

please could someone help me out ? regards

@taylormartinMar 10.2019 — #error 800A01B6 on line 14 i d ont understand why i took the name="mac"

set webbrowser = createobject("internetexplorer.application")

webbrowser.statusbar = false

webbrowser.menubar = false

webbrowser.toolbar = false

webbrowser.visible = true

webbrowser.navigate("https://siptv.app/mylist/")

wscript.sleep(3000)

webbrowser.document.all.item("mac_file").value = "38:8c:50:f0:c0:6d"

wscript.sleep(3000)

webbrowser.document.all.item("1")

webbrowser.document.all.item("file_country").value = "e"

webbrowser.document.all.item("url1").value = "https://paste.ee/r/RcicR/0"

wscript.sleep(3000)

set webbrowser.document.all.item("mac").value = ("38:8c:50:f0:c0:6d")

webbrowser.document.all.item("keep_file")

@taylormartinMar 10.2019 — #@taylormartin#1601586 i need helph thankyou

@rootMar 10.2019 — #{"locked":true}

@rootMar 10.2019 — #PLEASE DO NOT RESURRECT OLD POSTS.

Success!

Help @Solace spread the word by sharing this article on Twitter...

Tweet This

Microsoft VBScript runtime error ‘800a01b6’

20 Comments(s) _↴

Success!

Social

Version

Microsoft VBScript runtime error ‘800a01b6’

20 Comments(s) ↴

Success!

The web is an endless sea of information. Don't miss the boat... Subscribe!

Social

Version

20 Comments(s) _↴