Does anyone have a function to parse connection strings?

[Ilitirit]

eg. Something that will parse:
"Data Source=server;Initial Catalog=database;User ID=user;Password=password"

into 4 variables:
$DataSource = "server"
$InitialCatalog = "database"
$UserId="user"
$Password="password"