scriptin çalınmasını engelleme

[CMYLMZ]

Elimden geldigince açıklayayım
Asp yazarken kullandığımız bir çok nesne aslında Asp.Dll inin bize sunduğu kod parçacıklarıdır.

dll içinde sorgula die bi fonksion varsa ve biz bunu aspnin içinde çalığıyorsak

<% Set vCon = Server.CreateObject ("dllim.Check")
'Kullanıcı adı ve password sorgulaması.
Set Check = Server.CreateObject ("Dllim.Check")
Result = Check.Checkuser ( Cstr(Username),Cstr(Password),Session("IpAddres"), Trim(Session("Key")),"192.168.1.135",80)
if Result = 600 Then
Set SQL = Server.CreateObject("Dllim.SQL")
Set RSData = SQL.GetRecordSet ("exec sp_getname '" & Username & "'")
Session("Name") = RSData("Name") & " " & RSData("SurName")
Set SQL = Nothing
Set RSData = Nothing
Session("username") = Trim(Request.Form("username"))
Session("password") = Trim(Request.Form("password"))
Response.Redirect "main.asp"
Else
Response.Redirect "member.asp?Err=" & Result
End if
Else
Response.Redirect "member.asp"
End if


%>