Hem / Tips & tricks
Dim con As New ADODB.ConnectionDim constr As String constr = "driver={SQL Server};server=minserver;" & _ "database=pubs;uid=sa;pwd="con.Open constr