• 02-04-2015, 00:02:57
    #1
    <td width="440" class="orange">
    <input type="HIDDEN" name="BridgeFlag" value="0"><input type="BUTTON" name="SaveBtn" value="KAYDET" onclick="uiSave()" class="sbutton"></td>
    bu satırdaki kaydet 'e onclick yaptırmaya çalışıyorum fakat ne yaptıysam yemedi bi türlü çıldırıcam lütfen yardım edin.


    Edit...

    TP Link 54 mb wiriless modem için sınırsız ıp değiştirme kodlarını paylaşıyorum hayır severimdir

    Modeme reset atmıyor tam olarak sadece ip değiştirmektedir.
    5 tane xxxx koyduğum yerleri kendi ttnet bilgileriniz ile değiştiriniz.

    Projelendirmek istyenler için...

    Yazılım Versiyonu
    :
    3.0.0 Build 100702 Rel.26418

    Private Sub ModemeResetAt()
            On Error Resume Next
            Dim cweb As String = "http://192.168.1.1/Forms/home_wan_1"
            Dim POST As String = "HiddenFlag=0&wan_VC=PVC0&wanVCFlag=0&wan_VCStatus=1&Alwan_VPI=8&Alwan_VCI=35&Alwan_QoS=UBR&wan_PCR=0&wanConTypeFlag=0&wanTypeRadio=Two&wan_PPPServicename=&Allow_Empty_Flag=1&Check_UsrPsw_Flag=0&Empty_UsrPsw_Flag=0&wan_PPPUsername=xxxxx%40ttnet&wan_PPPPassword=xxxxx&wan_PPPEncap=PPPoE+LLC&PPPoEBIStatus=0&wan_ConnectSelect=Connect_Keep_Alive&wan_TCPMSS=1400&wan_PPPGetIP=0&wan_NAT=Etkin&WAN_DefaultRoute=1&wan_TCPMTU=1480&wan_RIPVersion=RIP2-B&wan_RIPDirection=Hepsi&wan_IGMP=Devre+d%FD%FE%FD&wan_EnabledSpoof=0&BridgeFlag=0&wanIGMPQitFlag=0&wan_PVCO_Flag=0&PageLockValue=0"
            Dim request As HttpWebRequest
            Dim response As HttpWebResponse
    
            Dim authorization_type As String = "Basic YWRtaW46YWRtaW4="
            Dim username As String = "admin"
            Dim password As String = "admin"
            request = CType(WebRequest.Create(cweb), HttpWebRequest)
            request.UserAgent = "Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/28.0.1500.72 Safari/537.36"
    
            Dim Authorization As String = authorization_type & " username=" & username & ",password=" & password
    
            request.Headers("Authorization") = Authorization.ToString
            request.AllowAutoRedirect = True
            request.ContentType = "application/x-www-form-urlencoded"
            request.ContentLength = POST.Length
            request.Method = "POST"
            request.KeepAlive = True
    
            Dim requestStream As Stream = request.GetRequestStream()
            Dim postBytes As Byte() = Encoding.ASCII.GetBytes(POST)
            requestStream.Write(postBytes, 0, postBytes.Length)
            ' Get the response.
    
            requestStream.Close()
    
            response = request.GetResponse()
            Dim sr As New StreamReader(response.GetResponseStream())
            Dim result = sr.ReadToEnd()
        End Sub
  • 02-04-2015, 00:05:44
    #2
    uiSave fonksiyonunu paylaşırsan yardımcı olabiliriz.
  • 02-04-2015, 00:08:01
    #3
    Misafir adlı üyeden alıntı: mesajı görüntüle
    uiSave fonksiyonunu paylaşırsan yardımcı olabiliriz.
    function uiSave() {
    var value;
    var Mask;
    if(null != document.forms[0].wan_PPPGetIPVersions)
    {
    if(document.forms[0].wanTypeRadio[2].checked)
    {
    if(document.forms[0].wan_PPPGetIPVersions[1].checked)
    return;
    }
    }
    if (
    !pvcDoValidatePageWAN() ||
    !QoSDoValidatePageWAN())
    return;
    if ((!IsStringEmpty(document.forms[0].wan_PPPUsername.value))&&
    (!StringCheck(document.forms[0].wan_PPPUsername.value)))
    {
    alert("Kullanıcı adı boşluk içeriyor!");return;
    }
    if ((!IsStringEmpty(document.forms[0].wan_PPPPassword.value))&&
    (!StringCheck(document.forms[0].wan_PPPPassword.value)))
    {
    alert("Şifre boşluk içeriyor!");return;
    }
    if(document.forms[0].Check_UsrPsw_Flag.value != 0)
    {
    if(((document.forms[0].wan_PPPUsername.value!="") && !UsrPswCheck(document.forms[0].wan_PPPUsername.value)) ||
    (document.forms[0].Empty_UsrPsw_Flag.value!=1 && IsStringEmpty(document.forms[0].wan_PPPUsername.value)))
    {
    alert('Romfile isminin rom-0 olarak kaydedilmesi önerilir.');return;
    }
    if(((document.forms[0].wan_PPPPassword.value!="") && !UsrPswCheck(document.forms[0].wan_PPPPassword.value))  ||
    (document.forms[0].Empty_UsrPsw_Flag.value!=1 && IsStringEmpty(document.forms[0].wan_PPPPassword.value)))
    {
    alert("Geçersiz Şifre");return;
    }
    }
    if(idleTimeCheck())
    return ;
    MSS = parseInt(document.Alpha_WAN.wan_TCPMSS.value);
    if(MSS > 1452 || MSS < 100)
    {
    alert("TCP MSS aralığı: 100~1452 veya varsayılan değer olarak 0");return false;
    }
    if (!MTUCheck())
    return false;
    MTU = parseInt(document.Alpha_WAN.wan_TCPMTU.value);
    if( (MTU != 0) && (MSS != 0) && (MSS > (MTU - 40)) )
    {
    alert("TCP MSS aralığı TCP MTU -40 (TCP ve IP Başlığı)dan küçük olmalı");return false;
    }
    if (quotationCheck(document.forms[0].wan_PPPServicename, 31) )
    return;
    if(chineseCheck(document.forms[0].wan_PPPServicename, "ServicenameId"))
    return;
    if (quotationCheck(document.forms[0].wan_PPPUsername, 71) )
    return;
    if(chineseCheck(document.forms[0].wan_PPPUsername, "UsernameId"))
    return;
    if (quotationCheck(document.forms[0].wan_PPPPassword, 71) )
    return;
    if(chineseCheck(document.forms[0].wan_PPPPassword, "PasswardId"))
    return;
    if(document.forms[0].wan_PPPGetIP[0].checked)
    {
    if (!staticDoValidatePageWAN())
    return;
    Mask = document.forms[0].wan_StaticIPSubMask.value;
    if (inValidSubnetMask(Mask))
    {
    alert("Geçersiz Alt Ağ Maskesi!" + value);return;
    }
    value = document.forms[0].wan_StaticIpGateway.value;
    if (!valDoValidateIP(value))
    return;
    }
    if (document.Alpha_WAN.wanIGMPQitFlag.value == 1)
    {
    if(!isNumeric(document.Alpha_WAN.WANPMulticastQIT.value))
    {
    alert("Sadece sayıları içermeli");return;
    }
    }
    if ( document.Alpha_WAN.wan_SpoofSrcMacValue.disabled == false && (isIllegalMacAddr(document.Alpha_WAN.wan_SpoofSrcMacValue.value))==1 )
    {
    alert("Geçersiz Kaynak MAC Adresi!");document.Alpha_WAN.wan_SpoofSrcMacValue.focus();
    return;
    }
    document.Alpha_WAN.submit();
    }
    function pppStaticCheck() {
    var value = document.forms[0].wan_PPPGetIP[1].checked;
    if (value) {
    document.forms[0].wan_StaticIPaddr.disabled = true;
    document.forms[0].wan_StaticIPaddr.value = "0.0.0.0";
    document.forms[0].wan_StaticIPSubMask.disabled = true;
    document.forms[0].wan_StaticIPSubMask.value = "0.0.0.0";
    document.forms[0].wan_StaticIpGateway.disabled = true;
    document.forms[0].wan_StaticIpGateway.value = "0.0.0.0";
    } else {
    document.forms[0].wan_StaticIPaddr.disabled = false;
    document.forms[0].wan_StaticIPSubMask.disabled = false;
    document.forms[0].wan_StaticIpGateway.disabled = false;
    }
    }
    function doEnable() {
    if (document.forms[0].wan_EnabledSpoof[1].checked){
    document.forms[0].wan_SpoofSrcMacValue.disabled = true;
    document.forms[0].wan_SpoofSrcMacValue.value="00:00:00:00:00:00";
    }
    else
    document.forms[0].wan_SpoofSrcMacValue.disabled = false;
    }
    function doLoad() {
    var value = document.forms[0].wanTypeRadio[2].checked;
    doEnable();
    QosCheck();
    WANChkIdleTimeT();
    if (value)
    pppStaticCheck();
    LockWhenPVC0();
    LockPVC();
    if(document.forms[0].wan_PPPPassword != null)
    {
    document.forms[0].wan_PPPPassword.value = pwdppp;
    }
    }
    function doDelete() {
    document.forms[0].wanVCFlag.value = 2;
    document.Alpha_WAN.submit();
    }
    function UsrPswCheck(val)
    {
    re = /^[0-9 a-z A-Z]+$/;
    if( re.test(val) )
    return true;
    else
    return false;
    }
    function LockPVC()
    {
    var j;
    var frm = document.Alpha_WAN;
    if(frm.HiddenFlag.value==1)
    {
    frm.elements[2].disabled = true;
    for(j = 4; j < frm.elements.length; j++)
    {
    frm.elements[j].disabled = true;
    }
    }
    return;
    }
    function LockWhenPVC0() {
    if(document.Alpha_WAN.wan_PVCO_Flag.value == 1)
    {
    if(document.Alpha_WAN.Alwan_VPI != null)
    {
    document.Alpha_WAN.Alwan_VPI.disabled = true;
    }
    if(document.Alpha_WAN.Alwan_VCI != null)
    {
    document.Alpha_WAN.Alwan_VCI.disabled = true;
    }
    if(document.Alpha_WAN.wan_PPPEncap != null)
    {
    document.Alpha_WAN.wan_PPPEncap.disabled = true;
    }
    if(document.Alpha_WAN.PPPoEBIStatus!= null)
    {
    document.Alpha_WAN.PPPoEBIStatus[0].disabled = true;
    document.Alpha_WAN.PPPoEBIStatus[1].disabled = true;
    }
    if(document.Alpha_WAN.wan_ConnectSelect != null)
    {
    document.Alpha_WAN.wan_ConnectSelect[0].disabled = true;
    document.Alpha_WAN.wan_ConnectSelect[1].disabled = true;
    document.Alpha_WAN.wan_ConnectSelect[2].disabled = true;
    }
    }
    else if (document.Alpha_WAN.wan_PVCO_Flag.value == 2)
    {
    if(document.Alpha_WAN.Alwan_VCI != null)
    document.Alpha_WAN.Alwan_VCI.disabled = true;
    }
    else if (document.Alpha_WAN.wan_PVCO_Flag.value == 3)
    {
    if((document.Alpha_WAN.wan_VC.selectedIndex >= 3) && (document.Alpha_WAN.wan_VC.selectedIndex <= 7))
    {
    if(document.Alpha_WAN.Alwan_VCI != null)
    {
    document.Alpha_WAN.Alwan_VCI.disabled = true;
    }
    if(document.Alpha_WAN.DeleteBtn != null)
    {
    document.Alpha_WAN.DeleteBtn.disabled = true;
    }
    }
    }
    }
    function NameCheck(name)
    {
    var pattern=name.value.search(/@/i)
    if (pattern!= -1 ){
    alert("Kullanıcı adı geçersiz");name.focus();
    return false;
    }
    return true;
    }