Overview

WRFDA

Test data

WRFNL

WRFPLUS

FSO

MADIS2LITTLER

Tools

Free Input Data

 

 

 

MADIS Source Code Download: Returning Users

$value) { $values[$key] = db_escape($value, $quotes); } } else if ($values === null) { $values = 'NULL'; } else if (is_bool($values)) { $values = $values ? 1 : 0; } else if (!is_numeric($values)) { $values = mysqli_real_escape_string($mysqli, $values); if ($quotes) { $values = '"' . $values . '"'; } } return $values; } function required($name) { global $form_errors; if ($form_errors["$name"] != "") { return " required"; } else { return ""; } } function check_form($form) { if ($form["email"] == "") { $errors["email"] = "E-Mail Address"; } return $errors; } $form["submit"] = $_POST["submit"]; if ($form["submitted"]) { $form_errors = check_form($form); } if ($form_errors) { print "

Please fill out the following required fields:

\n"; print "
    \n"; foreach ($form_errors as $form_error) { print "
  • $form_error
  • \n"; } print "
\n"; $form["submit"] = ""; } if ($form["submit"] == "") { ?>

Returning users: please fill in the E-mail Address Field and click on the "Submit" button below.

E-Mail Address

">

">
$query"; # $result = mysql_query($query); # $row = mysql_fetch_row($result); $result = $mysqli->query($query); $row = $result->fetch_array(); if ($row[0] > 0) { # print ""; db_connect("box.mmm.ucar.edu", "wrfweb", "wtwrf"); $query = "update wrfweb.wrf_users set last_login_dt = now() where email = '$form[email]'"; # mysql_query($query); $result = $mysqli->query($query); $goto_url = "http://www2.mmm.ucar.edu/wrf/users/download/get_sources.html"; print '

User registration verified.

'; print '

Please click here to proceed to the download page.

'; print '

NOTE: The MADIS code can be found by clicking the "Utilities" link at the top right of the page, or scrolling down to the appropriate section.

'; # db_connect("box.mmm.ucar.edu", "wrfweb", "wtwrf"); } else { $goto_url = "http://www2.mmm.ucar.edu/wrf/users/download/wrf-regist.php"; print '

Unable to verify user registration.

'; print '

You will need to register to download the software

'; print '

Please click here to proceed to the registration page.

'; } } ?>