[Resolvido] A conversão da seqüência de caracteres '' no

[cintiadel 0]

quero q se ele no banco a data for null ou vazia ele coloque "1900-01-01" mas esta dando erro:

A conversão da seqüência de caracteres '' no tipo 'Date' não é válida.

 

Dim data_pagamento As Date
			If Not (dr_sei("dtpgto") = "") Then
				data_pagamento = Year(dr_sei("dtpgto")) & "-" & Month(dr_sei("dtpgto")) & "-" & Day(dr_sei("dtpgto"))
			Else
				data_pagamento = "1900-01-01"
			End If

[quintelab 91]

data_pagamento = Convert.ToDateTime("1900-01-01")

Abraços...

[cintiadel 0]

data_pagamento = Convert.ToDateTime("1900-01-01")

Abraços...

funcionou desta forma:

data_vencimento = "1900-01-01"

com a variavel setada como string

tópico resolvido