$cfile = 'config.php'; //файл с настройками

if( isset($_POST['name']) && isset($_POST['addr']) )
{

$name = trim(stripslashes($_POST['name']), PHP_EOL);
$addr = trim(stripslashes($_POST['addr']), PHP_EOL);
$content = file_get_contents( $cfile );
$content = preg_replace( '#\$name\s*=\s*".*";#', '$name = "'.$name.'";', $content );
$content = preg_replace( '#\$adr\s*=\s*".*";#', '$adr = "'.$addr.'";', $content );
if( file_put_contents( $cfile, $content ) )
            echo "<font color='red'>Настройки успешно сохранены</font><br><br>"; else
            echo "<font color='red'>Настройки сохранить не удалось.</font><br><br>";


}
?>
<form method="post" act="">
$name = <input type="text" name="name">;<br /><br />
$adr = <input type="text" name="addr">;<br />
<input type="submit" value="Сохранить">

 request.Method = "POST"
        Dim postData As String = "?OP=UPD&pr1=fileName&pr2=" & "text"
        Dim byteArray As Byte() = Encoding.UTF8.GetBytes(postData)
        request.ContentType = "application/x-www-form-urlencoded"
        request.ContentLength = byteArray.Length
        Dim dataStream As Stream = request.GetRequestStream()
        dataStream.Write(byteArray, 0, byteArray.Length)
        dataStream.Close()
        Dim response As WebResponse = request.GetResponse()
     
        dataStream = response.GetResponseStream()
        Dim reader As New StreamReader(dataStream)
        Dim responseFromServer As String = reader.ReadToEnd()
      
        reader.Close()
        dataStream.Close()
        response.Close()